Shulou(Shulou.com)06/02 Report--

VB.NET how to achieve Web Service, many novices are not very clear about this, in order to help you solve this problem, the following editor will explain for you in detail, people with this need can come to learn, I hope you can gain something.

Implementing Web Service with VB.NET

Net greatly promotes the development of Web Service, while the emergence of Visual Studio .NET greatly promotes the wide application of Web Service. Before the introduction of Visual Studio .NET, writing a Web Service was a very complex task, and it was also cumbersome to call this Web Service. Because Visual Studio .NET provides strong support for Web Service, a lot of meticulous and cumbersome work is done automatically by Visual Studio .NET. This makes the above work very simple. Without even knowing Web Service and its related standards and protocols, you can write Web Service in Visual Studio .NET and use this Web Service. Let's use VB.NET to implement a Web Service, this Web Service is related to the database, the database type is SqlServer. This Web Service provides two function calls, one of which is called Binding to implement data binding and the other is called Update to update the data in the database.

Here are the specific steps for VB.NET to implement Web Service:

1. Start Visual Studio .NET.

two。 After selecting the menu [File] | [New] | [Project], the [New Project] dialog box pops up.

3. Set [Project Type] to [VB Project].

4. Set [template] to [ASP.NET Web Service].

5. After typing "http://localhost/UpdateDataWebService"" in the text box of [location], click the [OK] button to create a folder named "UpdateDataWebService" in the default directory of the computer's Internet information service in Visual Studio .NET, which contains the files for the project.

6. Select the Service1.asmx file in solution Explorer, right-click, and select View Code from the pop-up menu to enter the editing interface of Service1.asmx.vb.

7. At the beginning of Service1.asmx..vb, add the following code to the code area of the import namespace, which is used to import the namespace System.Data.SqlClient:

Imports System.Data.SqlClient

8. After the "Public Class Service1 Inherits System.Web.Services.WebService" code in the Service1.asmx..vb file, add the following code, which defines two function calls in WebService:

Public Function Binding () As DataSet Dim con As New SqlConnection ("Server = localhost; uid = sa; pwd =; database = northwind") Dim daCust As New SqlDataAdapter ("Select * From Customers", con) Dim ds As New DataSet () daCust.Fill (ds, "Cust") Return ds End Function Public Function Update (ByVal ds As DataSet) As DataSet Dim con As New SqlConnection ("Server = localhost; uid = sa; pwd = Database = northwind ") Dim daCust As New SqlDataAdapter (" Select * From Customers ", con) Dim cbCust As New SqlCommandBuilder (daCust) daCust.Update (ds," Cust ") Return ds End Function

9. Save the above changes, a simple operation of the Sql Server database Web Service is completed, click the shortcut key F5, the Web Service will start to run, and can provide services.

Imports System.Web.Services Imports System.Data.SqlClient Public Class Service1 Inherits System.Web.Services.WebService Public Function Binding () As DataSet 'Modify this Connection string to use your SQL Server and log on. Dim con As New SqlConnection ("Server=localhost;uid=sa;pwd=;database=northwind") Dim daCust As New SqlDataAdapter ("Select * From Customers", con) Dim ds As New DataSet () daCust.Fill (ds, "Cust") Return ds End Function Public Function Update (ByVal ds As DataSet) As DataSet Dim con As New SqlConnection ("Server=localhost;uid=sa;pwd= Database=northwind ") Dim daCust As New SqlDataAdapter (" Select * From Customers ", con) Dim cbCust As New SqlCommandBuilder (daCust) daCust.Update (ds," Cust ") Return ds End Function # Region" Web service designer generated code "Public Sub New () MyBase.New () 'this call is required by the Web service designer. InitializeComponent () 'add your own initialization code End Sub required by the Web service designer after the InitializeComponent () call Note: the following procedure is required by the Web service designer. This procedure can be modified using the Web service designer. 'don 't use the code editor to modify it. Private Sub InitializeComponent () components = New System.ComponentModel.Container () End Sub Protected Overloads Overrides Sub Dispose (ByVal disposing As Boolean) 'CODEGEN: this procedure is required by the Web service designer' do not modify it using a code editor. If disposing Then If Not (components Is Nothing) Then components.Dispose () End If End If MyBase.Dispose (disposing) End Sub # End Region 'Web Service sample' HelloWorld () sample service returns the string HelloWorld. To build the project, uncomment the following line, and then save and build the project. To test this Web service, make sure the .asmx file is the start page and press F5. '' Public Function HelloWorld () As String 'HelloWorld = "HelloWorld"' End Function End Class is helpful to you after reading the above content? If you want to know more about the relevant knowledge or read more related articles, please follow the industry information channel, thank you for your support.

Welcome to subscribe "Shulou Technology Information " to get latest news, interesting things and hot topics in the IT industry, and controls the hottest and latest Internet news, technology news and IT industry trends.