本来新闻系统中有独立的用户管理数据库，后来用户需要直接采用论坛帐号直接登陆．所以就加了个验证.conn.asp里直接连接动网论坛的数据库．代码不是很复杂，主要是一个思路.根据这个原理可以做简单的网站整合．

<!--#include file="md5.asp"-->
<%
 dim sql
 dim rs
 dim username
 dim password
 dim access
 access=request.Form("access")
 username=trim(request.Form("username"))
 password=md5(trim(Request.Form("password")))
%>
<!--#include file="conn.asp"-->
<%
sql="select * from Dv_User where username='"&username&"'"
 rs.open sql,conn,1,1
  if not(rs.bof and rs.eof) then
   if password=rs("userpassword") then
   Session("Sys_Admin") = username　''发送用户名
   Session("Sys_Level") = "1" ''权限等级
   Response.Redirect "admin.asp"
   else
      call Error
   end if
      else
       call Error()
 end if
 rs.close
 conn.close
 set rs=nothing
 set conn=nothing
%>

<%sub Error() %>
        <script language="JavaScript">
    alert(' 确认身份失败!')
    window.history.go(-1);
  </script>
 <%end sub%>