Ragazzi ho questo problema. Ho un sito in flash. Vorrei interfacciarlo con un db Access in modo che nella home.swf del sito si richiamino dei campi di un database e da un pannello di amministrazione sempre in Flash si modifichino i contenuti del sito.

<%
'<< intercetta l'azione del bottone
action = Request("action")
answer = Request("answer")
if action = "rd" Then
RD() '<< scrive
elseif action = "sg" Then
' L'applicazione prima inserisce i dati nel DB e dopo manda i dati per le statistiche

SG() '<< legge
RD() '<< srive
else
message = "Nessuna striga SQL presente"
response.write ("message=" +URLEncode(message)+"&cconfirm=1")
response.end
End If

'<< Funzione scrittura dati nel database
Function SG()
'<< apertura e collegamento database
Dim Con, rs, strSQL
Set Con = Server.CreateObject ("ADODB.Connection")
Con.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&_
server.MapPath("NOME_DB.mdb")

Set rs = server.CreateObject ("ADODB.Recordset")
strSql="Select * From NOME_TABELLA"
rs.Open strSql, con, 3, 3

'<< da flash gli passiamo la variabile della risposta e aggiorniamo il database

If answer="1" Then
rs.Fields("primo")= Request.Form("primo")
rs.Fields("primoo")= Request.Form("primoo")
rs.Fields("sec")= Request.Form("sec")

End If

rs.Update
rs.Close

End Function

'<< Funzione lettura dati dal database
Function RD()
'<< apertura e collegamento database
Dim Con, rs, strSQL
Set Con = Server.CreateObject ("ADODB.Connection")
Con.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&_
server.MapPath("NOME_DB.mdb")

Set rs = server.CreateObject ("ADODB.Recordset")
strSql="Select * From NOME_TABELLA"
rs.Open strSql, con, 3, 3
'<< leggiamo i dati nel db e visualizzati nel form di flash

response.write ("&primo" & "="+ rs("primo"))
response.write ("&secondo" & "="+ rs("secondo"))
response.write ("&terzo" & "="+ rs("terzo"))

response.write ("&loaded=1")

End Function
%>

Questo è il codice della pagina asp che poi richiamo da Flash con:

loadVariables ("paginaasp.asp?action=sg/rd", this);


Ma non funziona!!