questo è il codice asp che hai fatto:
<%@ language="VBScript" %>
<% option explicit %>
<%
'### definizione variabili
Dim strFile, strID, strPWD, strCheck
Dim dataConn, rs
'### imposta il percorso del database
strFile = Server.MapPath("../mdb-database/Db.mdb")
'### legge le variabili passate da FLASH
strID = LCase(Server.URLEncode(Request.Form("id")))
strPWD = LCase(Server.URLEncode(Request.Form("pwd")))
'### imposta la variabile usata da FLASH come controllo
strCheck = "NO"
'### apre la connessione con il DB
set dataConn = server.createobject("adoDB.connection")
dataConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & strFile
'### estrae la password dell'utente dal DB (se esiste)
Set rs = Server.CreateObject("adoDb.recordset")
rs.open "SELECT * FROM utenti WHERE Usern='" & strID & "'", dataConn, 1, 3
'### verifica la password del DB con quella passata da FLASH e conta gli accessi
If Not rs.EOF Then
If strPWD = rs.fields("Password") Then
strCheck = "OK" '### se la password corrisponde
session("idamm")= rs.fields("idamm")'### se la password corrisponde
End If
End If
'### chiude la connessione con il DataBase
rs.close
Set rs = nothing
dataConn.close
Set dataConn = nothing
'### restituisce il responso a FLASH
Response.Write "check=" & strCheck
%>