% Session.Timeout = 20 Dim Conn dim lf public SQL dim cnt dim cnt1 dim strall cnt = 0 cnt1 = 0 ' Set Conn = Server.CreateObject("ADODB.Connection") ' Conn.Open "DBQ=" & Server.Mappath("Data/data.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};" 'if CStr(request.form("postr")) = "true" then ' SQL = "select * from member where memberID = '" & trim(request.form("memberID")) & "' and password = '" & trim(request.form("password")) & "'" ' Set rsuser = conn.Execute(SQL) ' if rsuser.bof = true and rsuser.eof = true then ' response.redirect "login.asp?lf=true" ' else ' lf = "true" ' end if 'end if %>
|
|
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Home | About
Us | Contact Us
© Copyright 2005, Spiritual Science & Research Foundation. All Rights Reserved.