少し無知強制ウェブサーバのアクセス
「定義されたWebサーバのアドレス
薄暗いpostUrl として 文字列 = 「」
「定義されたWebサーバ希望のxml文字列パラメータ
薄暗いxmlRequest として 文字列 = 「」
「取得ウェブサーバリターン情報
薄暗いresponseText として 文字列 = 「」
「伝送文字エンコーディングの定義
DIM URLENCODE として System.Text.Encoding = System.Text.Encoding.GetEncoding（"UTF-8" ）
「XMLの文字列引数をに変換し、バイト配列
DIM POSTDATA（）として System.Byte = URLEncode.GetBytes（xmlRequest）
「取得のxml文字列の長さのパラメータ転送を
薄暗いxmlRequestLength として整数 = postdata.Length
「定義XMLHTTPのアクセスウェブサーバ、覚え輸入（マイクロソフトXMLで、V6.0）MSXML2
薄暗いoXMLHttp として 新 XMLHTTP60（）
oXMLHttp.open（"ポスト"、postUrl、偽）
oXMLHttp.setRequestHeader（"Content-Typeの"、 "text / xmlで;のcharset = UTF-8"）
oXMLHttp.setRequestHeader（"コンテンツ長"、xmlRequestLength）
oXMLHttp.setRequestHeader（"言語を受け入れる"、"ZH-CN" ）
（oXMLHttp.setRequestHeader "のSOAPAction" 、http://tempuri.org/"+webserverの特定の方法+」）
oXMLHttp.setRequestHeader（"ホスト"、"WebサーバのサーバのIP" ）
oXMLHttp.send（xmlRequest）
responseText = oXMLHttp.responseText