ASOCIACIONES Y PÁGINAS DE CÓRDOBA <% Set ObjConn=Server.CreateObject("ADODB.Connection") ObjConn.Open "Driver={Microsoft Access Driver (*.mdb)};dbq=D:\whb\Sites\7912\Web\adesalambrar.mdb;UID=admin" sql="SELECT * from enlaces WHERE cordoba>0 order by cordoba asc" Set tabla=server.createobject("adodb.recordset") tabla.open sql,objconn,1,3 do while tabla.eof=False %> <% tabla.movenext %> <% tabla.movenext loop tabla.close %>
<% response.write("") response.write("") response.write(tabla.fields("nombre")) response.write("") response.write("") response.write("") response.write("
") response.write(tabla.fields("comentario")) %>
"> " width="300" />
<% response.write("") response.write("") response.write(tabla.fields("nombre")) response.write("") response.write("") response.write("") response.write("
") response.write(tabla.fields("comentario")) %>
"> " width="300" />