怎样从一个网站到另一个网站但是用户不变!难!
我有几个站 已经自己整合了。但是用户的数据可以同步了但是现在不能实现的是:
例如:我现在上www.com站 (登陆状态)
然后我进入下面的站 www.com/game/index.asp
问题就出来了,www.com进入www.com/game/index.asp 以后在没有显示会员的登陆信息,并且让我登陆。
我在www.com/game/index.asp站登陆返回 www.com 站也不行 都象分开了一样。
我想实现的效果是,如百度 sina 我登陆随便一个站,用户都是登陆状态!
大家说明写 怎么来实现 代码?
怎么写呢?是不是用cookies 但怎么实现 我不会!
这段是否有 cookies
<%
userName=trim(request("userName"))
password=trim(Request("password"))
userName1=trim(request("userName1"))
password1=trim(Request("password1"))
action=trim(Request("action"))
if HLIntegration = True and action="P" then
dim comeurl
usertype=request.Form("usertype")
ComeUrl=Request.ServerVariables("HTTP_REFERER")
Response.Write "<form name='upiform' id='upiform' action='"&HL_Url&Manage_Url&"User_ChkLogin.asp' method='post'>" & vbCrLf
Response.Write "<input type='hidden' name='UserName' value='"&userName&"'>" & vbCrLf
Response.Write "<input type='hidden' name='UserPassword' value='"&password&"'>" & vbCrLf
Response.Write "<input type='hidden' name='Usertype' value='"&usertype&"'>" & vbCrLf
Response.Write "<input type='hidden' name='ComeUrl' value='"&ComeUrl&"'>" & vbCrLf
Response.Write "</form>" & vbCrLf
Response.Write "<script language='JavaScript' type='text/javascript'>" & vbCrLf
Response.Write "<!--//Powered by PowerEasy Inc." & vbCrLf
Response.Write " upiform.submit();" & vbCrLf
Response.Write "//-->" & vbCrLf
Response.Write "</script>" & vbCrLf
End if
if HLIntegration = True and action="C" then
usertype=request.Form("usertype")
ComeUrl=Request.ServerVariables("HTTP_REFERER")
Response.Write "<form name='upiform' id='upiform' action='"&HL_Url&Manage_Url&"User_ChkLogin.asp' method='post'>" & vbCrLf
Response.Write "<input type='hidden' name='UserName' value='"&userName1&"'>" & vbCrLf
Response.Write "<input type='hidden' name='UserPassword' value='"&password1&"'>" & vbCrLf
Response.Write "<input type='hidden' name='Usertype' value='"&usertype&"'>" & vbCrLf
Response.Write "<input type='hidden' name='ComeUrl' value='"&ComeUrl&"'>" & vbCrLf
Response.Write "</form>" & vbCrLf
Response.Write "<script language='JavaScript' type='text/javascript'>" & vbCrLf
Response.Write "<!--//Powered by PowerEasy Inc." & vbCrLf
Response.Write " upiform.submit();" & vbCrLf
Response.Write "//-->" & vbCrLf
Response.Write "</script>" & vbCrLf
End if
if action="P" then
if userName="" then
%>