asp 单点登录问题xmlhttp方法求解

function PosstHttpPage(refererUrl,PostUrl,PostData)

Dim XmlHttp,RetStr
Set xmlHttp=CreateObject("Msxml2.XMLHTTP")
xmlHttp.Open "POST",PostUrl,False
xmlHttp.setRequestHeader "Content-Length",Len(PostData)
xmlHttp.setRequestHeader "Content-Type","application/x-www-form-urlencoded"
xmlHttp.setRequestHeader "referer",refererUrl
xmlHttp.Send PostData

if Err.Number<>0 then
set xmlHttp=Nothing
PostHttpPage="$False$"
Exit Function
end if
PostHttpPage=bytesToStr(xmlHttp.responseBody,"UTF-8")
Set xmlHttp=Nothing
End Fuciton

Function BytesToStr(strBody,CodeBase)
dim Obj
set Obj=Server.CreateObject("Adodb.Stream")
obj.Type=1
obj.Mode=3
obj.Open
obj.Write strBody
obj.Position=0
obj.Type=2
obj.Charset=CodeBase
BytesToStr=obj.ReadText
obj.Close
set obj=nothing
End Function

PostHttpPage "http://10.146.2.110","http://10.146.2.110/default.asp","UserName=test&Pwd=test"
response.write "http://10.146.2.110","http://10.146.2.110/default.asp","UserName=test&Pwd=test"


'''''"http://10.146.2.110" 为登录的页面
''''''http://10.146.2.110/default.asp 为要登录进后显示的页面
现http://10.146.2.110页面中有输入UserName和pwd的通过from 的post 激发action=default.asp来进入default.asp
请问高手们怎么在一个ASP系统的节点中,点击后可以免登录进另一个ASP的系统,即进default.asp



求解,以上代码不能实现,请帮我改改.或提供更了的方案.分数在结帖时另加100,非常感谢.

使用cookie（浏览器本地储存）+url重写 来解决你的问题
具体写法自己找