URGE, URGE.. Ejecutar consulta de Acción desde VB

Necesito su ayuda urgentemente... Necesito saber como hago para ejecutar Consultas de Acción desde Visual Basic, utilizando Control ADO. Si me pueden mostrar mediante un ejemplo, mucho se los agradeceré, es para la escuela. Mucho se los agradeceré...
Saludos desde Jalisco - Mexico.

1 Respuesta

Respuesta
1
Una sencilla para el Colegio...
Dim VbCliente, VbCliente1 As String
VbCliente = Text1.Text
VbCliente1 = "CODIGOC='" & VbCliente & "'"
If Text1.Text = "" Then GoTo 1
CLIENTE. AdoClient. Recordset. MoveFirst
CLIENTE.AdoClient.Recordset.Find VbCliente1
If CLIENTE.AdoClient.Recordset.EOF Then
1 MsgBox "Cliente, no está registrado", vbExclamation + vbOKOnly, "Error de codificación"
Text1.SetFocus
Text1.Text = ""
Else
Unload Dialog
Dialog.Hide
CLIENTE.Enabled = True
CLIENTE.CmdNewCli.Visible = False
CLIENTE.ActClient.Visible = True
End If
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas