|
Un gusto saludarte tengo este codigo y me da el error por titulo talves si me puedes ayudar
Private Sub Command1_Click()
If rsempresa.EOF = False Then
If Text1.Text <> " " Then
rsempresa!nombre_emp = Text1.Text
Else
MsgBox "Ingrese el nombre de la empresa"
End If
End If
End Sub
|