Erro Asp

GUAPOBEN · #1 (**permalink**) 07/01/2003, 13:32

Que tal como estan?

Alguien me podria ayudar tengo una pagina ASP en la cual ingreso datos hacia una base de access. solo que ahorita se me presento un pequeño problema. me manda este error:

Microsoft OLE DB Provider for ODBC Drivers error '80040e10'

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 11.

/procliente/ingresof.asp, line 18

Alguien me podria decir a que se debe el codigo es el siguiente y se supone que el error es la linea que dejo en negritas:

<%@ Language="VBScript" %>
<html>
<head>
<title>Ingreso de Datos</title>
</head>

<%

Dim Conexion,Tabla
Set Conexion = Server.CreateObject("ADODB.Connection")
Set Tabla = Server.CreateObject("ADODB.Recordset")

Conexion.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("bases/procliente.mdb")

Dim Temp

Temp="Select * From Falcon Where UCase(Especialista)='" & UCase(Request("Dato1")) & "' And UCase(Hora)='" & UCase(Request("Dato2")) & "' And UCase(C/BCC)='" & UCase(Request("Dato3")) & "' And UCase(T/BCC)='" & UCase(Request("Dato4")) & "' And UCase(C/BNT)='" & UCase(Request("Dato5")) & "' And UCase(T/BNT)='" & UCase(Request("Dato6")) & "' And UCase(C/SFN)='" & UCase(Request("Dato7")) & "' And UCase(T/SFN)='" & UCase(Request("Dato8")) & "' And UCase(C/BIT)='" & UCase(Request("Dato9")) & "' And UCase(T/BIT)='" & UCase(Request("Dato10")) & "' And UCase(C/AFI)='" & UCase(Request("Dato01")) & "' And UCase(T/AFI)='" & UCase(Request("Dato02")) & "' And UCase(C/IXE)='" & UCase(Request("Dato03")) & "' And UCase(T/IXE)='" & UCase(Request("Dato04")) & "' And UCase(C/BJT)='" & UCase(Request("Dato15")) & "' And UCase(T/BJT)='" & UCase(Request("Dato16")) & "' And UCase(C/INV)='" & UCase(Request("Dato17")) & "' And UCase(T/INV)='" & UCase(Request("Dato18")) & "' And UCase(C/MEX)='" & UCase(Request("Dato19")) & "' And UCase(T/MEX)='" & UCase(Request("Dato20")) & "' And UCase(Referencia)='" & UCase(Request("Dato21")) & "' And UCase(Observaciones)='" & UCase(Request("Dato22")) & "' And UCase(Asignado)='" & UCase(Request("Dato23")) &"'"
Tabla.Open Temp,Conexion,2,3,1

If Tabla.BOF And Tabla.EOF Then
Tabla.AddNew
Tabla("Especialista") = Request("Dato1")
Tabla("Hora") = Request("Dato2")
Tabla("C/BCC") = Request("Dato3")
Tabla("T/BCC") = Request("Dato4")
Tabla("C/BNT") = Request("Dato5")
Tabla("T/BNT") = Request("Dato6")
Tabla("C/SFN") = Request("Dato7")
Tabla("T/SFN") = Request("Dato8")
Tabla("C/BIT") = Request("Dato9")
Tabla("T/BIT") = Request("Dato10")
Tabla("C/AFI") = Request("Dato01")
Tabla("T/AFI") = Request("Dato02")
Tabla("C/IXE") = Request("Dato03")
Tabla("T/IXE") = Request("Dato04")
Tabla("C/BJT") = Request("Dato15")
Tabla("T/BJT") = Request("Dato16")
Tabla("C/INV") = Request("Dato17")
Tabla("T/INV") = Request("Dato18")
Tabla("C/MEX") = Request("Dato19")
Tabla("T/MEX") = Request("Dato20")
Tabla("Referencia") = Request("Dato21")
Tabla("Observaciones") = Request("Dato22")
Tabla("asignado") = Request("Dato23")
Tabla.Update

%>

<body>

Ingreso de datos completado
<%

Else
Response.Write "El registro ya existe"
End If

Tabla.Close
Conexion.Close
%>
 

<a href="cargarf.htm" target="_top">Ingresar
Nuevo</a>
</body>
</html>

Ayudenme si?

Muchas Gracias de ante mano.

Alberto

GUAPOBEN · #2 (**permalink**) 07/01/2003, 13:37

Bueno como no la marco en negrita se supone que es esta linea la 18:

Tabla.Open Temp,Conexion,2,3,1

Estaba pensando si es por que tengo Datos de Dato11 ,Dato12 etc. sera por eso que me lo envia y si es asi como puedo corregirlo?

Saludos

bakanzipp · #3 (**permalink**) 07/01/2003, 13:39

hazle un response.write a la variable Temp y ve que te arroja...

porke revisar a ojo esa inmensa consulta...uufff...

GUAPOBEN · #4 (**permalink**) 07/01/2003, 13:51

Es que no es una consulta.

Lo que quiero es insertar registros en mi base de datos de access , lo cual ya he manejado pero con menores campos, y esta pagina se supone que grabara 23 datos distintos, a los cuales me esta arrojando el mensaje antes mencionado.

Saludos.

urjose · #5 (**permalink**) 07/01/2003, 13:54

Ese error es por que los campos no existen o los quieres llenar con vacio no recuerdo bien

AlZuwaga · #6 (**permalink**) 07/01/2003, 14:07

Argggggg!!!!
Que fea SQL!!

Yo la simplificaría...
Por un lado, eliminar TODOS los UCase()... no se para que los necesitás ahí. Además, hacerle un UCase al dato, valla y pase... pero al nombre de campo? qué sentido tiene?

Por el otro, meter TODOS los Request() en variables y luego utilizarlas en la SQL y en el AddNew.

Fijate, se va a hacer más simple de leer

RENZO · #7 (**permalink**) 07/01/2003, 14:48

Yo quiero ver el response.write de la consulta que pidio bakanzip :-p .

GUAPOBEN · #8 (**permalink**) 07/01/2003, 15:34

dazuaga me podrias decir como podria simplificarla.
Por otro lado se supone que yo neceito los nombre sde los campos para que se pueda insertar de acuerdo a mi base en access.

Otra osa mas , soy nuevo en esto no se mucho asi ue si en vez de regañarme me ayudan me sria mucho mas facil entenderle mas.

No lleva ningun Response.write hasta donde yo se, ya que esto es para insertar los datos de los campos en la base de access no es una consulta. Si estoy equivocado correijanme por favor.

Saludos y Gracias.

GUAPOBEN · #9 (**permalink**) 09/01/2003, 16:15

Hola, abra alguien que me pueda ayudar o orientar?

Ayudenme por favor

urjose · #10 (**permalink**) 10/01/2003, 00:36

Pones un Response.Write Temp

Abajo de tu supermega consulta

Por cierto estas seguro de que todos los campos se llaman así? y de que realmente recoges valores con los Request.Form?