您现在的位置： IT专家网 > Web服务子站 > 技巧

VB.Net编程实现Web Service的基础

作者: , 　出处:天极,　责任编辑: 叶江,　

2005-12-09 11:00

　　Web Service目前可是目前计算机界一个非常流行的技术了，以至于有些人把Web Service列入目前最热门的十大技术之一。本文的主要内容是简要介绍一下Web Service的相关知识，以及使用Visual Basic .Net实现Web Services的具体方法和典型步骤。

　9. 按照表01所示调整窗体中各组件属性的数值：

组件类型	组件名称	属性	设置结果
Form	Form1	Text	测试Web Service
	Form1	MaximizeBox	False
	Form1	FormBorderStyle	FixedSingle
Button	Button1	Text	绑定
	Button1	FlatStyle	Flat
	Button2	Text	修改
	Button2	FlatStyle	Flat

　　表01:【TestWebService】项目中组件的主要属性及其对应数值

　　在调整完组件属性值后，再按照图04所示调整组件的位置和排列顺序:

　　图04:【TestWebService】项目中组件排列位置和顺序

　　10. 把Visual Studio .Net的当前窗口切换到Form1.vb的代码编辑窗口，并用下列代码替换Form1.vb中的Button1的Click事件对应的处理代码，下列代码功能是使用Web Service中提供的"Binding"服务对DataGrid组件实现数据绑定:

Private Sub Button1_Click ( ByVal sender As System.Object , ByVal e As System.EventArgs ) Handles Button1.Click
　Dim MyService As New localhost.Service1 ( )
　DataGrid1.DataSource = MyService.Binding ( )
　DataGrid1.DataMember = "Cust"
End Sub

　　11. 用下列代码替换Form1.vb中的Button2的Click事件对应的处理代码，下列代码功能是使用Web Service中提供的"Update"服务实现通过DataGrid来修改数据库数据:

Private Sub Button2_Click ( ByVal sender As System.Object , ByVal e As System.EventArgs ) Handles Button2.Click
　Dim MyService As New localhost.Service1 ( )
　Dim ds As DataSet = DataGrid1.DataSource
　Dim dsChanges As DataSet = ds.GetChanges ( )
　If Not ( dsChanges Is Nothing ) Then
　　ds.Merge ( MyService.Update ( dsChanges ) , True )
　End If
End Sub

　　12. 至此, 【TestWebService】项目的全部工作就完成了，调用Web Service是不是很简单。此时单击快捷键F5运行程序后。单击程序中的【绑定】按钮就会对程序中的DataGrid组件实现数据绑定，单击程序中的【修改】按钮，则程序会根据DataGrid中的内容来更新数据库，图05就是【TestWebService】的运行界面: