当前位置: 移动技术网 > IT编程>开发语言>Asp > Discuz!NT 论坛整合ASP程序论坛

Discuz!NT 论坛整合ASP程序论坛

2017年12月12日  | 移动技术网IT编程  | 我要评论
复制代码 代码如下:

<%@language="vbscript" codepage="65001"%>
<!--#include virtual="/inc/md5.asp"-->
<!--#include virtual="/inc/conn.asp" -->

<%
'16 md5 1234656789 323b453885f5181f
' discuz 25f9e794323b453885f5181f1b624d0b
'response.write(md5("123456789"))
'response.write("cookie:"&request.cookies("dnt")("userid"))
dim username:username = request.form("username")
dim password:password = request.form("password")

set objrs = conn.execute("select * from member_user where username = '"&username"'")
if not objrs.eof then
response.write(objrs("userpassword"))

set conn2 = server.createobject("adodb.connection")
conn2.open "provider = sqloledb; user id = sa; password = 123456; initial catalog = dnt; data source = mww\sqlexpress;"


set objrs2 = conn2.execute("select * from [dnt_users] where username='"&username"'")
if not objrs2.eof then
response.write("<br />"&objrs2("uid")"<br />")
response.write(objrs2("password")"<br />")
response.write(objrs2("tpp")"<br />")
response.write(objrs2("ppp")"<br />")
response.write(objrs2("pmsound")"<br />")
response.write(objrs2("invisible")"<br />")
response.write(objrs2("sigstatus")"<br />")

'userid=2&password=0p273vmb%2bonhszsw%2fttgpb%2fz4pb7cbwl&avatar=avatars%5ccommon%5c0.gif&tpp=0&ppp=0&pmsound=1&invisible=0&referer=index.aspx&sigstatus=1&expires=-1
'产生cookie
response.cookies("dnt")("userid") = objrs2("uid")
response.cookies("dnt")("password") = objrs2("password")
response.cookies("dnt")("tpp") = objrs2("tpp")
response.cookies("dnt")("ppp") = objrs2("ppp")
response.cookies("dnt")("pmsound") = objrs2("pmsound")
response.cookies("dnt")("invisible") = objrs2("invisible")
response.cookies("dnt")("referer") = "index.aspx"
response.cookies("dnt")("sigstatus") = objrs2("sigstatus")
'response.cookies("dnt")("expires") = expires
'if expires<>0 then
'response.cookies("dnt").expires = dateadd("n", expires, now())
'end if
response.cookies("dnt").domain = ".ejia.com" '修改为你的域名,注意前面带.(点)

response.cookies("dnt").secure = false



end if
objrs2.close
set objrs2 = nothing
conn2.close
set conn2 = nothing

end if
objrs.close
set objrs = nothing
conn.close
set conn = nothing
%>
<form action="cookie.asp" method="post">
用户名:<input type="text" name="username" /><br />
密码:<input type="text" name="password" />
<input type="submit" value="登陆" />
</form>

1、将common项目中的md5函数代码更改为:
return system.web.security.formsauthentication.hashpasswordforstoringinconfigfile(str, "md5").tolower().substring(8, 16);实现主站与论坛统一加密方式。因为discuz默认是32位加密,但整合的asp是16位加密,如果是32位,则不需要修改。

2、将common项目中的encode和decode改成直接返回。

如对本文有疑问, 点击进行留言回复!!

相关文章:

验证码:
移动技术网