如何使用INET控件上传用公共对话框选择的文件？

Question

各位大人，我想把文件用INET控件上传到FTP服务器上，可是用Inet1.Execute "ftp://[email protected]","send d:\123.txt 123.txt"这个语句只能指定路径和文件名才能上传成功，如果想把用公共对话框选择的文件上传，就老不成功，因为在语句中不能明确指定路径和文件名，谁能教教我怎么办啊？跪谢啦！！！！！！

Answer 1

’引用控件 Microsoft Common Dialog Control6.0
CommonDialog1.InitDir = "D:\"
With CommonDialog1
.ShowOpen
Inet1.Execute "ftp://[email protected]",.FileName & " " & Mid(.FileName, InStrRev(.FileName, "\") + 1)
End With

Answer 2

可以啊，
Inet1.Execute "ftp://[email protected]",.FileName & " " & Mid(.FileName, InStrRev(.FileName, "\") + 1)其中的Mid(.FileName, InStrRev(.FileName, "\") + 1)随便换成什么文件名都可以的