Mah ? conoscendoli hanno pagato in ritardo il rinnovo e li hanno oscurati. Scadeva ieri.

Eppure io ho lavorato ieri col DB.

in ogni caso se ti interessa questo era dentro il file swf
codice:
onClipEvent(load){
this.loadVariables( "scroll_db.asp", post);
}

onClipEvent(data){
mymax=tot // Totale record
nomecampo = "dyn_db" // Istanza del campo dinamico
this[nomecampo].type = "Dynamic";
this[nomecampo].selectable = false
this[nomecampo].html=true
this[nomecampo].target = "_blank"

for(i=1; i<=mymax; i++){
    cont_data = "data"+i
    cont_tit  = "titolo"+i
    cont_url  = "link"+i
    myX=0
    myY=18*i-18; 
this[nomecampo].htmlText += "<font size='8' color='#FFCC00'>"+eval(cont_data)+"</font>"+"<font color='#FFFFFF'>"+eval(cont_tit)+"</font>
"

} 
}
e questo dentro il file ASP

codice:
<%@LANGUAGE="VBSCRIPT"%>

<%
Response.Expires = 0
dim DSNName, sql
'set DSNName =Server.CreateObject("ADODB.Connection")
DSNName = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="
DSNName = DSNName & Server.MapPath("../../mdb-database/tbNews.mdb")


sql = "SELECT * FROM tbNews ORDER BY tbNews.IDNews DESC"

Set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = DSNName
rs.Source = sql
rs.CursorType = 0
rs.CursorLocation = 2
rs.LockType = 1
rs.Open()

'function get_number_of_recordset (rs)
   x = 0 		
   while not rs.eof
       x = x + 1
'       ' insert your code here (optional only if u want to)
       Response.Write("titolo" & x & "=" & rs("Titolo")& "
" & "&link" & x & "=" & rs("Link")& "&data" & x & "=" & rs("data")& "
")		
'       set rs = 
        rs.MoveNext
		Response.Write("&")
  wend
   get_number_of_recordset = x
       Response.write("tot="& get_number_of_recordset)
'end function


rs.Close
Set rs=Nothing
%>
in piu il file access mdb che contiene i dati nei campi estratti

Ciao