Hej.
Vad som detta används till är att kontrollera om användaren finns i en databas, och om så ej är fallet retuneras ett felmedelande till Flash.
Om "man" finns så skickas datat i Acsess filen till Flash.
Skall försöka fixa en exempel-fil för nerladdning de närmaste dagarna.
###########################
<%
hämtar variabel från flash
id = Request.form("id")
'koppling etableras
Set Conn = Server.CreateObject("ADODB.Connection")
dbPath=Server.MapPath("mails.mdb")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & dbPath
Set Session("mails_conn") = conn
'variabler från Acsess
Set rs = Conn.Execute("select * from mails where id = " & id & ";")
If RS.EOF Then
response.write("nombre=Wrong login, try again")
Else
'sammanställer variablerna från databasen tror jag?
nombre = rs("nombre")
apellido = rs("apellido")
ocupacion = rs("ocupacion")
email = rs("email")
'skickar variablerna till flash
ReturnString = "nombre="& nombre & ""
ReturnString = ReturnString & "&apellido="&apellido&""
ReturnString = ReturnString & "&ocupacion="&ocupacion&""
ReturnString = ReturnString & "&email="&email&""
ReturnString = ReturnString & "&id="&id&""
Response.Write(ReturnString)
RS.Close
End If
%>
########################
Daze