ASP integration of dynamic network forum

Http://www.it130.net/asp-asp.net/13488.htm
Specific requirements: add an online forum to the original website to meet the following requirements: 1. Members of the original website no longer need to log on to the Forum after logging on to the original website portal, this is the so-called one-stop login, and the member information must be modified simultaneously with the Forum information after the original website is modified.

Responder 1 : The simplest method is to write the user table of your website and session to the place where the user table of the mobile network writes cookies to your website. ASP Tail.

Responder 2 : The easiest way is to log on to the Forum automatically before you open the connection, Code As follows:
Dim username, password
Username = SESSION ("_ username ")
Password = SESSION ("_ userpass ")
If username <> "" And Password <> "" then
If 1 = 1 then
With response
. Write ("<Form ID = 'loginbbs 'name = 'loginbbs' method = 'post' action = 'bbs/login. asp? Action = chk '> ")
. Write ("<input id = 'username' name = 'username' type = hidden value =" & username & "> ")
. Write ("<input id = 'Password' name = 'Password' type = hidden value =" & password & "> ")
. Write ("</form> ")
. Write ("<script language = 'javascript '> document. All ['loginbbs']. Submit (); </SCRIPT> ")
End
Else
Response. Write (username)
Response. Write ("<br/> ")
Response. Write (password)
End if
End if

In login. asp, replace the following code with the last one.
'Here is the page redirection
'Dim tempstr
'Tempstr = template.html (2)
'If dvbbs. forum_chansetting (0) = 1 and dvbbs. forum_chansetting (10) = 1 and dvbbs. forum_chansetting (12) = 1 then
'Tempstr = Replace (tempstr, "{$ ray_logininfo}", template.html (3 ))
'Else
'Tempstr = Replace (tempstr, "{$ ray_logininfo }","")
'End if
'Tempstr = Replace (tempstr, "{$ comeurl}", comeurl)
'Tempstr = Replace (tempstr, "{$ comeurlinfo}", comeurlname)
'Tempstr = Replace (tempstr, "{$ forumname}", dvbbs. forum_info (0 ))
'Response. Write tempstr
'Tempstr = ""
Response. Redirect (comeurl) 'direct

Responder 3 : Thank you very much for your help, especially the solution provided by ilik (※ ※nirvana). At present, the login problem has been solved, followed by the user's Forum permissions, you should be able to solve this problem by yourself.