INET 文件上传问题
Private Sub cmdUpload_Click()
Dim CID As String
Dim right1 As Integer
Dim i As Integer
'i = 1
'Do While VSFGOrder.TextMatrix(i, 0) <> " "
inetTrans.Execute , "PUT " & "C:\Documents and Settings\扫描.JPG " & " " & "扫描.JPG "
'inetTrans.Execute , "PUT " & "D:\扫描.JPG " & " " & "扫描.JPG "
right1 = inetTrans.StillExecuting
Do While right1
right1 = inetTrans.StillExecuting
DoEvents
Loop
' i = i + 1
'Loop
End Sub
如果我用以下这条语句上传文件可以的
'inetTrans.Execute , "PUT " & "D:\扫描.JPG " & " " & "扫描.JPG "
如果我用下面这一条就不能上传文件
inetTrans.Execute , "PUT " & "C:\Documents and Settings\扫描.JPG " & " " & "扫描.JPG "
这是为什么？
[解决办法]
可能文件名(路径)中包函有空格引起的.
[解决办法]
inetTrans.Execute , "PUT " & " " "C:\Documents and Settings\扫描.JPG " " " & " " & "扫描.JPG "
试试
