Visual Basic - Visual y Acces

Life is soft - evento anual de software empresarial
 
Vista:

Visual y Acces

Publicado por Javier (4 intervenciones) el 28/06/2004 19:33:45
Hola,
Tengo una duda:

Tengo una tabla llamada “maquinas” en una base de datos llamada “datos”.

Una columna de la tabla “maquinas” se llama “num_inv”.

Durante la ejecución del programa de Visual Basic, se introducen nuevos valores en “num_inv”.

Quiero que si se introducen valores repetidos en “num_inv” me salte un aviso de que se están repitiendo valores, es decir,

If Text2.Text = ¿¿¿¿¿¿¿¿¿¿¿¿¿¿¿¿¿?????????????? Then

Dialog2.Show

Else

End If


¡¡¡¡¡Muchas gracias!!!!!!!

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:Visual y Acces

Publicado por groval (225 intervenciones) el 28/06/2004 22:52:03
prueba con esto

declara esta variable :

Dim rstVericacionSiExiste As New ADODB.Recordset

Luego coloca el codigo en el evento que prefiera :
Set rstVericacionSiExiste = New ADODB.Recordset
rstVericacionSiExiste.CursorLocation = adUseClient
rstVericacionSiExiste.Open "SELECT * FROM maquina WHERE campo = '" & Text2.Text & "'", cnn, adOpenDynamic, adLockPessimistic

If Text2.Text <> rstVericacionSiExiste!codigo Then

dialog2.show
end if
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:Visual y Acces

Publicado por Javier (4 intervenciones) el 29/06/2004 10:53:06
Hola,

Muchas gracias por la respuesta, pero me da un error en la línea:

rstVericacionSiExiste.Open "SELECT * FROM maquina WHERE campo = '" & Text2.Text & "'", cnn, adOpenDynamic, adLockPessimistic

Yo, desde mi ignorancia, creo que no sabe donde está "maquina" y se lo tendré que decir de alguna manera, así como también "campo", que tendré que poner "num_inv" y donde está, ¿Puede ser esto?

Un saludo!!
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