SoloCodigo

Hola a todos:

Quisiera que me ayudaran, el problema es el siguiente:

Tengo en un formulario un data grid, que muestra los datos de los clientes, pero al agregar un nuevo cliente yo quisiera que el data grid se pusiera en blanco y luego al grabar el cliente que me muestre todos los clientes de nuevo, no se si me doy a explicar, espero su ayuda, de antemano gracias a todos.


Erasmo:adios:

Gracias Angeles:kiss:

Te agradezco mucho, me funciono tu respuesta,

Hasta luego, cuidate muchos:suerte:

Erasmo:adios:

si lo lei, pero no me funciono lo que me plantearon y pense que a lo mejor no me habia explicado bien.

si tienes una idea mejor, te agradecere me ayudes.

gracias.

erasmo.

Hola a todos:

Mi consulta es la siguiente, he creado una tabla temporal atraves de una consulta generada con sql, la cual se agrega a la base de datos, yo quisiera borrar esa tabla temporal de la base desde visual basic, atraves de codigo, si alquien sabe que comando o que instruccion debo utilizar para realizar esta operacion, le agradecere mucho, gracias:gracias:

Hasta luego.

Erasmo.

Hola a todos

Quisiera que me ayudaran, paso una tabla de una base de datos a un archivo de texto, con el siguiente codigo:

Option Explicit

Private Sub cmdExportar_Click()
Dim fnum As Integer
Dim archivo As String
Dim rs As Recordset
Dim campos As Integer
Dim campo_ancho() As Integer
Dim campo_valor As String
Dim i As Integer
Dim contador As Integer

    On Error GoTo miscerror
   
    If deRenta.cnRenta.State = adStateClosed Then
        deRenta.cnRenta.Open
    End If
   
    fnum = FreeFile
    archivo = Me.txtArchivo.Text
    Open archivo For Output As fnum
       
    Set rs = New ADODB.Recordset
   
    rs.Open "Select Nombre, Nit, Valor, Renta from Movimientos", deRenta.cnRenta, adOpenDynamic, adLockReadOnly
       
    campos = rs.Fields.Count
    Do While Not rs.EOF
        contador = contador + 1
        For i = 0 To campos - 1
            campo_valor = rs.Fields(i).Value
            Print #fnum, campo_valor;
        Next i
        Print #fnum, ""
        rs.MoveNext
    Loop
   
    Close fnum
    MsgBox Format$(contador) & " Registros Procesados"
   
    Exit Sub
miscerror:
    MsgBox "Error " & Err.Number & vbCrLf & Err.Description
End Sub

Private Sub cmdSalir_Click()
    Unload Me
End Sub

Private Sub Form_Load()
    Me.txtBase.Text = App.Path & "Renta.mdb"
    Me.txtArchivo.Text = App.Path & "Renta.txt"
End Sub

y obtengo el archivo de texto pero los campos unidos, yo quisiera por decirles algo que el nombre tuviera un ancho de 50 caracteres, luego un numero de identificacion de 10 caracteres y asi sucesivamente, es de decir que atraves de codigo yo le diga en que posicion van a caer los campos, pero no se como se hace, mucho les agradecere me ayuden, Gracias a todos:gracias:

Erasmo:adios:

Hola a todos.

Quisiera saber como hacer para validar una entrada de usuario de una factura que es un campo alfanumerico, es decir que cuando el usuario digite por ejemplo: F10145, en la caja de texto verifique si esta factura existe o no en la base. yo ya probe con find. pero me da un error.

Agradeceria mucho la ayuda:ayuda:

Gracias:adios:

Erasmo

necesito mandar datos que he capturado en un formulario a un reporte que he creado previamente, gracias por su ayuda.