【文件属性】:
文件名称:教育技术信息技术课程整合
文件大小:577KB
文件格式:RAR
更新时间:2012-01-16 13:36:43
信息技术
信息技术课程整合 河北师范大学login.asp页代码如下
===============================================
loginOK.asp页代码如下
===============================================
ID = request("ID")
PASS =request("PASS")
if ID="" then
response.write("")
response.end
elseif PASS="" then
response.write("")
response.end
end if
sql = "select * from user where ID='"&ID&"' and pass='"&PASS&"'"
set rs = conn.execute(sql)
if not rs.eof then
response.write("")
else
response.write("")
end if
set rs = nothing
*************************************************
这里的 user 是你的数据库里面保存用户信息的数据表,楼主改称自己的表名就可以了
另外,搂住得数据库是什么的??
access 还是 sql 的??
如果是access的
<%set conn=server.CreateObject("ADODB.connection")
conn.ConnectionString="driver={Microsoft Access Driver (*.mdb)};DBQ="&server.MapPath("数据库文件的路径")& ";uid=;PWD=;"
conn.open%>
如果是sql server的
<%
'----------------------------------------------------------
strSQLServerName = "127.0.0.1" '数据库服务器的ip
strSQLDBUserName = "sa" '用户名(一般不用变)
strSQLDBPassword = "12345456"'连接数据库的密码
strSQLDBName = "WebDB" '数据库名
'----------------------------------------------------------
Set conn = Server.CreateObject("ADODB.Connection")
connstr = "Provider=SQLOLEDB.1;Persist Security Info=False;Server=" & strSQLServerName & ";User ID=" & strSQLDBUserName & ";Password=" & strSQLDBPassword & ";Database=" & strSQLDBName & ";"
conn.Open connstr
%>