NETGAMES :: Cover Recensioni DISCHI
<%
private arr()
Set connection = Server.CreateObject("ADODB.Connection")
Set connetti = Server.CreateObject("ADODB.Connection")
Set disc = Server.CreateObject("ADODB.RecordSet")
Set ten = Server.CreateObject("ADODB.RecordSet")
set rec = Server.CreateObject("ADODB.RecordSet")
set pol = Server.CreateObject("ADODB.RecordSet")
' connection.open " DSN=db1"
connetti.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("poolvar.mdb")
sel = "select numeroitem,titolo from setdb where idd = 1"
pol.open sel,connetti,3
vero = Cbool(1)
falso = Cbool(0)
numero = pol("numeroitem")
vtitolo = pol("titolo")
pol.close
sel = "select * from data "
pol.open sel,connetti,3
vmatr = numero - 1
redim arr(vmatr)
dim cont
cont = 0
for i = 1 to numero
'stringa="txnum" & i
arr(cont) = pol("testoitem")
pol.movenext
cont = cont + 1
next
pol.close
connetti.close
connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("news97.mdb")
dim sel
''''''''''''''''''''''''''''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''''''''''
sql ="select * from dischi WHERE posizione = 1 or posizione = 2 or posizione = 3 order by posizione asc "
srec ="select * from dischi order by datarec DESC"
disc.open sql,connection,3
%>
<%
Set bun = Server.CreateObject("ADODB.RecordSet")
'connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("news97.mdb")
' pos 1 ... 4
sel ="select * from banner where pos = 1"
bun.open sel,connection,3
if (bun("isimmagine") = vero) then
%> ">" width="<%=bun("larghezza")%>" height="<%=bun("altezza")%>" border="0">
<%
else
%> <%
end if
bun.close
%>
E'
uscito il 14 settembre il nuovo album di Zucchero "Shake"
anticipato dai singoli "Baila" e "Ahum".
Per realizzate questo disco, Adelmo Zucchero Fornaciari,
classe 1955, ha trascorso sei mesi tra Sausalito, California,
e Bath, negli studi Real Worlddi
Peter Gabriel a nord di Londra. Un lavoro che contiene
anche brani scritti con Pasquale Panella e Francesco
De Gregori.
"Con 'Skake' ho sentito il bisogno di...