[Original] Support for asynchronous simple soap call module, soappro. dll

If you use VB to call WebService, be careful !! This module supports synchronous/asynchronous calls.
Superior Performance! If you have any comments or suggestions, please send an email to: ray530@21cn.com Thank you !!!
Module:
Http://files.cnblogs.com/raylynn/SoapPro.rar ' **************************************** *********************************
' ** Module name: form1
' ** Description: soappro usage example. This module includes synchronous and asynchronous.
' ** Creator: Ray
' ** Date: 10:02:11
' ** Modifier:
' ** Date: 10: 03 2007-3-5
' ** Description:
' ** Version: v1.0.0
' **************************************** *********************************

Private Withevents soapexecuter As Soappro. soapclientpro

Private   Sub Commandmediaclick ()
' Synchronous call
Msgbox Soapexecuter. executemethod ( " Helloworld " ) &   " _ Synchronous call "

' Asynchronous call. Note that the return value of asynchronous call is requesterid.
Call Soapexecuter. executeasyncmethod ( " Helloworld " )
End sub

Private   Sub Form_load ()
Set Soapexecuter =   New Soapclientpro
Soapexecuter. initialize " Http://www.ffrcw.com/service.asmx " , Version11
End sub

Private   Sub Soapexecuter_executecompleted (datas As   String , Requesterid As   String )
' Asynchronous call execution callback.
Msgbox Datas &   " _ Asynchronous call requesterid: "   & Requesterid
End sub