教育技术信息技术课程整合

时间:2012-01-16 13:36:43
【文件属性】:
文件名称:教育技术信息技术课程整合
文件大小: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 %>

网友评论