在一个窗口中,直接双击“文件名称及链接”这一列的内容,如果本地有相同的文件(且判断是否为最新,如果是),则直接打开,如果没有的话,下载FTP的文件打开。
也就是说,实现列属性为“文件”的这一列,在这一列中任意一行直接双击,实现鼠标右键中“打开文件(O)”的功能。
下面的语句无法判断本地是否有这个文件。
If e.Col.Name = "文件名称及链接" Then
If e.Row.IsNull("文件名称及链接") = False Then
Dim path As String = e.Col.DataCol.DefaultFolder
If path = Nothing Then
path = ProjectPath & "RemoteFiles/"
End If
path = path & e.Row("文件名称及链接")
Dim proc As new Process
proc.File = path
proc.Start
End If
End If