Hente data fra acces database?

http://www.eksperten.dk/spm/499409

Jeg har fået lavet dette script i asp kategorien:
<%
session.LCID = 1030

Function fncTextChange(strText)
            strTekst = Trim(strText)
            fncTextChange = Replace(strTekst,"""","''")
            fncTextChange = Replace(strTekst,"'","''")   
            fncTextChange = Replace(fncTextChange,"  "," &nbsp;")
            fncTextChange = Replace(fncTextChange,">","&gt;")
            fncTextChange = Replace(fncTextChange,"<","&lt;")
            fncTextChange = Replace(fncTextChange,vbCrLf,"<BR>")
            fncTextChange = Replace(fncTextChange,"å","&aring;")
            fncTextChange = Replace(fncTextChange,"æ","&aelig;")
            fncTextChange = Replace(fncTextChange,"ø","&oslash;")
            fncTextChange = Replace(fncTextChange,"Å","&Aring;")
            fncTextChange = Replace(fncTextChange,"Æ","&AElig;")
            fncTextChange = Replace(fncTextChange,"Ø","&Oslash;")
        End Function

dato = day(date) & ". " & monthname(month(date)) & " " & year(date) & ", " & time()
forfatter = request.form("forfatter")
nyhed = fncTextChange(request.form("nyhed"))

sql = "insert into tabel(forfatter, dato, nyhed) values('"&forfatter&"','"&dato&"','"&nyhed&"')"
set rs = server.createObject("adodb.connection")
conn = "DRIVER={Microsoft Access Driver (*.mdb)}; "
conn = conn & "DBQ=" & server.mappath("database.mdb")

rs.open conn
set rs = rs.execute(sql)
Response.write "data er opdateret"
%>

Jeg skal have de data fra databasen ind i flash. Skal det ikke gøres via asp? eller hvordan