Mensajes

EXCLENTE!!!

mE FUNCIONO DE 10!!!!

mUCHISIMAS GRACIAS!!!!

mmm pasa que yo antes no me exprese bien

Lo que estoy tratando de hacer es un programa, de cuentas corrientes, donde lleva diferentes datos,

ejeplo:
1.dat

[Numero de Cliente]
Cliente=1

[Nombre Y Apellido]
Nombre=Ejemplo

[Teléfono]
Teléfono=Ejemplo

[Domicilio]
Domicilio=Ejemplo

[Documento]
Documento=Ejemplo

[Saldo]
Debe=370

[Proximas Visitas]
Proximo Pago=02/06/2010
Proxima Visita=28/05/2010

Y el que me requirio el programa, me pido que agrege una funcion, con la cual, a el le muestre la gente que tiene que ir a cobrar el dia de hoy y la gente que tiene que visitar, junto con su direccion y telefono, e ingresarsela en un textbox asi luego le manda imprimir desde otro boton y obtiene la gente que tiene que visitar ese dia.

La verdad que sigo intentando y no puedo, no me darias una ayuda por msn?

XXXXXXXXXXXXXXXX (msn)

desde ya muchas gracias

Moderador: no se pueden dejar direccciones de mail.

muchas gracias a ambos, pero la verdad no entendi como utilizarlo dessa, me podrias explicar un poco mas?

Yo utilizo la funcion getvar para obtener datos de x archivo de texto

de la siguiente manera:

Código [Seleccionar] Expandir

Function GetVar(ByVal file As String, ByVal Main As String, ByVal Var As String, Optional EmptySpaces As Long = 1024) As String
    Dim sSpaces As String, szReturn As String
    szReturn = ""
    sSpaces = Space$(EmptySpaces)
    GetPrivateProfileString Main, Var, szReturn, sSpaces, EmptySpaces, file
    GetVar = RTrim$(sSpaces)
    GetVar = Left$(GetVar, Len(GetVar) - 1)
End Function

Private Sub Form_Load()

Archivo = "\Cuentas\" & FrmMain.File1.FileName
txtCuenta.Text = GetVar(App.Path & Archivo, "Numero de Cliente", "Cliente")
txtNombre.Text = GetVar(App.Path & Archivo, "Nombre Y Apellido", "Nombre")

End Sub


Es decir en el archivo busca asi:
[numero de cliente]
cliente="dato que toma"

Como podría adaptar eso a que lo haga en todos los archivos que se encuentran dentro del File1, osea dentro de una carpeta.

Ahora creo que me explique mejor

Desde ya muchas gracias!

[Hola!!Veran tengo un problema, yo tengo un programa, que se maneja con archivos de texto no?Y bueno yo quiero que busque X palabra en todos los archivos de texto que haya en una carpeta.Y el problema es que no se como hacerlo porque yo se hacer que busque en 1 archivo de texto con la funcion getvar.Pero cuando hay que buscar en todos los archivos de texto de una carpeta se me complica, alguna ayudita?Desde ya gracias!Saludos]

Hola!!

Veran tengo un problema, yo tengo un programa, que se maneja con archivos de texto no?
Y bueno yo quiero que busque X palabra en todos los archivos de texto que haya en una carpeta.

Y el problema es que no se como hacerlo porque yo se hacer que busque en 1 archivo de texto con la funcion getvar.
Pero cuando hay que buscar en todos los archivos de texto de una carpeta se me complica, alguna ayudita?

Desde ya gracias!

Saludos