熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> Delphi編程 >> 正文

如何在各種開發語言中調用WEBService

2013-11-11 21:04:32  來源: Delphi編程 
HTML網頁中調用方法
  〈form target=_blank action= method=POST
  〈table cellspacing= cellpadding= frame=box bordercolor=#dcdcdc rules=none
  〈tr〉
  〈td class=frmHeader background=#dcdcdc 〉參數〈/td〉
  〈td class=frmHeader background=#dcdcdc〉值〈/td〉
  〈/tr〉
  〈tr〉
  〈td class=frmText 〉sTypeNum:〈/td〉
  〈td〉〈input class=frmInput type=text size= name=sTypeNum〉〈/td〉
  〈/tr〉
  〈tr〉
  〈td〉〈/td〉
  〈td align=right〉 〈input type=submit value=調用 class=button〉〈/td〉
  〈/tr〉
  〈/table〉
  〈/form〉
  
  實例:如何調用服務產生位關鍵值
  
  相關文檔: 使用vbscript腳本調用web服務
  
  ASP中調用方法(SOAP方式)
  實例:如何使用asp調用服務產生位關鍵值 asp源文件代碼
  
  說明:總的來講采用webservice的列表頁說明來構造不同的SoapRequest然後從返回xmlDoc中取返回值xmlDOCgetElementsByTagName
  
  ASP中調用方法(HTTP方式)
  實例:如何使用asp調用服務產生位關鍵值 asp源文件代碼
  
  VB中調用方法
  Dim strxml As String
  Dim str As String
  str = TextText
  定義soap消息
  strxml = xmlns:xsi=
  xmlns:xsd=
  xmlns:soap=> & str &
  
  定義一個http對象一邊向服務器發送post消息
  Dim h As MSXMLServerXMLHTTP
  定義一個XML的文檔對象將手寫的或者接受的XML內容轉換成XML對象
  Dim x As MSXMLDOMDocument
  初始化XML對象
  Set x = New MSXMLDOMDocument
  將手寫的SOAP字符串轉換為XML對象
  xloadXML strxml
  初始化http對象
  Set h = New MSXMLServerXMLHTTP
  向指定的URL發送Post消息
  hopen POST False
  hsetRequestHeader ContentType text/xml
  hsend (strxml)
  While hreadyState <>
  Wend
  顯示返回的XML信息
  TextText = hresponseText
  將返回的XML信息解析並且顯示返回值
  Set x = New MSXMLDOMDocument
  xloadXML TextText
  TextText = xchildNodes()Text
  
  VBNET中調用方法
  首先添加web引用地址為:
  
  定義:dim sCom as New netydcomwwwS_COMM
  
  調用:dim strCZID as string = sCommGetCZID()
  
  實例:如何使用VBNET調用服務產生位關鍵值 VBNET源文件代碼
  
  PBNET(PB)中調用方法
  SoapConnection conn
  Test_wsservicesoap sCom
  long rVal
  //string str_endpoint
  //str_endpoint =
  conn = create SoapConnection
  rVal = ConnCreateInstance(sCom test_wsservicesoap)
  sle_text = sComGetCZID())
  destroy conn
From:http://tw.wingwit.com/Article/program/Delphi/201311/8420.html
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.