ho uno script in asp che assegna a stringa1 stringa2 stringa3 stringa4 stringa5 stringa6 i contenuti presi da un db, poi questi valori li volevo passare ad un applett per stamparli a video solo che non ci riesco o meglio come ho fatto io non mi funziona sapete aiutarmi
grazie
<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>
Rispondi quotando
