Apro il db cosi:
<%
Dim objConn
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & _
Server.MapPath("mdb-database/home.mdb")
Dim objRS
Set objRS = Server.CreateObject("ADODB.RecordSet")
sSQL="select * from News where tipo = 1 order by Time"
objRS.Open sSQL, objConn, 3, 3
%>
dicendoglio di andare a leggere la tabella "News" e di ordinare i record secondo il campo time
leggo le news cosi:
%
if not objRS.EOF then
dim differenzaDate
do while not objRS.EOF
ID=objRS("ID")
Heading=objRS("Heading")
Time=objRS("Time")
Content= left(objRS("Content"),90) & " ...[continua]"
PostedBy=objRS("PostedBy")
differenzaDate = DateDiff("d", objRS("Time"), Date)
if (objRS("giorni") = 0) or ( differenzaDate <= objRS("giorni") ) then
%>
<%if objRS("img")= true Then
Response.Write ("[img]imgNews/" & objRS("ID") & ".jpg[/img]")
end if
%>
<%=Heading%>
<%=Timestamp%>
<%=Content%>
<%=PostedBy%>
<%
end if
objRS.movenext
loop
else
%>
Nessun record trovato
<%
end if
objRS.Close
%>
e fin qui è tutto ok.
ora vorrei leggere nella stessa pagina dei record da un altra tabella...dalla tatbella "Sondaggi" come faccio ad aprire la connessione su quella tabella...nostante io ne abbia già aperta una sulla tabella news??

Rispondi quotando