主题：关于FTP文件名显示问题

 编写drawcell事件

If e.Col.name = "上传招标文件" Then
    e.text = FileSys.GetName(e.text)
End If

改代码

If e.Col.name = "第二列" Then
    Dim str As String = ""
    For Each s As String In e.text.replace(chr(10), "").Split(chr(13))
        str &= FileSys.GetName(s) & vbcrlf
    Next
    e.text = str.trim(chr(13),chr(10))
End If

你的文件是否太大？

你可以先检测本地文件夹是否有你的文件，如果有，就直接打开，没有才下载

http://www.foxtable.com/webhelp/scr/0337.htm