consulta access con asp y flash

Hola amigos, pido de su ayuda tengo este codigo que al ejecutar manda todos los datos de la columna en un texinput de flash, funciona perfectamente con flash placer 6 pero necesito que sea con flash playes 8 cuando lo guardo y ejecuto el reproductor me indica que el script lo esta alentando y pide cancelar el script

FLASH

loadVariables(\"Sev1.asp\", this);
var DFNoRep = (totreg);
for (i=1; i<=DFNoRep; i++) {
this.Mailtxt += this[\"MailSev\"+i]+\",\";
}
if (i=DFNoRep) {
stop();
}

ASP

<%@ Language=VBScript %>
<%Response.Expires=-10000
response.addHeader \"pragma\",\"no-cache\"
response.addHeader \"cache-control\",\"private\"
Response.CacheControl = \"no-cache\"
%>
<%

Dim oConn, strSQL, objRS

Set oConn = Server.CreateObject(\"ADODB.Connection\")

oConn.Open(\"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"agenda.mdb\"))

strSQL = \"SELECT * FROM agenda where sev1= \'X\'\"

Set objRS = oConn.Execute(strSQL)

x=1

while (not objRS.Eof)

Response.Write \"&sev1\"&x&\"=\" & objRS(\"Email\")

objRS.MoveNext
x=x+1

wend

Response.write \"&totreg=\"&x-1

oConn.Close
set objRS = nothing
set oConn = nothing

%>

Por favor díganme de que otra manera puedo jalar toda la información de una columna de access y que se despliegue en un texinput

Usa un objeto LoadVars (como explican los tutoriales de carga de datos que encontrarás en este mismo sitio)

Jorge