当前位置: 移动技术网 > IT编程>开发语言>.net > ASP类型个人网站与动网整合非官方方法

ASP类型个人网站与动网整合非官方方法

2019年01月19日  | 移动技术网IT编程  | 我要评论

qvod 幼女,泉州分类信息,98版水浒传

个人网站如有会员注册模块+动网的话,那网站要与动网论坛整合,实现不同web系统之间的用户信息同步更新、登录等操作就不是件容易的事了,虽然动网已提供有详细的"动网论坛系统api接口开发人员指南",但像我这样的菜鸟一时半会可是参详不透的,汗。不甘心,在对其登录、验证等函数进行一番研究再加以测试后最终竟也小有所成,菜鸟也有菜鸟的办法,哈哈。

一、网站文件结构

wwwroot
  ┝ index.
  ┝ checkuserlogin.asp
  ┕ bbs/

二、整合原理

对于同步更新实现不困难,整合主要问题就是难在同步登录,所以我们的重点都将放在讨论如何实现同步登录上。我的方法是将主站用户表整合至动网用户表dv_user中(免去以后得更新两个库的麻烦),可按需要在dv_user新增字段,并对bbs/login.asp和bbs/inc/dv_clsmain.asp做适当的修改;登录时将表单发至bbs/login.asp进行验证;主站根据动网登录成功后在session记录的信息判断是否登录成功,并取得用户资料。

三、新增修改文件

1.index.asp code:

<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=gb2312" />
<title>个人网站与动网整合(www.mzwu.com)</title>
</head>

<body>
<!--#include file="checkuserlogin.asp" -->
<%
if checkuserlogin then
    response.write("<a href=""bbs/logout.asp?back=1"">退出登陆</a><p></p>")
    response.write("用户名:" & request.cookies("username") & "<br>")
    response.write("性别:" & request.cookies("sex") & "<br>")
    response.write("注册时间:" & request.cookies("joindate") & "<br>")
    response.write("最后登录:" & request.cookies("lastlogin") & "<br>")
    response.write("登录次数:" & request.cookies("userlogins") & "<br>")
    response.write("类型:" & request.cookies("browser") & "<br>")
    response.write("浏览器版本:" & request.cookies("version") & "<br>")
    response.write("操作系统:" & request.cookies("platform") & "<br>")
else
%>
<form id="form1" name="form1" method="post" action="bbs/login.asp?action=chk&back=1">
  用户名:
    <input name="username" type="text" id="username" size="10" />
    <br />
    密  码:
    <input name="password" type="password" id="password" size="10" />
    <input type="submit" name="submit" value="登录" />
</form>
<%
end if
%>
<p></p><a href="bbs/">进入论坛</a>
</body>
</html>


2.checkuserlogin.asp code:
<!--#include file="bbs/inc/dv_clsmain.asp"-->
<%
function checkuserlogin()
    dim dvbbs,usersession
    const msxmlversion=".3.0"
    set dvbbs = new cls_forum
    set usersession=server.createobject("msxml2.freethreadeddomdocument"& msxmlversion)
    if usersession.loadxml(session(dvbbs.cachename & "userid")&"") then
        if usersession.documentelement.selectsinglenode("userinfo/@userid").text<>"0" then
            在论坛登录成功
            checkuserlogin = true
            下边是用户一些信息的获取方法,可自行将其保存于cookies或session中便于使用:
            用户id      :  usersession.documentelement.selectsinglenode("userinfo/@userid").text
            用户名      :  usersession.documentelement.selectsinglenode("userinfo/@username").text
            生日        :  usersession.documentelement.selectsinglenode("userinfo/@userbirthday").text
            电子邮箱    :  usersession.documentelement.selectsinglenode("userinfo/@useremail").text
            性别        :  usersession.documentelement.selectsinglenode("userinfo/@usersex").text  0为女,1为男
            注册时间    :  usersession.documentelement.selectsinglenode("userinfo/@joindate").text
            最后登录    :  usersession.documentelement.selectsinglenode("userinfo/@lastlogin").text
            登录次数    :  usersession.documentelement.selectsinglenode("userinfo/@userlogins").text
            金钱        :  usersession.documentelement.selectsinglenode("userinfo/@userwealth").text
            积分        :  usersession.documentelement.selectsinglenode("userinfo/@userep").text
            魅力        :  usersession.documentelement.selectsinglenode("userinfo/@usercp").text
            最后登录ip  :  usersession.documentelement.selectsinglenode("userinfo/@userlastip").text
            浏览器类型  :  usersession.documentelement.selectsinglenode("agent/@browser").text
            浏览器版本  :  usersession.documentelement.selectsinglenode("agent/@version").text
            操作系统    :  usersession.documentelement.selectsinglenode("agent/@platform").text
            来访ip      :  usersession.documentelement.selectsinglenode("agent/@ip").text
            举例应用:
            response.cookies("username") = usersession.documentelement.selectsinglenode("userinfo/@username").text
            response

如对本文有疑问,请在下面进行留言讨论,广大热心网友会与你互动!! 点击进行留言回复

相关文章:

验证码:
移动技术网