[VB.Net] Come leggere e scrivere un file INI

[bluelions]

In vb.net come faccio a leggere e a scrivere un file INI?

Grazie

[verardoelvis]

io l'ho fatto in VB6 utilizzando le API GetPrivateProfileStringA e WritePrivateProfileStringA.

Comunque poi cercare nel forum e trovi un post scritto da xegallo con tutta la sintassi, ecc.
ciao

[bluelions]

anche io l'ho fatto in VB6, però ora mi serve in vb.net

[verardoelvis]

Prova con le APi che ti ho detto, dovrebbe funzionare.....è un'API!!!

[forno]

io lo faccio senza problemi!

    'la funzione GetPrivateProfileString dichiarata come Unicode
    Private Declare Unicode Function GetPrivateProfileString Lib "kernel32" _
    Alias "GetPrivateProfileStringW" (ByVal lpApplicationName As String, _
    ByVal lpKeyName As String, ByVal lpDefault As String, _
    ByVal lpReturnedString As String, ByVal nSize As Int32, _
    ByVal lpFileName As String) As Int32

    'la funzione WritePrivateProfileString dichiarata come Unicode
    Private Declare Unicode Function WritePrivateProfileString Lib "kernel32" Alias _
    "WritePrivateProfileStringW" (ByVal lpApplicationName _
    As String, ByVal lpKeyName As String, ByVal lpString As String, _
    ByVal lpFileName As String) As Long

Poi segue questo

    Public Function ReadIniData(ByVal Section As String, ByVal Key As String) As String
        Dim Valore As Long
        Dim RetVal As String = Space(256)
        Valore = GetPrivateProfileString(Section, Key, "<Nessun valore>", RetVal, RetVal.Length, FileNAME)
        ReadIniData = Trim(RetVal.ToString)
    End Function

    Public Function WriteIniData(ByVal Section As String, ByVal Key As String, ByVal Value As String) As String
        Dim Valore As Long
        Dim RetVal As String = Space(256)
        Valore = WritePrivateProfileString(Section, Key, Value, FileNAME)
        WriteIniData = Trim(RetVal.ToString)
    End Function

e infine quando dovete leggere o scrivere:

WriteIniData(Sezione,Chiave,Valore)
ReadIniData(Sezione,Chiave)

Ciao