VB.NET中的簡單Web Service例程
本文和附帶的源碼向您演示了在.NET開發環境下創建一個WEB服務是如何得簡單，同時演示了客戶端如何使用這個WEB服務。例程創建了一個計算器的簡單WEB服務，它有三個方法：加、減和除。
下載文件包WebService_mehta.zip包含所有演示文件： Calculator.asmx
HTMLClient.Html
InetClient (VB6 Project)
Calculator.asmx代碼
<%@ WebService Language ="Vb" Class="Calculator" %>
'這個實例演示了簡單的WEB服務
'計算器有三個WEB方法作基本計算
'標記 <WebMethord()>導出方法
option strict off
Imports System.Web.Services
Public Class Calculator: Inherits WebService
Public Function <WebMethod()> Add(Num1 as integer,Num2 as integer)
As Integer
return Num1 + Num2
End Function
Public Function <WebMethod()> Substract(Num1 as integer,Num2 as
integer) As Integer
return Num1 - Num2
End Function
Public Function <WebMethod()> Divide(Num1 as integer,Num2 as
integer) As Integer
return Num1 / Num2
End Function
End class
Calculator.asmx有三個方法，它們都接受參數Num1和Num2，然後執行算數計算返回一個整數值。
在IIS下將Calculator.asmx發佈到任何一個虛擬目錄下，從瀏覽器中訪問，如下：
http://<server>/<virtualdirectory>/Calculator.asmx
你會看到一個「計算器Web服務」的描述頁面，頁面顯示被導出的並且可以在同一個頁面調用的三個方法。
創建HTML 客戶端
<html>
<h1> Web服務演示 </h1>
<body bgcolor = pink>
<form id = frm method=POST >
Web服務的URL，例如： http://server/service1.asmx <br>
<input type = text id = ServiceLocation style="WIDTH:
322px;"><br><br>
Num1 : <input type="text" size="5" name='Num1' \"><br>
Num2 : <input type="text" size="5" name='Num2' \"><br><br> <input type = button Value = 加 onclick = "Add()">
<input type = button Value = 減 onclick = "Substract()">
<input type = button Value = 除 onclick = "Divide()">
</form>
<script Language = "vbScript">
Sub Add
msgbox frm.ServiceLocation.value
frm.action = frm.ServiceLocation.value & "/Add"
frm.submit
end sub
sub Substract
frm.action = frm.ServiceLocation.value & "/Substract"
frm.submit
end sub
sub Divide
frm.action = frm.ServiceLocation.value & "/Divide"
frm.submit
end sub
</script>
</body>
</html>
客戶端頁面提交數據到Calculator.asmx的Web服務頁面，返回的結果是XML形式的。
WinInet 客戶端
WinInet 客戶端使用 win32 用戶界面接受數據，然後提交給Calculator.asxm Web 服務，返回的XML結果經過客戶端的分析提取以文本方式顯示出來。
|
|
當前位置：開發者網絡 >> 技術教程 >> .NET教程 >> Web Service開發 >> 內容
