problema if ... then ... else

bormiositi

problema if ... then ... else

Premessa: ho un db access con due tabelle - "comunicato" e "locandina"
Nella tabella comunicato ho tre campi memo: titolo, sottotitolo e descrizione
Nella seconda tabella il percorso di un'immagine

Problema presentazione dati su pagina asp
Devo effettuare un controllo:
Se il record della tabella "comunicato" è vuoto allora visualizzo l'immagine il cui percorso è salvato nel campo img della tabella di db "locandina", altrimenti visualizzo i campi testuali della tabella "comunicato".

Sto provando a scrivere il codice in asp ma credo di avere grossissimi problemi.
Credo che la logica sia quella giusta:

apro la connessione al db access
apro il recordet della tabella "comunicato"
eseguo il controllo sul recordset
se il recordset è vuoto lo chiudo
apro il recordset della tabella "locandina"
scrivo il contenuto del campo img
chiudo il controllo
.....

Di seguito il codice per suggerimenti\aiuti\tirate d'orecchie\ecc.


<%
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("/mdb-database/dbscs.mdb")
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset") 
strSQL="SELECT * FROM comunicato"
rs.Open strSQL,conn,1,3 
          %>

<%If Not rs.Eof then
          response.write ("<h1><%=rs("titolo")%><br /><span><%=rs("sottotitolo")%></span></h1><br /><br />")
          response.write replace (Rs("FCKeditor1"),chr(13)&chr(10))
          else
          RS.Close 
          Set RS = Nothing 
            Dim rs
            Set rs = Server.CreateObject("ADODB.Recordset") 
            strSQL="SELECT * FROM locandina"
            rs.Open strSQL,conn,1,3
            response.write ("<img src='resize_eventi_ok.aspx?format=jpeg&quality=100&mode=0&width=65&height=70&path=public/"& rs("immg1") &"' border='0'/>")
            end if
            %>

```Spero vivamente che qualcuno possa indirizzarmi verso la strada corretta.

Grazie anticipatamente.

cloix

Il codice sembra adare bene non capisco quel rs("FCKEditor1") in quanto la tabella comunicato ha solo tre attributi quali titolo, sottotitolo e descrizione.
Attento che se entri nel IF dopo non effettui la chiusura del Recordset!
Ti dà qualche sorta di errore lo script?