|
|
<%
if StartConnection=true then
sql="select * from ComunicatiStampa"
Set rs=Server.CreateObject("ADODB.Recordset")
rs.Open sql, MyConn, 3, 3
else
Response.Write("
")
end if
%>
|
RASSEGNA STAMPA:
<%
while not rs.EOF
id=rs.fields("IdComunicatoStampa")
titolo=rs.fields("titolocomunicato")
%>
<%=titolo%>
<%
Response.Write("
| ")
rs.movenext
wend
%>
|
|
|
|