speriamo mi possiate aiutare
ho questo script
vorrei assegnare ai diveri TEXT il Value che hi ricavato prima dal database, ma l'assegnazione non mi funziona come devo fare?codice:<html> <head> <BODY> <% cString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/public/news/database.mdb") 'set connession to database Set objConn=Server.CreateObject("ADODB.Connection") 'open connession to database objConn.Open cstring Set rs = Server.CreateObject("ADODB.Recordset") nometabella="news" ' inserisci qui il nome della tabella da vedere SQL = "SELECT TOP 6 * FROM "&nometabella&" ORDER BY id DESC" 'apro il rs rs.Open sql, objConn stringa= "" stringa1= "" stringa2= "" stringa3= "" stringa4= "" stringa5= "" stringa6= "" a=0 do until rs.eof For Each campo in rs.Fields if not (campo.name = "id" or campo.name = "descrizione" or campo.name = "click") then 'non stampa i campi non richiesti a=a+1 if a=1 or a=2 then stringa1=stringa1+ campo &"" if a=3 or a=4 then stringa2=stringa2+ campo &"" if a=5 or a=6 then stringa3=stringa3+ campo &"" if a=7 or a=8 then stringa4=stringa4+ campo &"" if a=9 or a=10 then stringa5=stringa5+ campo &"" if a=11or a=12 then stringa6=stringa6+ campo &"" end if next rs.movenext loop%> <applet CODEBASE="../../" CODE="trans.class" WIDTH="300" HEIGHT="100" ALIGN="CENTER"> <param name="BGCOLOR" value="000000"> <param name="TEXTCOLOR" value="FF0000"> <param name="DELAY" value="50"> <param name="ALIGN" value="CENTER"> <param name="TEXT0" value=stringa1> <param name="TEXT1" value=stringa2> <param name="TEXT2" value=stringa3> <param name="TEXT3" value=stringa4> <param name="TEXT4" value=stringa4> <param name="TEXT5" value=stringa5> <param name="TEXT6" value=stringa6> </applet> </body> </html>
grazie
Rispondi quotando
