關于webservice的異步調用簡單實例
無論在任何情況下，被調用方的代碼無論是被異步調用還是同步調用的情況下，被調用方的代碼都是一樣的，

下面，我們就以異步調用一個webservice 為例作說明。
這是一個webservice

    _
    public function delcurtable(byval tbname as string) as boolean
        try
            return true
        catch ex as exception
            return false
        end try
    end function

關于這個webservice的同步調用方法，我就不做說明了
異步調用：
 private a as vbwebservice.datamanage'定義一個webservice變量
  dim ar as iasyncresult
public sub callback1(byval ar as iasyncresult)
''這里可以不寫任何代碼
'這里的代碼在調用方運行結束后，開始運行
end sub

#region "異步調用"
private sub btnstart_click()
dim cb as asyncallback=new asyncallback(address(me.callback1))
ar=a.begindelcurtable("zdf",cb,a)
end sub

private sub btnend_click()
if ar is nothing then
exit sub
end if
if  ar.iscompleted then
dim m as boolean=a.enddelcurtable(ar)
messagebox.show(m.tostring)
end if
end sub
#end region
注意：“返回異步調用的結果一次只能調用一次，如果想再執行一遍，就必須重新執行一遍begin的方法”
以上是vb.net的用法，下面是c#的用法
cwebservice.datamanage  a;
  system.iasyncresult ar;
  private void form1_load(object sender, system.eventargs e)
  {
   a=new cwebservice.datamanage();
  }

  
  public void callback1(system.iasyncresult ar)
  {
  }

  private void btnstart_click(object sender, system.eventargs e)
  {
   system.asynccallback cb=new asynccallback(this.callback1);
   ar=a.begindelcurtable("zhang",cb,a);
  }

  private void btnend_click(object sender, system.eventargs e)
  {
   if(ar==null)
   {
    messagebox.show("null");
    return ;
   }
   if(ar.iscompleted )
   {
    bool m=a.enddelcurtable(ar);
    messagebox.show(m.tostring());
   }
   else
   {
    messagebox.show("為完成");
   }
  }

商業源碼熱門下載www.html.org.cn