|
很长时间没写了
大概是这样吧:
<!--#include file = "../include/dbopen.asp"-->
<%
loginid=Lcase(trim(request("id")))
password=request("password")
set rs = Server.CreateObject ("ADODB.RecordSet")
sql = "SELECT user,PASWD from ecd200"
sql = sql & " WHERE USER ='" & loginid & "'"
sql = sql & " and PASWD ='" & password & "' "
set rs=dbconn.execute(sql)
If (rs.EOF or rs.BOF) Then
set rs2 = Server.CreateObject ("ADODB.RecordSet")
sql = "SELECT user,PASWD from ecd100"
sql = sql & " WHERE USER ='" & loginid & "'"
sql = sql & " and PASWD ='" & password & "' "
set rs2=dbconn.execute(sql)
If (rs2.EOF or rs.BOF) Then
%>
<script language="javascript">
alert("Error,Please input again!");
location.href = "../index.asp"
</script>
<% Else
'自己填入在第一个表增加的代码
Else
session("id") = rs("user")
session("passworld") = rs("paswd")
Response.Redirect "../login/main.asp"
End If
%>
|