Update!!!!

30/11/2004 - 18:01 por omnius | Informe spam

Hola. tengo el siguiente error (de los tipicos...)
a.. Tipo de error:
Microsoft JET Database Engine (0x80040E10)
No se han especificado valores para algunos de los parámetros requeridos.
update.asp, línea 27

he mirado permisos, en iis etc. y de ahi no viene. el caso es que no me deja
actualizar la bbdd

el codio es el siguiente:
a.. Tipo de error:
Microsoft JET Database Engine (0x80040E10)
No se han especificado valores para algunos de los parámetros requeridos.
/clase/BD/update.asp, línea 27

<html>
<body bgcolor="#3366CC">
<form method="post" action="update.asp">
</form>
<%
dim bd,RS,pss,usu,i,r
set bd=createObject("ADODB.connection")
bd.open "provider=microsoft.jet.oledb.4.0; data source=" &
server.mappath("/clase/BD/db3.mdb")
set RS = createObject("ADODB.recordset")

set RS=bd.execute("select * from cliente") response.write("<table border=1
align='center'>")

while not RS.eof 'mostrara columnas

response.write("<tr>")
response.write("<form method='post' action='update.asp' name='form " & j &
"'>")
response.write("<td><input type='text' disabled name='id " & j & "'
value='" & RS.Fields(0).value & "'>")

for i=1 to RS.fields.count-1 'mostrara filas
response.write("<td><input type='text' name='text " & i & "' value='" &
RS.Fields(i).value & "'>")
if request.form("mod") = "Modificar" then
set RS=bd.execute("update cliente set nombre='" & request.form("text" &
i) & "',apellido='" & request.form("text" & i) & "',usuario='" &
request.form("text" & i) & "',contrasenya='" & request.form("text"& i) & "'
where id='" & request.form("id" & i) & "' ")
response.write("ok")
end if

a.. next
response.write("<td><input type='submit' name='mod' value='Modificar'>")
response.write("<td><input type='submit' name='eli' value='Eliminar'>")
response.write("<td><input type='submit' name='inser' value='Insertar'>")

response.write("</tr>")

response.write("</form>")

RS.movenext
j=j+1
'response.write(j)

wend

response.write("</table>")

bd.close

a.. %>
</body>
</html>

Alguien me hecho una mano??? estoy loco ya

visitar mi web:
http://www.omniusweb.tk
gracias !!

Siga el debate

1 respuesta

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#1 Sashka

30/11/2004 - 20:24 | Informe spam

¡Importante!: Colabora con el grupo. Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias
:( No entiendo tu código. pero en todo caso
request.form("text" & i) ... por lo que veo tus input no se llaman "text" y
un número, sino "id" y un numero...

Ademas cuando haces Set RS = bd.execute("update
Primero que nada el update no devuelve un recordset... y segundo... si
lo devolviera... te daría error de que el objeto está abierto... estas
haciendo un loop con él

Sashka
MS MVP Access
MCP ASP.Net

"omnius" escribió en el mensaje
news:QH1rd.12395$

Hola. tengo el siguiente error (de los tipicos...)
a.. Tipo de error:
Microsoft JET Database Engine (0x80040E10)
No se han especificado valores para algunos de los parámetros requeridos.
update.asp, línea 27

he mirado permisos, en iis etc. y de ahi no viene. el caso es que no me
deja actualizar la bbdd

el codio es el siguiente:
a.. Tipo de error:
Microsoft JET Database Engine (0x80040E10)
No se han especificado valores para algunos de los parámetros requeridos.
/clase/BD/update.asp, línea 27

<html>
<body bgcolor="#3366CC">
<form method="post" action="update.asp">
</form>
<%
dim bd,RS,pss,usu,i,r
set bd=createObject("ADODB.connection")
bd.open "provider=microsoft.jet.oledb.4.0; data source=" &
server.mappath("/clase/BD/db3.mdb")
set RS = createObject("ADODB.recordset")

set RS=bd.execute("select * from cliente") response.write("<table border=1
align='center'>")

while not RS.eof 'mostrara columnas

response.write("<tr>")
response.write("<form method='post' action='update.asp' name='form " & j
& "'>")
response.write("<td><input type='text' disabled name='id " & j & "'
value='" & RS.Fields(0).value & "'>")

for i=1 to RS.fields.count-1 'mostrara filas
response.write("<td><input type='text' name='text " & i & "' value='" &
RS.Fields(i).value & "'>")
if request.form("mod") = "Modificar" then
set RS=bd.execute("update cliente set nombre='" & request.form("text"
& i) & "',apellido='" & request.form("text" & i) & "',usuario='" &
request.form("text" & i) & "',contrasenya='" & request.form("text"& i) &
"' where id='" & request.form("id" & i) & "' ")
response.write("ok")
end if

a.. next
response.write("<td><input type='submit' name='mod' value='Modificar'>")
response.write("<td><input type='submit' name='eli' value='Eliminar'>")
response.write("<td><input type='submit' name='inser' value='Insertar'>")

response.write("</tr>")

response.write("</form>")

RS.movenext
j=j+1
'response.write(j)

wend

response.write("</table>")

bd.close

a.. %>
</body>
</html>

Alguien me hecho una mano??? estoy loco ya

visitar mi web:
http://www.omniusweb.tk
gracias !!

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida