%
'Dim sPassword
'Dim sUser
suser=""
sPassword=""
sUser=cstr(request.form("USER"))
sPassword=cstr(request.form("PASSWORD"))
if (sUser<>"" and sPassword<>"") then
sql="select * from gold_vevo_szemely where vevo_szemely_email='"+suser+"' and vevo_szemely_jelszo='"+spassword+"'"
shsql(sql)
Set lista=cnnsearch.execute(sql)
if not lista.eof then
Session("BELEP")="1"
Session("USER_ID")=lista("vevo_szemely_kod")
Session("USER_EMAIL")=lista("vevo_szemely_email")
Session("USER_TELEFON")=lista("vevo_telefon")
Session("usernev")=lista("vevo_szemely_vezeteknev") + " "+lista("vevo_szemely_keresztnev")
Session("user_szamlanev")=lista("vevo_szamlanev")
Session("user_szamlacim")=lista("vevo_szamlairsz") & " " & lista("vevo_szamlavaros") & " " & lista("vevo_szamlacim")
Session("user_cim")= lista("vevo_irsz") & " " & lista("vevo_varos") & " " & lista("vevo_cime")
end if
end if
if Session("BELEP")<>"1" then
%>
<%
end if
%>