<% Dim MyConn, MySQL, rs, i Set MyConn=Server.CreateObject("ADODB.Connection") Set rs = Server.CreateObject("ADODB.Recordset") MyConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath ("db/db.mdb") MYSQL = "Select * from firma where publicar = 1 order by fecha" rs.Open MySQL, MyConn,1 ,3 %>
<% do until rs.eof %> <% rs.movenext loop %>
Agregar Firma
 

Sirvase ingresar su Nombre, un comentario referente a Elsie Leon y su Correo Electrónico (solo se publicarán los comentarios que se estimen convenientes, por ningun motivo se publicará el Correo Electrónico del Visitante)
 
Nombre
 
Correo Electrónico
 
Comentario