توی سرویس Starter کتابخونه رو به شکل زیر اینشیالایز کنید
Sub Process_Globals
Dim setup As FastNetSetup
End Sub
Sub Service_Create
setup.SetupFastNet.Build
End Sub
متد پست هم به شکل زیر هست.
Dim dl As PersianFastNetwork
dl.initialize("dl")
dl.BuildPostQuery(all_D_cod.hostname&"/LarnPage/Insert_comment.php","Comments_send") _
.addParametrs("content",CommentText.Text) _
.addParametrs("star",5) _
.addParametrs("Post_id",all_D_cod.profile_me(2)) _
.addParametrs("type","user") _
.addParametrs("javab", contentm) _
.addParametrs("name",all_D_cod.profile_me(3)) _
.executRequest
رسپانس هم به شکل زیر میشه.
Private Sub dl_onSucsess(Result As String , Tag As Object)
End Sub
Private Sub dl_onError(Error As ResponseError , Tag As Object)
End Sub