<< Implementing ASMX Web Service Part 1 - Service | Implementing WCF Service Part 1 - Service >>

Implementing ASMX Web Service Part 2 - Client

by Vishwa 18. January 2008 20:17

VIn this post, the web service created in Part 1 will be consumed into a web page through Server Side Web Service Integration, Client Side SOAP XML HTTP Post, HTTP Form Post and Get. Following are the steps.

1. Publish your ASMX Web Service on your local machine under IIS 5.1/6.0/7.0, in this example my published web service is located at my local machine: http://vishwa/examplewebservice/customerwebservice.asmx

2. Create a Web Site in Visual Studio 2008/5

3. Add a Page called CustomerWebServiceTest.aspx, it will automatically added a code behind page CustomerWebServiceTest.aspx.vb

4. Right Click on your Web Site Project and Add Web Reference by adding the published web service URL, give a local name to this Web Service Reference, in this example I named CustomerWebService.

5. Add the following code in the Page

CustomerWebServiceTest.aspx : Add following code in this page

           <%@ Page Language="VB" AutoEventWireup="false" CodeFile="CustomerWebServiceTest.aspx.vb" Inherits="CustomerWebServiceTest" %>

          <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

          <html xmlns="http://www.w3.org/1999/xhtml">

          <head runat="server">

          <title>Test ASMX Web Service</title>

          </head>

        < <body>   

          <h2>Test Customer ASMX Web Service</h2>

          <form id="frmCustServer" runat="server">

              <div>

              <table>

               <tr>

                  <td colspan="2"><b>Through Server Side Web Service Reference</b></td>

              </tr>

              <tr>

                  <td >Customer ID :</td>

                  <td><asp:TextBox ID="txtCustID" runat="server" Text="12345"></asp:TextBox></td>

              </tr>     

              <tr>

                  <td>Customer Name :</td>

              <td>

                  <asp:TextBox ID="txtCustName" runat="server" Text="Joe Smith"></asp:TextBox>

              </td>

              </tr>

              <tr>

                  <td>Customer DOB (yyyy-mm-dd):</td>

                  <td><asp:TextBox ID="txtCustDOB" runat="server" Text="1980-08-08"></asp:TextBox></td>

              </tr>

              <tr>

                  <td>Customer Address:</td>

                  <td><asp:TextBox ID="txtCustAddress" runat="server" Text="unknown"></asp:TextBox></td>

              </tr>

                <tr>

                  <td><asp:Button ID="btnGetCustomer" runat="server" Text="Get Customer" /></td>

                  <td><asp:Button ID="btnAddCustomer" runat="server" Text="Add Customer" /></td>

              </tr>

              <tr>

                  <td> <asp:Button ID="btnUpdateCustomer" runat="server" Text="Update Customer" /></td>

                  <td><asp:Button ID="btnDeleteCustomer" runat="server" Text="Delete Customer" /></td>

              </tr>

              <tr>

                  <td>

                  <asp:Button id="btnGetCustomers" runat="server" Text="Get All Customers"/></td>

                  <td><asp:Label ID="lblStatus" runat="server" Text="Status" 

                          ForeColor="#CC3300" style="font-weight: 700"></asp:Label></td>

              </tr>

              </table>

         </div>       

          </form> 

          <br />

          <form id="frmCustomerS" method="post" action="CustomerWebServiceTest.aspx">

          <div>    

              <table>

              <tr><td colspan="2"><b>Through Client Side SOAP/XML HTTP POST</b></td></tr>

              <tr><td>Customer ID :</td><td><input name="ID" id="ID" type="text" value="12345" /> </td></tr>

              <tr><td>Customer Name :</td><td><input name="Name" id="Name" type="text" value="Chris Clark" /> </td></tr>

              <tr><td>Customer DOB (yyyy-mm-dd):</td><td><input name="DOB" id="DOB" type="text" value="1980-08-08"/> </td></tr>

              <tr><td>Customer Address:</td><td><input name="Address" id="Address" type="text" value="unknown"/> </td></tr>

               <tr>

                  <td><input type="button" name="btnGetCustomer" value="Get Customer" onclick="GetCustomerSOAP()" /></td>

                  <td><input type="button" name="btnAddCustomer" value="Add Customer" onclick="AddCustomerSOAP()" /></td>

              </tr>

               <tr>

                  <td><input type="button" name="btnUpdateCustomerS" value="Update Customer" onclick="UpdateCustomerSOAP()" /></td>

                  <td><input type="button" name="btnDeleteCustomerS" value="Delete Customer" onclick="DeleteCustomerSOAP()"/></td>

              </tr>     

              <tr>

                  <td colspan="2"><input type="button" name="btnGetCustomersS" value="Get All Customers" onclick="GetCustomersSOAP()"/></td>

              </tr>   

              </table>

          </div>   

          </form>

           <br />

          <form id="frmCustomerPost" method="post" action="http://vishwa/examplewebservice/customerwebservice.asmx/GetCustomer">

          <div>    

              <table>

              <tr><td colspan="2"><b>Through Client Side HTML Form HTTP POST</b></td></tr>

              <tr><td>Customer ID :</td><td><input name="ID" type="text" value="969225896" /> </td></tr>

               <tr>

                  <td colspan="2"><input type="submit" name="btnGetAllCustomers" value="Get Customer"/></td>

              </tr>   

              </table>

          </div>   

          </form>

          <form id="frmCustomerGet" method="get" action="http://vishwa/examplewebservice/customerwebservice.asmx/GetCustomer">

          <div>    

              <table>

              <tr><td colspan="2"><b>Through Client Side HTML Form HTTP GET</b></td></tr>

              <tr><td>Customer ID :</td><td><input name="ID" type="text" value="969225896" /> </td></tr>

               <tr>

                  <td colspan="2"><input type="submit" name="btnGetAllCustomers" value="Get Customer"/></td>

              </tr>   

              </table>

          </div>   

          </form>

          <script type="text/javascript" language="javascript">

              var urlToPost = "http://vishwa/examplewebservice/customerwebservice.asmx";

              var fixedSoapAction = "http://webservices.vishwamohan.net/";

              var serviceNameSpace = "\"http://webservices.vishwamohan.net\"";

              var d = new Date();

              function getFullDate()

                  {

                  if (d.getDate()<10) 

                      return "0" + d.getDate(); 

                  else 

                      return d.getDate();

                   } 

               function getFullMonth()

                  {

                  if (d.getMonth()<10) 

                      return "0" + parseInt(d.getMonth()+1); 

                  else 

                      return parseInt(d.getMonth()+1);

                   }   

              var curdate = d.getFullYear() + "-" + getFullMonth()+ "-" + getFullDate();

               function GetCustomerSOAP() 

                  {

                    var dataText = "<?xml version=\"1.0\" encoding=\"utf-8\"?><soap:Envelope xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\"";

                        dataText = dataText + " xmlns:xsd=\"http://www.w3.org/2001/XMLSchema\" xmlns:soap=\"http://schemas.xmlsoap.org/soap/envelope/\">"; 

                        dataText = dataText + " <soap:Body><GetCustomer xmlns=" + serviceNameSpace + ">"; 

                        dataText += " <ID>" + frmCustomerS.ID.value + "</ID>"; 

                        dataText += " </GetCustomer>"; 

                        dataText += " </soap:Body></soap:Envelope>";

                        alert(dataText);

                    var xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");                  

                        xmlHttp.open("POST", urlToPost,false);               

                        xmlHttp.setRequestHeader("Content-Type", "text/xml");

                        xmlHttp.setRequestHeader("SOAPAction", fixedSoapAction +"GetCustomer");

                        xmlHttp.send(dataText);

                        alert(xmlHttp.responseText);

                  }

                  function GetCustomersSOAP() 

                  {

                    var dataText = "<?xml version=\"1.0\" encoding=\"utf-8\"?><soap:Envelope xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\"";

                        dataText = dataText + " xmlns:xsd=\"http://www.w3.org/2001/XMLSchema\" xmlns:soap=\"http://schemas.xmlsoap.org/soap/envelope/\">"; 

                        dataText = dataText + " <soap:Body><GetCustomers xmlns=" + serviceNameSpace + ">"; 

                        dataText += " </GetCustomers>"; 

                        dataText += " </soap:Body></soap:Envelope>";

                        alert(dataText);

                    var xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");                  

                        xmlHttp.open("POST", urlToPost,false);               

                        xmlHttp.setRequestHeader("Content-Type", "text/xml");

                        xmlHttp.setRequestHeader("SOAPAction", fixedSoapAction +"GetCustomers");

                        xmlHttp.send(dataText);

                        alert(xmlHttp.responseText);

                  }

              function AddCustomerSOAP() 

                  {

                     var dataText = "<?xml version=\"1.0\" encoding=\"utf-8\"?><soap:Envelope xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\"";

                        dataText += " xmlns:xsd=\"http://www.w3.org/2001/XMLSchema\" xmlns:soap=\"http://schemas.xmlsoap.org/soap/envelope/\">"; 

                        dataText += " <soap:Body><AddCustomer xmlns=" + serviceNameSpace + "> <CustomerRecord>";

                        dataText += " <ID>0</ID><Name>" + frmCustomerS.Name.value + "</Name><DOB>" + frmCustomerS.DOB.value +"</DOB>" ;

                        dataText += " <Address>" + frmCustomerS.Address.value + "</Address>";

                        dataText += " <DateCreated>" + curdate + "</DateCreated><DateModified>" + curdate + "</DateModified>" ;

                        dataText += " </CustomerRecord></AddCustomer>"

                        dataText += " </soap:Body></soap:Envelope>";

                        alert(dataText);

                    var xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");                  

                        xmlHttp.open("POST", urlToPost,false);               

                        xmlHttp.setRequestHeader("Content-Type", "text/xml");

                        xmlHttp.setRequestHeader("SOAPAction", fixedSoapAction +"AddCustomer");

                        xmlHttp.send(dataText);

                        alert(xmlHttp.responseText);

                  }

                  function UpdateCustomerSOAP() 

                  {

                     var dataText = "<?xml version=\"1.0\" encoding=\"utf-8\"?><soap:Envelope xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\"";

                        dataText += " xmlns:xsd=\"http://www.w3.org/2001/XMLSchema\" xmlns:soap=\"http://schemas.xmlsoap.org/soap/envelope/\">"; 

                        dataText += " <soap:Body><UpdateCustomer xmlns=" + serviceNameSpace + "> <CustomerRecord>";

                        dataText += " <ID>" + frmCustomerS.ID.value + "</ID><Name>" + frmCustomerS.Name.value + "</Name><DOB>" + frmCustomerS.DOB.value +"</DOB>" ;

                        dataText += " <Address>" + frmCustomerS.Address.value + "</Address>";

                        dataText += " <DateCreated>" + curdate + "</DateCreated><DateModified>" + curdate + "</DateModified>" ;

                        dataText += " </CustomerRecord></UpdateCustomer>"

                        dataText += " </soap:Body></soap:Envelope>";

                        alert(dataText);

                    var xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");                  

                        xmlHttp.open("POST", urlToPost,false);               

                        xmlHttp.setRequestHeader("Content-Type", "text/xml");

                        xmlHttp.setRequestHeader("SOAPAction", fixedSoapAction +"UpdateCustomer");

                        xmlHttp.send(dataText);

                        alert(xmlHttp.responseText);

                  }

                   function DeleteCustomerSOAP() 

                  {

                    var dataText = "<?xml version=\"1.0\" encoding=\"utf-8\"?><soap:Envelope xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\"";

                        dataText = dataText + " xmlns:xsd=\"http://www.w3.org/2001/XMLSchema\" xmlns:soap=\"http://schemas.xmlsoap.org/soap/envelope/\">"; 

                        dataText = dataText + " <soap:Body><DeleteCustomer xmlns=" + serviceNameSpace + ">"; 

                        dataText += " <ID>" + frmCustomerS.ID.value + "</ID>"; 

                        dataText += " </DeleteCustomer>"; 

                        dataText += " </soap:Body></soap:Envelope>";

                        alert(dataText);

                    var xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");                  

                        xmlHttp.open("POST", urlToPost,false);               

                        xmlHttp.setRequestHeader("Content-Type", "text/xml");

                        xmlHttp.setRequestHeader("SOAPAction", fixedSoapAction +"DeleteCustomer");

                        xmlHttp.send(dataText);

                        alert(xmlHttp.responseText);

                  }

          </script>

          </body>

         </html>

