Esto no es mas que una consulta que deberia tomar los datos de un FRM y actualizarlos en la Tabla DATOS, pasa bien pero no tira errores ni tampoco actuliza en la tabla.....
bueno muchas gracias..
If GestionEmpresa.opcionGestionEmpresa = "M" Then
Sql = "update Datos set nombre= ' " & Text2.Text & " ',calle= ' " & Text3.Text & " ',numero= ' " & Text4.Text & " ',codpostal= ' " & Text5.Text & " ',cuit= ' " & Text7.Text & " ',iva= ' " & Text8.Text & " ',ingbrutos= ' " & Text9.Text & " ',apertura= ' " & Text10.Text & " ',cierre= ' " & Text11.Text & " ',actividad= ' " & Text6.Text & " ' where Codigo= ' " & Text1.Text & " '"
Operacional.Modificar
End If