Ver Mensaje Individual
  #7 (permalink)  
Antiguo 13/07/2008, 18:18
pussy
 
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
%>