Caricando una pagina viene fuori questo messaggio di errore:
Active Server Pages error 'ASP 0116'
Missing close of script delimiter
/2004/colori/mappecolore.asp, line 200
The Script block lacks the close of script tag (%>).
Ecco il codice:
<%
Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("../../mdb-database/2004.mdb")
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "select * from mappecolore ", conn
Do while NOT RS.EOF
Dim mappecolore1
mappecolore1=rs("mappecolore1")
Dim mappecolore2
mappecolore2=rs("mappecolore2")
Dim mappecoloren1
mappecoloren1=rs("mappecoloren1")
Dim mappecoloren2
mappecoloren2=rs("mappecoloren2")
Dim nome_classe
nome_classe=rs("nome_classe")
Dim html
html=rs("html")
%>
<div id="tabella">
<span class="cursor" style="cursor: hand;></span>
<span STYLE="cursor: hand;>
[img]mappecolore/piccoli/<%response.write(mappecolore1)%>.jpg[/img]','','scrollbars=yes,width=580,height=480')">
[img]mappecolore/piccoli/<%response.write(mappecolore2)%>.jpg[/img]','','scrollbars=yes,width=580,height=480')">
[img]mappecolore/piccoli/<%response.write(mappecoloren1)%>.jpg[/img]','','scrollbars=yes,width=580,height=480')">
[img]mappecolore/piccoli/<%response.write(mappecoloren2)%>.jpg[/img]','','scrollbars=yes,width=580,height=480')">
</span>
<%response.write(nome_classe)%></div>
</div>
<%
RS.MoveNext
Loop
RS.Close
Set RS = Nothing
conn.Close
Set conn=Nothing
%>
la linea 200 è:
<%response.write(nome_classe)%></div>
dove sbaglio?
Grazie
Massimo