最简单的数据库连接,asp连接access数据库

<%@ language="VBscript"%>
<%dim conn
set conn=server.createobject("adodb.connection")
constr="DBQ="+server.mappath("asd/argg.mdb")+";driver={Microsoft Access Driver (*.mdb)}"
conn.open constr
%>
这是连接的几行代码

<%dim rs
userID=request.form("userID")
passwd=request.form("passwd")
set rs=server.createobject("adodb.recordset")
sql="select * from user where username='"&userID&"'"
rs.open sql,conn,1,3
if not rs.eof then
   if rs("password")=md5(request.form("passwd")) then
      session("userID")=rs("username")
      session("userpass")=rs("password")
      rs.close
      conn.close
      set rs=nothing
      set conn=nothing
      response.redirect "liuyan.asp"
      response.end
   else
      rs.close
      conn.close
      set rs=nothing
      set conn=nothing
      response.redirect "error.asp?mis=1"
      response.end
   end if
else
   rs.close
   conn.close
   set rs=nothing
   set conn=nothing
   response.redirect "error.asp?mis=1"
   response.end
end if
%>
是个小例子哦!希望大家看的明白!
posted @ 2004-11-19 11:47  QDuck  阅读(6339)  评论(2编辑  收藏  举报