نحوه ی استفاده از ( ftp, smtp, pop ) به وسیله ی Wait For

[مجید آرتا 5,875]

سلام

خب توی نسخه های جدید بیسیک به وسیله ی Wait For  ب راحتی می تونیم رویداد های یک کتابخانه و . . . . رو در کنارش بیاریم و کار رو هندل کنیم

خب یک مثال از کتابخونه Net  رو هم قرار میدیم »

Dim sf As Object = ftp.UploadFile(File.DirAssets, "somefile", False, "/somefile")
Wait For (sf) ftp_UploadCompleted (ServerPath As String, Success As Boolean)
If Success Then
   Log("file was uploaded successfully")
Else
   Log("Error uploading file")
End If

موفق باشید