%@ Language=VBScript %> <% strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("\bbdd\arco\arco.mdb") Set conn = Server.CreateObject("ADODB.Connection") conn.open strconn strsql1 = "SELECT TOP 3 * FROM ANOVA WHERE PrensaMaiv =1 ORDER BY Fecha DESC;" set rs1 = server.createobject("adodb.recordset") %>
![]() |
|
<% end if rs1.close set rs1 = nothing conn.close set conn = nothing %> | |||||