vi metto tutto il codice:
codice:
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" &_
"DBQ="& Server.MapPath("database/mpdb.mdb")
sql = "SELECT pr.id_pren, pr.ID_locale, pr.nome_locale, pr.data, pr.n_serata, pr.desc_serata" & _
"pr.costo_tav, pr.pers_x_tav, pr.n_bott, pr.da, pr.a, pr.image, locale.ID, locale.image_prenota" & _
" FROM (locale INNER JOIN pr ON locale.ID = pr.ID_locale) ORDER BY pr.data"
set rs = conn.execute(sql)
Do until rs.eof
if rs.recordcount>0 then
id_pren = rs("id_pren")
l_id = rs("ID_locale")
nome = rs("nome_locale")
data = rs("data")
nome_serata = rs("n_serata")
desc_serata = rs("desc_serata")
costo_tav = rs("costo_tav")
persone = rs("pers_x_tav")
bott = rs("n_bott")
da = rs("da")
a = rs("a")
image = rs("image")
im_pr = rs("image_prenota")
end if
...
ma i campi sono giusti, proprio non capisco