dim proxy as GetHttpHeadersProxy=new GetHttpHeadersProxy proxy.AddHttpHeader("name","aowind") proxy.AddHttpHeader("pwd","123456")
接下来就是WEB服务方面的验证方法了。
<%@ WebService Language="vb"Class =Class="believing.Believing" %> Imports System Imports System.Web.Services Imports System.IO Imports System.Collections PublicStructure httpheaderStructure httpheader Public name AsString Public value AsString End Structure <System.Web.Services.WebService(Namespace :Namespace:="http://hx66.com", Description:="身份验证服务")> _ PublicClass BelievingClass Believing Inherits System.Web.Services.WebService <WebMethod(Description:="<font color=green>身份验证方法</font>")> _ PublicFunction lianzheng()Function lianzheng() AsString dim name,pwd asstring name=Context.Request.Headers("name") pwd=Context.Request.Headers("pwd") If (用户表中存在name) And (用户表中存在pwd) Then Try . Catch ex As Exception Return ex.ToString EndTry Return"OK!" Else Return"用户名或都密码有误,请求不于处理" EndIf End Function