[求助]发布后，没有RemoteFiles文件夹。那么打开某个文件肯定会报错 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

If lr IsNot Nothing Then

e.Form.text = bgid & "附件目录文件list 文件打开中...."

If ftp.Download(vars("ljwjj") & "\" & lr.text,ProjectPath & "\RemoteFiles\" & lr.text) = True Then

e.Form.Text = bgid & "附件目录文件list"

Dim proc As new Process

proc.File = ProjectPath & "\RemoteFiles\" & lr.text

proc.Start

Else

MessageBox.Show("所选文件打开失败!请联系刘基永1034","博达BUG管理系统提醒您",MessageBoxButtons.OK,MessageBoxIcon.Warning)

e.Form.Text = bgid & "附件目录文件list"

End If

Else

MessageBox.Show("请选择一个文件!然后点击打开按钮","博达BUG管理系统提醒您",MessageBoxButtons.OK,MessageBoxIcon.Error)

End If

主题：[求助]发布后，没有RemoteFiles文件夹。那么打开某个文件肯定会报错