<% ' 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 idcantiere = Request("IDCantiere") rs.Open "SELECT * FROM Cantieri WHERE IDCantiere =" & idcantiere, conn, adOpenStatic, adLockReadOnly, adCmdText %> Gruppo Dalla Bona
 
  <%=rs("NomeCantiere") %>


" width="680">