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
Rispondi quotando
