
13/07/2008, 18:18
|
| | Fecha de Ingreso: mayo-2008
Mensajes: 41
Antigüedad: 17 años Puntos: 0 | |
Respuesta: error de poco parametro pero volvi con un erro similar pero esto no es buequeda es para crear acciones pero me sale el mismo error
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][Controlador ODBC Microsoft Access] Pocos parámetros. Se esperaba 1.
/pagina/acciones/accionesotros.asp, línea 29
rebise mi base de dato de piea a cabeza y esta bes me pillo mi codigo son :
<%
series=request.form("serie")
nuss=request.form("nus")
caract=request.form("caracteristica")
funciones=request.form("funcion")
Set conectar=Server.CreateObject("ADODB.Connection")
Set RS =Server.CreateObject ("ADODB.RecordSet")
'conectar.open "cobraza_sql"
conectar.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=C:\Inetpub\wwwroot\PAGINA\cobranza.md b"
eliminar=request.Form("Elimina")
crea=request.Form("crear")
if (eliminar="Elimina") then
sql= "Select * from I_otros where serie =" & series &""
'response.Write(sql)
Set RS =conectar.execute(sql)
if RS.eof then
response.redirect "error.asp"
else
eliminar = "Delete I_otros where serie =" & series &""
conectar.execute(eliminar)
response.redirect "acciontres.asp"
end if
end if
if (crea="Crear/Modificar") then
sql= "Select * from I_otros where serie =" & series &""
Set RS =conectar.execute(sql)
if RS.eof then
Inserta="Insert Into I_otros(serie, nus, caracteristica, funcion) values("& series & ", '" & nuss & "', '" & caract & "', '" & funciones & "') "
conectar.execute(Inserta)
response.Write(Inserta)
response.redirect "accionuno.asp"
else
actualisar="Update I_otros Set serie='" & serie & "'"
RS("nus") = nuss
RS("caracteristica") = caract
RS("funcion") = funciones
Set RS=conectar.execute(actualisar)
response.redirect "acciondos.asp"
end if
end if
%> |