semplice lettura con flash-asp-mdb

[matral]

non capisco dove sbaglio.
qualcuno puo darmi una mano?
grazie

questa è prova.asp

<%@Language="VBScript"%>
<%
Dim Conn
Dim RS
Dim SQL

Set Conn = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.Recordset")

Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath("prova.mdb")
SQL = "SELECT * FROM agenti"

RS.Open SQL, Conn, 2, 3
leggi = leggi & RS("cognome") & ", " & RS("nome")
RS.MoveNext
Loop

RS.Close
Set RS = Nothing
Conn.Close
Set Conn = Nothing

Response.Write Server.URLEncode(leggi)
%>

questa è prova.swf

frame 1
loadVariablesNum("prova.asp", 0, "POST");

frame 2
c'è un campo di testo dinamico con il nome istanza leggi

il prova.swf lo chiamo da prova.html

mi restituisce questo valore
_level0.leggi

[DeR]

Prova

leggi = "leggi=" & RS("cognome") & ", " & RS("nome")

[serialkiller]

Originariamente inviato da DeR
Prova

leggi = "leggi=" & RS("cognome") & ", " & RS("nome")

Per quanto ne so è corretta la sintassi di matral

invece di leggere con loadVariablesNum usa loadVars() ke gestisci meglio le cose.

SK

[serialkiller]

errata corrige

il nel codice ASP manca il do

<%@Language="VBScript"%>
<%
Dim Conn
Dim RS
Dim SQL

Set Conn = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.Recordset")

Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath("prova.mdb")
SQL = "SELECT * FROM agenti"

RS.Open SQL, Conn, 2, 3

do while not rs.eof

leggi = leggi & RS("cognome") & ", " & RS("nome")
RS.MoveNext
Loop

RS.Close
Set RS = Nothing
Conn.Close
Set Conn = Nothing

Response.Write Server.URLEncode(leggi)
%>

a patto ke tu voglio questo, visto ke c'è l'istruzione loop....