%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
dim msg
msg=""
if Request.ServerVariables("REQUEST_METHOD")="POST" then
strsql = "select * from Main where Userid='"&request.form("loginname")&"' and Password = '"&request.form("password")&"'"
'Response.Write(strsql)
set rsLogin = Server.createobject("Adodb.Recordset")
rsLogin.open strsql, objConn
'Response.Write(rsLogin.eof)
'Response.End()
if rsLogin.eof=false then
session("login") = 2
session("LogId")=rsLogin("ID")
response.redirect("Forms/Default.asp")
else
msg="Sorry, Userid / Password Combination Incorrect"
end if
'response.redirect("index.htm")
end if
%>
Welcome to Leuva Patidar Samaj of USA
Search
:
Download
Leuva Connection
Official Magazine of LPS of USA