In questo spazio verranno pubblicate prossimamente
le nostre migliori ricette
<%
On Error Resume Next
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("public/ricette/database.mdb")
set sqltext = conn.execute("select * from NOVITA order by id")
while not sqltext.EOF
%>
| <%= sqltext("titolo") %> |
|
<%= sqltext("descrizione") %>
|
<%
sqltext.movenext
wend
sqltext.close
set sqltext = Nothing
conn.close
set conn = nothing
%>
|