Ciao a tutti
sto provando a realizzare un movie che richiama le news dal database.
il codice è questo:


<%
Response.Expires = 0
Dim rs, cn, sql
Set rs = Server.CreateObject("ADODB.Recordset")
Set cn = Server.CreateObject("ADODB.Connection")
cn.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/mdb-database/tbnews.mdb")

sql = "SELECT * FROM tbNews ORDER BY tbNews.IDNews DESC"

cn.Open


Set rs.ActiveConnection = cn
rs.CursorType = adOpenStatic
rs.LockType = adLockOptimistic
rs.Source = "tbNews"
rs.Open sql, cn

x = 0

Do until(x=5)
x = x + 1
Response.Write("titolo" & x & "=" & rs("Titolo") & "&link" & x & "=" & rs("Link"))
rs.MoveNext
If x<5 then Response.Write("&")
Loop

rs.Close
Set rs=Nothing
%>

_____________________________________________



mi da un errore error '80020009' alla linea 24

Response.Write("titolo" & x & "=" & rs("Titolo") & "&link" & x & "=" & rs("Link"))

qualcuno puo aiutarmi???
grazie