Ver Mensaje Individual
  #1 (permalink)  
Antiguo 19/05/2008, 02:22
jocormix
 
Fecha de Ingreso: abril-2008
Mensajes: 16
Antigüedad: 16 años, 1 mes
Puntos: 0
Mensaje ficheros ini en vs 2005

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