Email o Nome?

[fraude]

Ciao, faccio un controllo su alcuni campi di un dbase in questo modo:

Ssql = "SELECT email, nome FROM tb1 WHERE email='" &request("email")& "' OR nome='" &request("nome")& "' "
Set Rec = Server.CreateObject("ADODB.Recordset") 
Rec.Open Ssql, Conn, 3, 3 

if not Rec.bof and not Rec.eof then 
response write "errore"

se almeno uno dei campi email o nome esiste già la procedura segnala errore.
La domanda è: come faccio a discriminare ed a stampare a video il giusto errore, cioè se successivamente al controllo nel dbase quello che già esiste è l'email o il nome? :master:

[Roby_72]

Dovresti fare due query...

Roby

[fraude]

Originariamente inviato da Roby_72
Dovresti fare due query...

Roby

Grazie Roby, ho già provato ma non capsico perchè va in blocco lo script... restituisce una tristissima pagina web bianca...

[Roby_72]

Vediamo cosa hai scritto...

Roby

[fraude]

Originariamente inviato da Roby_72
Vediamo cosa hai scritto...

Roby

Set Rec = Server.CreateObject("ADODB.Recordset") 

Ssql = "SELECT email FROM tb1 WHERE email='" &request("email")& "' "
Rec.Open Ssql, Conn, 3, 3 

Ssqlx = "SELECT nome FROM tb1 WHERE nome='" &request("nome")& "' "
Rec.Open Ssqlx, Conn, 3, 3 

if not Rec.bof and not Rec.eof then 
response write "errore"

[Roby_72]

Set Rec = Server.CreateObject("ADODB.Recordset") 

Ssql = "SELECT email FROM tb1 WHERE email='" &request("email")& "' "
Rec.Open Ssql, Conn, 3, 3 
if not Rec.bof and not Rec.eof then 
response write "errore email"
end if
Rec.Close 

Ssqlx = "SELECT nome FROM tb1 WHERE nome='" &request("nome")& "' "
Rec.Open Ssqlx, Conn, 3, 3 
if not Rec.bof and not Rec.eof then 
response write "errore nome"
end if
Rec.Close 
set Rec=nothing

Roby

[deivnet]

Invece di fare due query, perchè non controllare i valori di email e nome presi dalla query.

Se tu fai questa query

Ssql = "SELECT email, nome FROM tb1 WHERE email='" &request("email")& "' OR nome='" &request("nome")& "' "
Set Rec = Server.CreateObject("ADODB.Recordset") 
Rec.Open Ssql, Conn, 3, 3 

if not Rec.bof and not Rec.eof then 
response write "errore"

Se ci sono dei dati, controlla quale dei due campi è valorizzato,
se il campo email o il campo nome, se entrambi lo sono hai il doppio errore una cosa del genere

if Not IsNull(Rec("email")) AND Not IsEmpty(Rec("email")) AND Rec("email") <> "" then
'Errore sulla mail
end if

if Not IsNull(Rec("nome")) AND Not IsEmpty(Rec("nome")) AND Rec("nome") <> "" then
'Errore sul nome
end if