CustomerWebServiceTest.aspx.vb : Add following code in code behind

          Partial Class CustomerWebServiceTest

          Inherits System.Web.UI.Page

          Protected Sub btnGetCustomer_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnGetCustomer.Click

              Dim webSrv As New CustomerWebService.CustomerWebService

              Dim cust As CustomerWebService.Customer = webSrv.GetCustomer(CInt(Me.txtCustID.Text))

              If cust.ID > 0 Then

                  Me.txtCustID.Text = cust.ID

                  Me.txtCustName.Text = cust.Name

                  Me.txtCustDOB.Text = cust.DOB

                  Me.txtCustAddress.Text = cust.Address

                  Me.lblStatus.Text = "Customer found."

              Else

                  Me.lblStatus.Text = "Customer not found."

                  Me.txtCustName.Text = ""

                  Me.txtCustDOB.Text = ""

                  Me.txtCustAddress.Text = ""

              End If

          End Sub

          Protected Sub btnAddCustomer_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnAddCustomer.Click

              Dim webSrv As New CustomerWebService.CustomerWebService

              Dim cust As New CustomerWebService.Customer

              cust.Name = Me.txtCustName.Text

              cust.Address = Me.txtCustAddress.Text

              cust.DOB = CDate(Me.txtCustDOB.Text)

              Dim rtn As Integer = webSrv.AddCustomer(cust)

              Me.txtCustID.Text = rtn.ToString

              lblStatus.Text = "Cust ID: " & rtn.ToString

          End Sub

          Protected Sub btnUpdateCustomer_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnUpdateCustomer.Click

              Dim webSrv As New CustomerWebService.CustomerWebService

              Dim cust As New CustomerWebService.Customer

              cust.ID = CInt(Me.txtCustID.Text)

              cust.Name = Me.txtCustName.Text

              cust.DOB = CDate(Me.txtCustDOB.Text)

              cust.Address = Me.txtCustAddress.Text

              Dim rtn As Boolean = webSrv.UpdateCustomer(cust)

              lblStatus.Text = "Update Status is : " & rtn.ToString

          End Sub

          Protected Sub btnDeleteCustomer_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnDeleteCustomer.Click

              Dim webSrv As New CustomerWebService.CustomerWebService

              Dim rtn As Boolean = webSrv.DeleteCustomer(CInt(Me.txtCustID.Text))

              lblStatus.Text = "Delete Status is : " & rtn.ToString

          End Sub

          Protected Sub btnGetCustomers_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnGetCustomers.Click

              Dim webSrv As New CustomerWebService.CustomerWebService

              Dim custArr() As CustomerWebService.Customer

              custArr = webSrv.GetCustomers()

              For Each cust As CustomerWebService.Customer In custArr

                  Response.Write("ID: " & cust.ID.ToString & " Name: " & cust.Name & "<br/>")

              Next

              lblStatus.Text = "No of Customer Records found: " & custArr.Length.ToString

          End Sub

         End Class

Now Run your website and test your service, you should be able to test each process. The page at run time looks like…

e870551a-315e-47b9-bc10-6b84acb1cc02|2|3.0

Tags: WebService

.NET

Implementing ASMX Web Service Part 1 - ServiceYou must be wondering, that in WCF era ASMX Web Service! I wrote the first one 5 years ago and now t...Implementing WCF Service Part 1 - ServiceAs you know, the New Windows Communication Services (WCF) will replace the existing ASP.NET ASMX Web...Implementing WCF Service Part 4 - POX/RESTThis post will focus on implementing POX (Plain Old XML) and REST (Representational St...