ficheros ini en vs 2005

[jocormix]

hola a todos:
quiero conectar con un fichero .ini cuando mi aplicacion inicie, me da un error que dice que I = 0, alguien sabe porque me da ese problema.
¿donde tengo que colocar el .ini, en la carpeta del programa....?

este es el codigo:

Module Module1
Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long

Sub Main()
Dim I As Integer
Dim Est As String
Est = Space(50)
I = GetPrivateProfileString("Ejemplo", "Nombre", "", Est, Len(Est), "ejemplo.ini")
If I > 0 Then
MsgBox("Tu Nombre es: " & Est)
End If
End Sub

End Module

muchas gracias.
un saludo

[Avellaneda]

Hola,

le tienes que poner la ruta completa y el fichero:

p.e. "c:\ejemplo.ini"

Si lo tienes en el mismo directorio que la aplicación, puedes poner

CurDir() & "\ejemplo.ini"

Por otra parte, veo que la variable "i" la estás declarando como integer y la función GetPrivateProfileString devuelve un Long, esto normalmente no dá error, pero es conveniente que ambas coincida.