<% ' Definisci stringa di connessione strConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("mdb-database/cantieri.mdb") %> <% Const adLockReadOnly = 1 Const adLockPessimistic = 2 Const adOpenStatic = 3 Const adCmdText = &H0001 Set conn = Server.CreateObject("ADODB.connection") Set rs = Server.CreateObject("ADODB.Recordset") conn.Open strConn idreferenza = Request("IDReferenza") rs.Open "SELECT * FROM Referenze WHERE IDReferenza = " & idreferenza, conn, adOpenStatic, adLockReadOnly, adCmdText %> Gruppo Dalla Bona
 
  <%=rs("Titolo") %>


" width="680">

 
<% rs.Close conn.Close %>