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>
<font face="Tahoma" size="2"><b><i>Ingreso de datos completado</i></b></font>
<%
Else
Response.Write "El registro ya existe"
End If
Tabla.Close
Conexion.Close
%>
<p align="center"> </p>
<p align="center"><font face="Tahoma" size="2"><b><i><a href="cargarf.htm" target="_top">Ingresar
Nuevo</a></i></b></font></p>
</body>
</html>
Ayudenme si?
Muchas Gracias de ante mano.
Alberto