返回首页
当前位置: 主页 > 网络编程 > .Net实例教程 >

如何在ASP环境下利用SOAP来调用C#开发的Web Services

时间:2014-12-03 20:58来源:知行网www.zhixing123.cn 编辑:麦田守望者

作为.NET Web Services的斑竹,很多朋友都问我如何在其他环境下调用Web Services,
原理其实很简单,大家都知道Web Services是基于SOAP协议通信的,在其他环境下自然
可以利用SOAP来访问Web Services了。
下面我就一个具体的例子来说明调用过程。
开发环境:windows 2000
SOAP Tookit3.0
IIS
我用C#写了如下一个Web Services:
using System;
using System.Collections;
using System.ComponentModel;
using System.Data;
using System.Data.SqlClient;
using System.Diagnostics;
using System.Web;
using System.Web.Services;

namespace WebService_1
{
public class Service1 : System.Web.Services.WebService
{
string err_message;
SqlDataAdapter my_adapter ;
DataSet ds = new DataSet();
DataSet ds1 = new DataSet();
DataSet ds_err ;
DataSet ds_value = new DataSet();
DataTable myDataTable;
public Service1()
{
InitializeComponent();
}

private System.Data.SqlClient.SqlConnection sqlConnection1;

#region Component Designer generated code

//Web 服务设计器所必需的
private IContainer components = null;

/// <summary>
/// 设计器支持所需的方法 - 不要使用代码编辑器修改
/// 此方法的内容。
/// </summary>
private void InitializeComponent()
{
this.sqlConnection1 = new System.Data.SqlClient.SqlConnection();
//
// sqlConnection1
//
this.sqlConnection1.ConnectionString = "data source=QIEYJ;initial catalog=photos;persist security info=False;user id=sa;w" +
"orkstation id=QIEYJ;packet size=4096";

}

/// <summary>
/// 清理所有正在使用的资源。
/// </summary>
protected override void Dispose( bool disposing )
{
if(disposing && components != null)
{
components.Dispose();
}
base.Dispose(disposing);
}

#endregion
[WebMethod]
public DataSet Account_check(string username,string password,string template,string org_nummer)
{
string sql;
string cond;
cond = org_nummer.Trim().Replace(" ",",");
sql = "select * from Account where Username='" + username + "' and Password = '" + password + "'";
my_adapter = new SqlDataAdapter(sql,sqlConnection1);
sqlConnection1.Open();
my_adapter.Fill(ds,"login");
sqlConnection1.Close();
if (ds.Tables[0].Rows.Count == 0)
{
ds_err = new DataSet();
myDataTable = new DataTable("error");
DataColumn myDataColumn;
DataRow myDataRow;
myDataColumn = new DataColumn();
myDataColumn.DataType = System.Type.GetType("System.String");
myDataColumn.ColumnName = "error";
myDataTable.Columns.Add(myDataColumn);
myDataRow = myDataTable.NewRow();
myDataRow["error"] = "status=6 ";
myDataTable.Rows.Add(myDataRow);
ds_err.Tables.Add(myDataTable);
return ds_err;
}
//check if the customer have enough points
err_message = Points_check(template);
if (err_message != "")
{
ds_err = new DataSet();
myDataTable = new DataTable("error");
DataColumn myDataColumn;
DataRow myDataRow;
myDataColumn = new DataColumn();
myDataColumn.DataType = System.Type.GetType("System.String");
myDataColumn.ColumnName = "error";
myDataTable.Columns.Add(myDataColumn);
myDataRow = myDataTable.NewRow();
myDataRow["error"] = err_message;
myDataTable.Rows.Add(myDataRow);
ds_err.Tables.Add(myDataTable);
return ds_err;
}
//check if belong to some rules ,if no,return result
ds_err = Rules_check(template,cond);
return ds_err;
}
}
}

ASP文件:soapclient.asp
<html>
<head>
<title>Calling a webservice from classic ASP, using the SOAP Toolkit</title>
<script language="vbscript">
dim xmldoc
set xmldoc=createobject("msxml2.domdocument")
xmldoc.async=false
xmldoc.load "response.xml"
function showSource()
source.innerText=xmldoc.xml
end function

</script>
</head>
<body onload="showSource()" language="javascript">
<%
Dim username,password,template,org_number
username = trim(Request.Form("username"))
password = trim(Request.Form("password"))
template = trim(Request.Form("template"))
org_number = trim(Request.Form("org_number"))

Set xmldoc = server.createObject("Msxml2.DOMDocument")
xmldoc.async = false

If username <> "" Then
On Error Resume Next
Set soapclient = CreateObject("MSSOAP.SoapClient30")
soapclient.ClientProperty("ServerHTTPRequest") = True
soapclient.mssoapinit "http://localhost/webservice_1/Service1.asmx?wsdl","Service1","Service1Soap",""

Set NodeList = soapclient.Account_check(username,password,template,org_number)
Set nodeDetails = NodeList.Item(1)
Set nodeNAMNCount = nodeDetails.selectNodes("//org_nummer")

xmldoc.loadXML(NodeList.Item(1).xml)
xmldoc.save(server.MapPath("response.xml"))

if err <> 0 then
Response.Write err.description+ "<br>"
Response.Write "faultcode=" + soapclient.faultcode + "<br>"
Response.Write "faultstring=" + soapclient.faultstring+ "<br>"
Response.Write "FaultActor=" + soapclient.FaultActor+ "<br>"
Response.Write "Detail=" + soapclient.Detail
end if
End If
%>
<FORM method=post name=form>&nbsp;
<p align=center><BR>username:&nbsp;<INPUT name=username><BR>
<BR>password:&nbsp;<INPUT name=password><BR>
<BR>template:&nbsp;<INPUT name=template><BR>
<BR>org_number:<INPUT name=org_number><BR></p>
<div align=center><INPUT type="submit" value="submit" name=submit></div></FORM>
<p ><a href="response.xml" target="_blank">response.xml</a></p>
xml result:<div id=source></div>
</body>
</html>
 

------分隔线----------------------------
标签(Tag):C# C#实例教程 c#基础教程 C#源代码 c#技巧
------分隔线----------------------------
推荐内容
猜你感兴趣