Autor Tema: --> Vb 6 Y Archivos *.inf .:: Urgente ::. (Leído 1288 veces)

makisone · « **en:** Viernes 23 de Julio de 2004, 23:52 »

Hola, tengo una aplicacion ke guarda una serie de datos (texto) en un archivo .inf, pero siempre me lo guarda con un Intro de mas y no hay manera de kitarlo.

¿Alguien sabe como hacerlo?

SaLuDoS.

Jose Arriagada

Si colocas en este foro la parte del codigo que guarda las lineas, o mejor aun, las ultima linea en el archivo, quizas podamos ayudarte, por que aun, ninguno de nosotros tiene la capacidad de adivinar. Por lo menos, yo no. Con el codigo, te ayudariamos mejor.

makisone

Private Sub OKButton_Click()

Config = ""

If Mid(Dir1.Path, 3, 3) = "\" Then
Config = "1" & Dir1.Path
Else
Config = "1" & Dir1.Path & "\"
End If

SaveConfig

Unload Me

End Sub

--------MODULO-------

Function SaveConfig()

ConfigCanal = FreeFile
DirConfig = "D:\Visual basic\Mis proyectos\MKS\config.inf"

Open DirConfig For Output As ConfigCanal
Print #ConfigCanal, Config
Close ConfigCanal

LoadConfig

End Function

SoloCodigo

Autor Tema: --> Vb 6 Y Archivos *.inf .:: Urgente ::. (Leído 1288 veces)

makisone

--> Vb 6 Y Archivos *.inf .:: Urgente ::.

Jose Arriagada

Re: --> Vb 6 Y Archivos *.inf .:: Urgente ::.

makisone

Re: --> Vb 6 Y Archivos *.inf .:: Urgente ::.