<% '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 %>
Új ügyfeleknek:

Regisztráció

Regisztrált ügyfeleknek

e-mail

<%=jelszo%>

Belépés  Jelszó emlékeztető  
<% end if %>