are
bebin file verify.asp ro edit kon va code zir ro bezar toosh
----------------------------------------------------------------------------------------
<!--#include file="includes/config.asp" -->
<!--#include file="includes/dbc.asp" -->
<%
username=request("username")
username = Replace(username, "'", "''")
password=request("password")
set objrs=server.createobject("adodb.recordset")
strsql="Select * From tbl_Users where username='" & Username & "'"
objrs.open strsql, objconn
if not objrs.eof then
if objrs("password")=password then
session("login")=true
session("userid")=objrs("id")
session("usernamesession")=objrs("username")
session("passwordsession")=objrs("password")
end if
end if
objrs.close
set objrs = nothing
objconn.close
set objconn=nothing
if request("redirect")<>"" then
response.redirect "Default.asp?Login"
else
response.redirect "default.asp?"
end if
%><!--#include file="shop/includes/login.asp" -->