Bonjour à tous,

Voilà, j'ai une application en VB.NET 2003, je cherches à lire dans un fichier INI :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
    Public 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
    Public Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpString As String, ByVal lpFileName As String) As Long
 
        Dim l_IniFile As String
        Dim l_Pos As Integer
        Dim l_Domain As String
        Dim l_Logon As String
        Dim l_Password As String
        Dim l_TempString As String
 
        l_IniFile = Application.StartupPath + "\Logon.ini"
 
        l_TempString = New String(" ", 100)
 
        l_Pos = GetPrivateProfileString("Workflow", "Domain", " ", l_TempString, 100, l_IniFile)
        l_Domain = Trim(Left(l_TempString, l_Pos))
À la ligne l_Pos = GetPrivateProfileString("Workflow", "Domain", " ", l_TempString, 100, l_IniFile) j'obtiens l'exception suivante :

Une exception non gérée du type 'System.OverflowException' s'est produite dans ...

Informations supplémentaires*: L'opération arithmétique a provoqué un dépassement de capacité.
Quelqu'un a une idée de ce que pourrait être le problème? J'ai regardé dans les autres threads de fichiers INI sur le forum et je n'ai rien trouvé qui pourrait m'aider.

Merci d'avance...