recupero dati da db x Flash

[nextart]

devo recuperare dei dati da un db per poi passarli a Flash, quindi averli nella forma var=&nome&var2=&punti&.....

la pagina asp che mi fa questo e':

<%@LANGUAGE = JScript%>
<%
// apro connessione al db 
var Cn = new ActiveXObject("ADODB.Connection");
var Sc = "driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath("db1.mdb");
Cn.Open(Sc);
var sql = "SELECT * FROM classifica ORDER BY punti DESC";
// Viene effettuata la richieta
var rs = new ActiveXObject("ADODB.Recordset");
rs.Open(sql,Cn,3);
x=0;
while (!rs.EOF) {
x=x+1;
squadra1= rs("nome");
 punti1=rs("punti");
 reti_f1=rs("reti_f");
 reti_s1=rs("reti_s");
 diff_reti1=rs("diff_reti");
 media_ing1=rs("media_ing");
 
          Response.Write("squadra");
	         Response.Write(x);						 Response.Write("=");
		  Response.Write (squadra1);Response.Write ("&");
			  Response.Write("punti");
		                Response.Write(x);					 Response.Write("=");
		  Response.Write (punti1);Response.Write ("&");
			  Response.Write("reti_fatte");
			                Response.Write(x);
				 Response.Write("=");
		  Response.Write (reti_f1);Response.Write ("&");
			  Response.Write("reti_subite");
			                Response.Write(x);Response.Write("=");Response.Write (reti_s1);Response.Write ("&");
			  Response.Write("Diff._reti");
			                Response.Write(x);				 Response.Write("=");
	  Response.Write (diff_reti1);Response.Write ("&");
			  Response.Write("Media_ING");
			                Response.Write(x);					 Response.Write("=");
	  Response.Write (media_ing1);Response.Write ("&");		  	      
    rs.MoveNext();
  }


// chiudo la connessione per il menu a tendina
  Cn.Close();
%>

voi direte ma sei pazzo?
infatti.
basterebbe scrivere cosi' al posto del codice evidenziato in blututto su una riga)
come da guida

Response.Write("squadra"&x&"=" & rs("nome") & "&punti"&x&"=" & _rs("punti") & "&reti_f"&x&"=" & rs("reti_f") & "&reti_s"&x&"=" & _rs("reti_s") & "&diff_reti"&x&"=" & _rs("diff_reti") & "&media_ing"&x&"=" & _rs("media_ing"));

ma sfortunatamente mi da errore:
Microsoft JScript runtime error '800a138f'

Object expected

/public/fantacalcio/clas.asp, line 14
--------------------------------------------------------------------^

come corregge la sintassi?

grazie....

[nextart]

RISOLTO.

La pagina e' diventata cosi':

<%
Set ConnMDB= Server.CreateObject("ADODB.Connection") 
ConnMDB.Open "driver={Microsoft Access Driver(*.mdb)};dbq="&Server.MapPath("db1.mdb") 

sql = "SELECT * FROM classifica ORDER BY punti DESC"
// Viene effettuata la richieta
Set rs = Server.CreateObject("ADODB.Recordset") 
rs.Open sql,ConnMDB,1

x=0
while (not rs.EOF) 
x=x+1
Response.Write("squadra"&x&"=" & rs("nome") & "&punti"&x&"=" & rs("punti") & 

"&reti_fatte"&x&"=" & rs("reti_f") & "&reti_subite"&x&"=" & rs("reti_s") & 

"&diff._reti"&x&"=" & rs("diff_reti") & "&media_ing"&x&"=" & rs("media_ing")&"&")
    rs.MoveNext()
  Wend


// chiudo la connessione per il menu a tendina
  ConnMDB.Close()
%>

risultato a video:

squadra1=Nextart&punti1=5&reti_fatte1=2&reti_subit e1=1&diff._reti1=11&media_ing1=0&squadra2=F.C. MiBs&punti2=3&reti_fatte2=3&reti_subite2=4&diff._r eti2=40&media_ing2=-2&squadra3=A.C. Trezzano&punti3=3&reti_fatte3=0&reti_subite3=1&dif f._reti3=1&media_ing3=0&squadra4=ASR 1927&punti4=2&reti_fatte4=2&reti_subite4=1&diff._r eti4=1&media_ing4=1&squadra5=A.C. Skunk&punti5=1&reti_fatte5=2&reti_subite5=0&diff._ reti5=0&media_ing5=11&

grazie....