Utilizzo il codice trovato a questa pagina per creare un modulo che legga e scriva un file INI in cui memorizzare dei settings di un programmino semplice semplice che sto realizzando.

http://forum.masterdrive.it/articoli...file-ini-24494

Purtroppo in fase di debug rilevo un errore che mi dice che tento di fare una divisione per sero alla riga in questione:

strText = Left(strText, intLen)

In realtà ha ragione in quanto il valore di strText letto è vuoto e non capisco perchè.

Questa è la parte di codice in questione nell'intorno dell'errore:

' legge I dati dal file, e ne cerca eventuali errori
strText = Space(lStringBuffer) ' BUFFER
intLen = GetPrivateProfileString(strSection, strKeyName, "", _
strText, Len(strText), strIniFile)
If intLen > -1 Then
strText = Left(strText, intLen)
Else
MsgBox "Error into INI file"
Exit Function
End If

Questa la stringa che recupera i dati dal file INI.

intLen = GetPrivateProfileString(strSection, strKeyName, "", _
strText, Len(strText), strIniFile)

in cui in fase di debug mi trovo corretti sia la sezione che la key ma non la stringa..

Potrei supporre un errore nel file ini ma la scrittura è semplice e tra l'altro funziona ed è nel classico formato:

[sezione]
key=valore

Se qualcuno può aiutarmi..

Grazie

Paolo