概括VB.NET创建WebService

VB.NET还是比较常用的，于是我研究了一下VB.NET创建WebService，在这里拿出来和大家分享一下，希望对大家有用。

VB.NET创建WebService.

具体步骤如下：

1. 新建一个项目，选择ASP.NET Web服务，命名为：“WebService For 业务层”。

2. 添加两个Sql DataAdapter，一个为Customer_da，它指向NorthWind数据库的Customers表，另一个为Order_da，指向Northwind数据库的Orders表。

3. 然后生成一个Typed DataSet（选择“数据”菜单的“生成数据集”），命名为：Super_ds.

4. 数据库连接已经完成，下一步我们将考虑它与表示层之间的通信，这里我们定义两个方法。一个为：Get_DataSet，它返回一个Super_ds类型的数据集，另一个为：Update_DataSet，它负责更新数据库数据，方法代码如下：

 
 
 
  
  
  Public Function Get_Dataset（） As super_ds    
  
  customer_da.Fill（Super_ds1.Customers）    
  
  order_da.Fill（Super_ds1.Orders）    
  
  Return Super_ds1    
  
  End Function    
  
     
  
  Public Sub Update_Dataset（）    
  
  Super_ds1.AcceptChanges（）    
  
  End Sub

你可以运行测试一下你的VB.NET建立WebService，它将提供两个方法。返回的DataSet是以XML表示的。

业务层的完整代码如下：

 
 
 
  
  
  Imports System.Web.Services    
  
  Public Class Service1    
  
  Inherits System.Web.Services.WebService    
  
  'Web Services Designer Generated Code……。    
  
     Public Function Get_Dataset（） As super_ds     
  
  customer_da.Fill（Super_ds1.Customers）    
  
  order_da.Fill（Super_ds1.Orders）    
  
  Return Super_ds1    
  
  End Function   
  
     Public Sub Update_Dataset（）     
  
  Super_ds1.AcceptChanges（）    
  
  End Sub   
  
  ' WEB SERVICE EXAMPLE    
  
  ' The HelloWorld（） example service returns the string Hello World.    
  
  ' To build， uncomment the following lines then save and build the project.    
  
  ' To test this web service， ensure that the .asmx file is the start page    
  
  ' and press F5.    
  
  '    
  
  '  Public Function HelloWorld（） As String    
  
  ' HelloWorld = "Hello World"    
  
  ' End Function    
  
  End Class

新闻标题：概括VB.NET创建WebService
本文URL：http://www.mswzjz.cn/qtweb/news20/429270.html

攀枝花网站建设、攀枝花网站运维推广公司-贝锐智能，是专注品牌与效果的网络营销公司；服务项目有等

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源：贝锐智能

贝锐智能技术为您推荐以下文章