我用INET控件上传文件没反应,求解!
我设置好了INET的URL属性,PASSWORD等属性就自动填好了,然后写了下面的代码,启动后单击按钮1,再到服务器那里看看,没见到我要上传的文件。请问我该怎样?Private Sub Command1_Click()
Dim a$
a = "D:\我的桌面\s.ppt"
Inet1.Execute , "PUT" & a & "s.ppt"
right1 = Inet1.StillExecuting
Do While right1
right1 = Inet1.StillExecuting
DoEvents
Loop
End Sub