
12/07/2004, 08:59
|
 | | | Fecha de Ingreso: enero-2002 Ubicación: Lima
Mensajes: 1.302
Antigüedad: 23 años, 4 meses Puntos: 3 | |
<%
dim con,rs,sql
set con = server.createobject("ADODB.Connection")
sql = "SELECT count(*) as numero FROM coti WHERE dolar='actua' and ver='ver' and nover='nover' "
con.connectionstring = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &Server.MapPath(".\base.mdb")
con.open con.connectionstring
set rs = con.execute(sql)
response.write ("<font size=""2"" face=""Arial""><b>Total de registros:</b>")&vbtab&(rs("numero"))
%>
__________________ Yo si sé lo que es trabajar duro, porque lo he visto. |