errore nel codice

[michelet]

l'errore che mi dà è questo
ADODB.Recordset error '800a0cc1'

Impossibile trovare l'oggetto nell'insieme corrispondente al nome o al numero richiesto.

/login/lato.asp, line 216

il codice inserito e'
Response.Write Rs("<p align=""center""><font face=""Comic Sans MS"" size=""5"" color=""#6699ff""> "& Username &" </font></p>") & "
"

dove sto sbagliando?

[Roby_72]

Response.Write Rs ("<p align=""center""><font face=""Comic Sans MS"" size=""5"" color=""#6699ff""> "& Username &" </font></p>") & "
"

Rs cos'è???

Roby

[michelet]

ecco il codice completo

'Prendo il mese dalla data di sistema
Mese=DatePart("m",date())
' La data nel database deve essere formattata così: 10/08/1977
Set Rs=Conn.Execute("SELECT DOB,Username FROM tblAuthor")
IF Mese = 1 THEN Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""2"" color=""#FF0000"">Mese di Gennaio</font></p>")
IF Mese = 2 THEN Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""2"" color=""#FF0000"">Mese di Febbraio</font></p>")
IF Mese = 3 THEN Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""2"" color=""#FF0000"">Mese di Marzo</font></p>")
IF Mese = 4 THEN Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""2"" color=""#FF0000"">Mese di Aprile</font></p>")
IF Mese = 5 THEN Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""2"" color=""#FF0000"">Mese di Maggio</font></p>")
IF Mese = 6 THEN Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""2"" color=""#FF0000"">Mese di Giugno</font></p>")
IF Mese = 7 THEN Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""2"" color=""#FF0000"">Mese di Luglio</font></p>")
IF Mese = 8 THEN Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""2"" color=""#FF0000"">Mese di Agosto</font></p>")
IF Mese = 9 THEN Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""2"" color=""#FF0000"">Mese di Settembre</font></p>")
IF Mese = 10 THEN Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""2"" color=""#FF0000"">Mese di Ottobre</font></p>")
IF Mese = 11 THEN Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""2"" color=""#FF0000"">Mese di Novembre</font></p>")
IF Mese = 12 THEN Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""2"" color=""#FF0000"">Mese di Dicembre</font></p>")
Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""2"" color=""#FF0000"">i migliori Auguri a:</font></p>")
WHILE NOT Rs.EOF
IF Datepart("m",Rs("DOB"))=Mese THEN
Response.Write Rs("<p align=""center""><font face=""Comic Sans MS"" size=""5"" color=""#6699ff""> "& Username &" </font></p>") & "
"
END IF
Rs.Movenext
WEND
%>

[Roby_72]

Ho capito ma Rs in quella riga a che serve?
Toglilo no?

Roby

[michelet]

se lo tolgo non visualizza niente

[Roby_72]

IF Datepart("m",Rs("DOB"))=Mese THEN 
Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""5"" color=""#6699ff""> "& Username &" </font></p>") & "
" 
END IF

Se così non vsualizza nulla:
1) la condizione DatePart non è verificata
2) la variabile Username è vuota

Fai i dovuti controlli

Roby

[michelet]

ho risolto era solo due apicetti e rs messo accanto ad username

ora però non riesco a risolvere l'altro
uffa quello del nome utente

[optime]

quale?

[michelet]

il problema è questo vorrei far visualizzare il nome utente di una pagina protetta il nome utente è nel url non riesco a farlo ecco il codice

magari mi dici dove sbaglio
<%
'Dimension Variables
Dim strUserName 'Holds the name of the user
'Get the users name passed from the previous page
strUserName = Request.QueryString("name")

Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""3"" color=""#6699ff""> "& ("strUserName") & " </font></p>") & "
"
%>

[Roby_72]

Response.Write ("<p align=""center""><font face=""Comic Sans MS"" size=""3"" color=""#6699ff""> "& strUserName & " </font></p>") & "
" 
%>

Roby