select

[emmebbì]

Tipo non corrispondente: '[string: "SELECT * FROM t_emai"]'
/prototipo/PerCastomizzare.asp, line 207



Sql = "SELECT * FROM t_email WHERE id_ricevente=" + rs_utente("id_utente")+ " ORDER BY data DESC"

[burruchaga]

data dovrebbe essere una parola riservata del SQL.

prova a scrivere
".... order by [data] DESC"
se non funziona scrivi

Sql = "SELECT * FROM t_email WHERE id_ricevente=" + rs_utente("id_utente")+ " ORDER BY data DESC"
response.write(sql):response.end

e dicci copsa ti stampa

[emmebbì]

non scrive niente; cosa mi consigli?

[burruchaga]

come fa a non stampare niente? scusa?
posta il codice intero.... magari con in grassetto la parte interessata

[emmebbì]

<%
dbName = "database/db_demo.mdb"
set Cn = Server.CreateObject("ADODB.Connection")
Cn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath(dbName))
Sql = "SELECT * FROM t_email WHERE id_ricevente=" + rs_utente("id_utente")+ " ORDER BY [data] DESC"

set MostraMessaggi = Server.CreateObject("ADODB.Recordset")
MostraMessaggi.Open Sql,Cn,1

pag = CInt(Request.QueryString("id"))
if (isNumeric(pag) or pag < 1) then
pag = 1
end if
if ( NOT MostraMessaggi.EOF) then
MostraMessaggi.PageSize = 20
MostraMessaggi.AbsolutePage = pag
end if
i = 0
str = "SELECT COUNT(*) AS id FROM t_email WHERE id_ricevente =" + rs_utente("id_utente")
ContaDiscussioni = Cn.Execute(str)
%>

[burruchaga]

e con

<% 
dbName = "database/db_demo.mdb" 
set Cn = Server.CreateObject("ADODB.Connection") 
Cn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath(dbName)) 
Sql = "SELECT * FROM t_email WHERE id_ricevente=" + rs_utente("id_utente")+ " ORDER BY [data] DESC" 

response.write(Sql)
response.end

set MostraMessaggi = Server.CreateObject("ADODB.Recordset") 
MostraMessaggi.Open Sql,Cn,1 

pag = CInt(Request.QueryString("id")) 
if (isNumeric(pag) or pag < 1) then 
pag = 1 
end if 
if ( NOT MostraMessaggi.EOF) then 
MostraMessaggi.PageSize = 20 
MostraMessaggi.AbsolutePage = pag 
end if 
i = 0 
str = "SELECT COUNT(*) AS id FROM t_email WHERE id_ricevente =" + rs_utente("id_utente") 
ContaDiscussioni = Cn.Execute(str) 
%>

non scrive nulla?

[emmebbì]

mi da lo stesso errore, se invece al posto di

id_ricevente=" + rs_utente("id_utente")

metto


id_ricevente=1


mi stampa la select

[burruchaga]

ma il recordset rs_utente dove lo setti?


lo setti vero?

[colde]

Prova magari così:

Cint(rs_utente("id_utente"))

[emmebbì]

eccolo

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