Resumen Manejo de ficheros .ini

>> 1) Como puedo manejar en forma comoda archivos .INI? (leerlos, y que sean
>> actualizados si hay modificaciones, o generados por la aplicacion)
Supongo que la mejor manera será emplear las apis de windows
(GetPrivateProfileString, GetPrivateProfileInt, WritePrivateProfileString y
WritePrivateProfileInt).
Un pequeño ejemplo:

Declare Function GetPrivateProfileString% Lib "Kernel" (ByVal lpAppName$,
ByVal lpKeyName$, ByVal lpDefaults$, ByVal lpReturnedString$, ByVal nSize%,
ByVal lpFilename$)
Declare Function WritePrivateProfileString% Lib "Kernel" (ByVal lpAppName$,
ByVal lpKeyName$, ByVal lpString$, ByVal lpFilename$)

Leer:
lpFilename$ = "datos.ini"
lpReturnString$ = Space$(128) 'no olvides inicializar la variable
Size% = Len(lpReturnString$)
lpAppName$ = "Datos"
lpKeyName$ = "Directorio"
lpDefault$ = "c:\midirectorio"
Valid% = GetPrivateProfileString(lpAppName$, lpKeyName$, lpDefault$,
lpReturnString$, Size%, lpFilename$)
DirDatos = UCase$(left$(lpReturnString$,Valid%)))

Escribir:
lpFilename$ = "erafact.ini"
lpAppName$ = "Opciones"
lpKeyName$ = "GrabarConError"
aux = IIf(gGrabarConError, "S", "N")
Valid% = WritePrivateProfileString(lpAppName$, lpKeyName$, aux, lpFilename$)


Un saludo.

_________________________________________________
José Rubí de la Vega
E-mail : jrubi@arrakis.es
WWW : http://www.arrakis.es/~jrubi
Podrás encontrar información sobre VB, la lista
VB-ESP y un resumen de los mensajes de la misma



Resumen Resumen

Visual Basic Página de Visual Basic

Página principal Página principal

www.jrubi.com