
19/06/2002, 17:42
|
| | Fecha de Ingreso: abril-2002
Mensajes: 432
Antigüedad: 23 años, 1 mes Puntos: 0 | |
Re: ¿Se puede hacer esto? lo he modificado y sigue dandome error
<html>
<head>
<title>Modificar datos entrada</title>
</head>
<body>
<%'Abre la conexion con la base de datos a traves de una conexion ODBC
Set con = Server.CreateObject("ADODB.Connection")
'Como vamos a utilizar la variable rs del tipo recordset para recorrer los registros con EOF
Set rs = Server.CreateObject("ADODB.Recordset")
con.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\jpalbox\db\usuarios.mdb" ;))
SQL="Select * from Personal where usuario=" & jpalbox & "'"
SET rs=con.execute(SQL)
If rs.EOF = True then
response.write "no exite el usuario"
else
%>
<div align="center"><center>
<table width="339">
<tr>
<td>Nombre:<input type="text" name="nombre" VALUE="<%=Rs("nombre")%>" ; size="20"></td>
</tr>
</table>
</center></div><%
end if
con.Close
Set con = Nothing
%>
</body>
</html> |