Código:
gracias.- <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" /> <title>Documento sin título</title> </head> <body> <% Dim cnn, rcs, SQL set cnn=Server.CreateObject("ADODB.Connection") set rs=Server.CreateObject("ADODB.Recordset") cnn.Open "driver={SQL Server};server=EFUENTES; database=Osiris; uid=sa;pwd=" set rs = cnn.execute("SELECT * FROM usuarios") ' Maquetamos los resultados ' No incluyo Clave por seguridad (supongo) %> <a href="detalle.asp">Pulse aqui para insertar</a> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td>RUF</td> <td>Nombre</td> <td>Perfil</td> <td>Sucursal</td> <td> </td> </tr> <% while not rs.EOF %> <tr> <td><%=rs.fields("ruf").value%></td> <td><%=rs.fields("nombre").value%></td> <td><%=rs.fields("perfil").value%></td> <td><%=rs.fields("sucursal").value%></td> <!-- FIJATE EN LO QUE PONEMOS AQUI --> <td> <a href="detalles.asp?borrar=<%=rs.fields("ruf").value%>">Borrar Registro</a><br /> <a href="detalles.asp?update=<%=rs.fields("ruf").value%>">Modificar Registro</a><br /> </td> </tr> <% rs.movenext() wend %> </table> </body> </html> <% set rs = nothing cnn.close() set cnn = nothing %>