HElp!!
Publicado por joseb (3 intervenciones) el 03/07/2007 17:27:15
Saben que yo al darle a un boton en un formulario hago una rutina que se llama acutalizar la cual es:
Private Sub Actualizar()
Dim Actualizar As ADODB.Recordset
Set Actualizar = New ADODB.Recordset
With Actualizar
.Open "Select * From Inventario Where Inv_NroParte = '" & Txt_Serv_NroParte.Text & "'", CCone, 2, 3
If .EOF = False Then
.Fields("Inv_Cantidad").Value = Disponible
.Update
End If
End With
End Sub
entonces yo quiero que al darle a otro boton se restaure la informacion incial puesta en una base de datos por esta rutina
Private Sub Actualizar()
Dim Actualizar As ADODB.Recordset
Set Actualizar = New ADODB.Recordset
With Actualizar
.Open "Select * From Inventario Where Inv_NroParte = '" & Txt_Serv_NroParte.Text & "'", CCone, 2, 3
If .EOF = False Then
.Fields("Inv_Cantidad").Value = Disponible
.Update
End If
End With
End Sub
entonces yo quiero que al darle a otro boton se restaure la informacion incial puesta en una base de datos por esta rutina
Valora esta pregunta
0