Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

ado y access

Estas en el tema de ado y access en el foro de Visual Basic clásico en Foros del Web. Pues nomas no puedo, quiero eliminar un registro de una tabla de access de acuerdo al texto de un textbox en vb6 he aqui mi ...
  #1 (permalink)  
Antiguo 31/05/2005, 13:23
 
Fecha de Ingreso: abril-2005
Mensajes: 65
Antigüedad: 19 años
Puntos: 0
ado y access

Pues nomas no puedo, quiero eliminar un registro de una tabla de access de acuerdo al texto de un textbox en vb6 he aqui mi codigo :

Private Sub Option3_Click()


If Option3.Value = True Then
Text73.Text = "X"
Text71.Text = ""
Text72.Text = ""
Text1.Text = InputBox("NUMERO DE FOLIO")

If Text1.Text = "" Then
Exit Sub
Else
CRITERIO = Text1.Text
If Not Form2.Adodc1.Recordset.EOF Then
Form2.Adodc1.Recordset.MoveFirst
Form2.Adodc1.Recordset.Find CRITERIO
Form2.Adodc1.Recordset.Delete CRITERIO
Form2.Adodc1.Recordset.Update
Form2.Adodc1.Recordset.MoveNext
MsgBox "Se ha Eliminado el Folio No: " & Text1.Text

End If
End If
End If
End Sub

Pero me sale error 3001 en tiempo de ejecucion
" Arguments are of the wrong type , are out of acceptable range, or are in conflict with one another"

La tabla que tengo en access tiene un solo campo que se llama FOLIOS y es tipo texto

Alguna idea de como solucionar esto?

Muchas Gracias
  #2 (permalink)  
Antiguo 31/05/2005, 14:09
Avatar de lic_dahool  
Fecha de Ingreso: noviembre-2003
Mensajes: 418
Antigüedad: 20 años, 6 meses
Puntos: 0
Código:
Form2.Adodc1.Recordset.Find CRITERIO
Form2.Adodc1.Recordset.Delete CRITERIO
Form2.Adodc1.Recordset.Update
__________________
La cantidad total de inteligencia del planeta permanece constante.
La población, sin embargo, sigue aumentando.

COLE


:cool: Los ordenadores no resuelven problemas ... ejecutan soluciones.
Laurent Gasser


Tienes alguna duda :pensando: ? >>> www.google.com :aplauso: <<<
  #3 (permalink)  
Antiguo 31/05/2005, 14:28
 
Fecha de Ingreso: abril-2005
Mensajes: 65
Antigüedad: 19 años
Puntos: 0
ado y access

Gracias , pero no entendi tu respuesta.
O sera que el codigo que pusiste en rojo es lo que esta mal?
ya lo intente, quite el CRITERIO despues de delete y sigue pasando lo mismo
ya puse entre parentesis CRITERIO despues de find y me manda el mismo error.

No entiendo, si pudieras mandarme una respuesta mas especifica te lo agradeceria mucho.
  #4 (permalink)  
Antiguo 31/05/2005, 14:42
Avatar de lic_dahool  
Fecha de Ingreso: noviembre-2003
Mensajes: 418
Antigüedad: 20 años, 6 meses
Puntos: 0
Perdon, es que no tenía mucho tiempo.

El método Delete no lleva criterio, sino que lleva una de las siguientes constantes:

AdoEnums.Affect.ALL
AdoEnums.Affect.ALLCHAPTERS
AdoEnums.Affect.CURRENT
AdoEnums.Affect.GROUP

Podrías poner un ejemplo de como utilizas CRITERIO ? (es decir, basicamente que dice)
Para identificar exactamente el error habría que ver en que línea se produce(es decir, al usar que método?)

Sdos.
__________________
La cantidad total de inteligencia del planeta permanece constante.
La población, sin embargo, sigue aumentando.

COLE


:cool: Los ordenadores no resuelven problemas ... ejecutan soluciones.
Laurent Gasser


Tienes alguna duda :pensando: ? >>> www.google.com :aplauso: <<<
  #5 (permalink)  
Antiguo 31/05/2005, 15:02
 
Fecha de Ingreso: abril-2005
Mensajes: 65
Antigüedad: 19 años
Puntos: 0
ado y access

Gracias, si mira sucede que tengo un form2 en el que meto una serie de folios a la tabla de access llamada "SERIE_FOLIOS" la cual tiene un solo campo llamado "FOLIOS".
Tengo otro form1 que me pide por medio de un inputbox el numero de folio que voy a ocupar y lo mete a un text1, lo que necesito es que cuando meta el numero de folio lo busque en la tabla de access y lo borre.
Tal vez sea muy simple , pero no le doy al clavo.

Gracias por todo
  #6 (permalink)  
Antiguo 31/05/2005, 17:26
Avatar de lic_dahool  
Fecha de Ingreso: noviembre-2003
Mensajes: 418
Antigüedad: 20 años, 6 meses
Puntos: 0
No comprendo, solucionaste tu problema con eso?

Sdos.
__________________
La cantidad total de inteligencia del planeta permanece constante.
La población, sin embargo, sigue aumentando.

COLE


:cool: Los ordenadores no resuelven problemas ... ejecutan soluciones.
Laurent Gasser


Tienes alguna duda :pensando: ? >>> www.google.com :aplauso: <<<
  #7 (permalink)  
Antiguo 01/06/2005, 09:03
 
Fecha de Ingreso: abril-2005
Mensajes: 65
Antigüedad: 19 años
Puntos: 0
ado y access

No, no lo he solucionado, solo te explicaba que es lo que quiero o intento hacer
CRITERIO es una variable que recoge el valor del text1.text que es donde meto el numero de folio que voy a usar y ese folio necesito que lo elimine de la base de datos al momento de usarlo.

Gracias.
  #8 (permalink)  
Antiguo 01/06/2005, 09:07
Avatar de lic_dahool  
Fecha de Ingreso: noviembre-2003
Mensajes: 418
Antigüedad: 20 años, 6 meses
Puntos: 0
Entiendo perfectamente para que es la variable, pero a lo q me refiero, es exactamente en tiempo de ejecución que dice esa variable, o como armas la sentencia, recorda que este parámetro lleva algo similar a una sentencia SQL.
__________________
La cantidad total de inteligencia del planeta permanece constante.
La población, sin embargo, sigue aumentando.

COLE


:cool: Los ordenadores no resuelven problemas ... ejecutan soluciones.
Laurent Gasser


Tienes alguna duda :pensando: ? >>> www.google.com :aplauso: <<<
  #9 (permalink)  
Antiguo 01/06/2005, 11:03
 
Fecha de Ingreso: abril-2005
Mensajes: 65
Antigüedad: 19 años
Puntos: 0
ado y access

Si, en tiempo de ejecucion la variable CRITERIO muestra el numero de folio que tiene el text1 . y el codigo que utilizo es el que puse anteriormente.

Gracias
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 15:17.