non mi sono spiegato...codice:<% Set OBJConn = server.createobject("ADODB.Connection") OBJConn.ConnectionString="DRIVER={Microsoft Access Driver (*.mdb)};" & "DBQ=" & Server.MapPath("\MDB-DATABASE\talentscout\talentscout.mdb") OBJConn.open set RS=server.CreateObject("ADODB.Recordset") Sql="SELECT * FROM DaApprovare" RS.Open Sql,objconn,1,1 Do While Not Rs.Eof a = RS("Filename") response.write a:response.end %> <%=RS("IDBrano")%> <%=RS("Artista")%> <%=RS("Titolo")%> <%=RS("Filename")%> <%=RS("PermettiDownload")%> <% Rs.MoveNext Loop Rs.Close Set RS = Nothing OBJConn.Close Set OBJConn = Nothing %>

Rispondi quotando
