nome e cognome da visualizzare

[David_pop]

ho questo codice che rende la pagina "privata" con user e login, ma mi da errore di record non trovato, poiche voglio compaiano nome e cognome in base all'username del login...??

<%
Dim User
user= Request.QueryString("user")
scelta= Request.QueryString("scelta")
if scelta="0" then
sSQL = "SELECT * FROM Clienti WHERE user = ' " &user& " ' "
end if
set rs2 = conn.execute(sSQL)
if rs.recordcount=0 then
response.redirect("login.asp")
end if

%>

[optime]

Originariamente inviato da David_pop
ho questo codice che rende la pagina "privata" con user e login, ma mi da errore di record non trovato, poiche voglio compaiano nome e cognome in base all'username del login...??

<%
Dim User
user= Request.QueryString("user")
scelta= Request.QueryString("scelta")
if scelta="0" then
sSQL = "SELECT * FROM Clienti WHERE user = 'TOGLIQUESTOSPAZIO" &user& "TOGLIQUESTOSPAZIO' "
end if
set rs2 = conn.execute(sSQL)
if rs.recordcount=0 then
response.redirect("login.asp")
end if

%>

[David_pop]

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

line 166:
<font color="#FFFFFF"><%=(rs2.Fields.Item("nome").Value) %><input type="hidden" name="Nome" value="<%=(rs2.Fields.Item("nome").Value)%>">

<%=(rs2.Fields.Item("cognome").Value)%><input type="hidden" name="Cognome" value="<%=(rs2.Fields.Item("cognome").Value)%>">

[optime]

invece di

if rs.recordcount=0 then


usa

if rs.eof then

[David_pop]

fatto, ma errore identico..
?

[optime]

mmmmm vedo che usi sia rs2 che rs.... c'è qualche motivo o è solo un errore di battitura?

[David_pop]

beh prima di quel codice indicato vi è questo:


<%

Dim scelta
Dim prodotto
Dim Recordset2
Dim Recordset2_numRows
dim id

set conn = server.createObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb));DBQ=" & Server.MapPath("/mdb-database/e_db.mdb")

scelta= Request.QueryString("scelta")
prodotto = Request.QueryString("prodotto")

if scelta="0" then
sSQL = "SELECT * FROM Prodotti WHERE TitoloProdotto='"&prodotto&"'"
else
sSQL = "SELECT * FROM Prodotti WHERE id="&prodotto&""
end if
set rs = conn.execute(sSQL)
if not rs.EOF then
id=(rs.Fields.Item("ID").Value)
end if

%>

[optime]

non è una risposta alla mia domanda...

[David_pop]

perche da quello che avevo visto rs messo anche nel codice della tabella "clienti" andava in conflitto e dava errore..

[David_pop]

anzi no provando rs, al posto di rs2 non da errore, ma mi reinvia sempre alla pagina di login.asp

questo non capisco perche?