Ciao, dopo alcuni ripensamenti ho risolto in questo modo. spero sia un metodo giusto.
I campi del db sono: | Titolo | Testo | m_sx | m_dx |
PAGINA INC_PAG.ASP
codice:
<%
If VarID <= 0 Then
VarID = 0
End If
SQL = " SELECT * FROM Tabella WHERE Tabella.ID = "& VarID &" "
Set RS = Server.CreateObject("ADODB.Recordset")
RS.Open SQL, Conn, 1, 3
If NOT RS.EOF Then
RSTitolo = RS("Titolo")
RSTesto = RS("Testo")
RSMenusx = RS("m_sx")
Else
RSTitolo = ""
RSTesto = ""
End If
%>
<html>
<head>
<title><%=RSTitolo%></title>
</head>
<body>
<%=RSTitolo%>
<%=RSTesto%>
<% RS.Close
Set RS = Nothing
Conn.Close
Set Conn = Nothing
%>
</body>
</html>
PAGINA MENUSX.ASP
codice:
<%
SQL = " SELECT Testo FROM Tabella WHERE Titolo LIKE '" & RSMenusx & "'"
Set RS = Server.CreateObject("ADODB.Recordset")
RS.Open SQL, Conn, 1, 3
If NOT RS.EOF Then
RSTesto_menu = RS("Testo")
Else
RSTesto = "menudiprova"
End If
%>
<%=RSTesto_menu%>
Il mio dubbio è un po' sulla connessione:
1 - una per tutte e due le select.
Il resto del codice, secondo voi è scritto bene?
2 - vorrei che quando non trova compilato il campo "m_sx" mi leggesse una riga differente. perchè non lo fa???
Il file funziona.
ciaoooooo.