Visual Basic - error 3001 en programa

Life is soft - evento anual de software empresarial
   
Vista:

error 3001 en programa

Publicado por Raul MTZ M (2 intervenciones) el 30/05/2008 20:08:21
Estoy realizando un sistema con ado y en el apartado de busquedas tengo 1 textbox para introducir los datos y una lista para seleccionar el tipo de campo para la busqueda, tengo varios campos numericos (5) y en 3 me aparece el ERROR 3001 al querer realizar la consulta, lo mas raro es que los otros 2 funcionan perfectamente al seleccionarlos.....
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:error 3001 en programa

Publicado por daniel (145 intervenciones) el 30/05/2008 20:17:11
verifica los tipos de los campos de tu tabla y los tipos de datos que asignas, ya que esto se presenta por colocar datos alfanuméricos en donde son numéricos y viceversa.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:error 3001 en programa

Publicado por RAUL MTZ M (2 intervenciones) el 30/05/2008 20:46:49
sip los campos en la base de datos son numericos..... aki esta el codigo:

Private Sub Command1_Click()
Select Case List1.ListIndex
Case 0
rsLectores.Filter = "" & List1 & " = '" & Text1 & "'" <------ aki me envia el mensaje
Case 1
rsLectores.Filter = "" & List1 & " >= '" & dtpDesde & "' and " & List1 & " <= '" & dtpHasta & "'"
Case 2
rsLectores.Filter = "" & List1 & " = '" & Text1 & "'"
Case 3
rsLectores.Filter = "" & List1 & " = '" & Text1 & "'"
Case 4
rsLectores.Filter = "" & List1 & " = '" & Text1 & "'"
Case 5
rsLectores.Filter = "" & List1 & " LIKE '" & Text1 + "%" & "'"
Case 6
rsLectores.Filter = "" & List1 & " = '" & Text1 & "'"
Case 7
rsLectores.Filter = "" & List1 & " LIKE '" & Text1 + "%" & "'"
Case 8
rsLectores.Filter = "" & List1 & " LIKE '" & Text1 + "%" & "'"
Case 9
rsLectores.Filter = "" & List1 & " LIKE '" & Text1 + "%" & "'"
End Select
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:error 3001 en programa

Publicado por daniel (1 intervención) el 03/06/2008 19:15:48
rsLectores.Filter = "" & List1 & " LIKE '" & Text1 + "%" & "
si en la consulta despues del like le pones ' busca un valor de texto. por eso el error.
Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar