PDA

View Full Version : Microsoft Internet transfer control



mahmoodreza
جمعه 08 آبان 1383, 19:45 عصر
سلام
کسی از دوستان میتونه بگه اشکال این برنامه چیه چون کار نمیکنه.... ولی همه دستورات مثله مثالش هست...
هیچ اروری نمیگیرم ولی عمل را هم انحام نمیده.


Private Sub Command1_Click()



FTPHostname = "www.url.de/"
With Inet1
.password = "passw?"
.username = "usernam"
End With

' Inet1.Execute FTPHostname, "PUT c:/artikel.txt artikel.txt "
Inet1.Execute FTPHostname, "GET index.htm c:/index.htm"



Do While Inet1.StillExecuting

Debug.Print
DoEvents
MsgBox "ok"
Loop

Exit Sub




End Sub

vbprogramer
شنبه 09 آبان 1383, 11:39 صبح
جناب شیرین سخن میتونی بیشتر توضیح بدی که می خواهی چه کار کنی ؟ :متفکر:
این inet1 چی هست؟

mhandgz
جمعه 10 اردیبهشت 1389, 11:28 صبح
اقای vbprogrammer
Internet transfer control هست دیگه