Problemi di sessione

[djjunior]

Carissimi,
visionate questo script:

<%
Email = Replace(Request.Form("Email"), "'", "''")
Pass = Replace(Request.Form("Pass"), "'", "''")

bol1 = false: bol2 = false

sql1 = "SELECT Email FROM tabella1 WHERE Email = '" & Email & "'"
Set rs1 = conn.Execute(sql1)

if not rs1.EOF then
bol1 = true

sql2 = "SELECT Email FROM tabella2 WHERE Email = '" & Email & "'"
Set rs2 = conn.Execute(sql2)

if not rs2.EOF then
bol2 = true

end if

set rs2 = nothing
end if
set rs1 = nothing

if bol1 and bol2 then

Email = Replace(Request.Form("Email"), "'", "''")
Pass = Replace(Request.Form("Pass"), "'", "''")

sql = "SELECT Email, pass, id FROM tabella1 WHERE Email = '" & Email & "' AND pass = '" & pass & "'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, Conn, 3, 3

if rs.eof then
autenticato2 = false
else
autenticato2 = true
end if 

if autenticato2 = true then
Session("autenticato2") = rs("id")

response.redirect("oralorposter.asp")
else
Response.Redirect("../relogin.asp")
end if

else


Email = Replace(Request.Form("Email"), "'", "''")
Pass = Replace(Request.Form("Pass"), "'", "''")

sql = "SELECT Email, pass, id FROM tabella2 WHERE Email = '" & Email & "' AND pass = '" & pass & "'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, Conn, 3, 3

if rs.eof then
autenticato2 = false
else
autenticato2 = true
end if 

if autenticato2 = true then
Session("autenticato2") = rs("id")
Response.Redirect ("oralintro.asp")

else

Email = Replace(Request.Form("Email"), "'", "''")
Pass = Replace(Request.Form("Pass"), "'", "''")

sql = "SELECT Email, Pass, id FROM tabella1 WHERE Email = '" & Email & "' AND Pass = '" & Pass & "'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, Conn, 3, 3


if rs.eof then
autenticato2 = false
else
autenticato2 = true
end if 

if autenticato2 = true then
Session("autenticato2") = rs("id")


Response.Redirect ("intro.asp")

else
Response.Redirect("../relogin.asp")

rs.close
conn.Close
Set rs = Nothing
Set conn = Nothing
end if
end if
end if
%>

Vi spiego cosa dovrebbe processare:
In pratica deve controllare che la Email sia presente uguale su 2 tabelle se si dovrebbe aprirmi una sessione che inviasse alla pagina oralorposter.asp dove ho messo una possibilità di accesso ORAL o POSTER che si seleziona tramite una select, ora andando al POSTER che si trova su TABELLA 1 tutto ok, mentre andando ad ORAL che si trova su TABELLA2 non trova l'id per visionarmi i dati, presumo che sia un problema di sessione, lo script comunque continua che se invece la Email non e presente uguale su 2 tabelle deve trovare su quale TABELLA si trova ed effettuare la query, accedendo alla propria pagina.
Ma il problema mio è proprio quando è presente su tutte e 2 le tabelle che deve inviarmi a questa pagina di scelta oralorposter.asp e selezionando uno a l'altro la sessione sia identica senza usufruire dell'id che da una tabella a l'altra può variare, spero di essermi spiegato bene.
Grazie per l'aiuto che potrete darmi.
G.

[djjunior]

nessuno può aiutarmi?