ReadIniFile Reads Ini Files WriteIniFile Writes Ini Files

by Jafo C -Null (1 Submission)
Category: String Manipulation
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Mon 1^st April 2002
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

API Declarations
Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long

Rate ReadIniFile Reads Ini Files WriteIniFile Writes Ini Files



'FUNCTION: ReadIniFile (Reads an Ini File)

Function ReadIniFile(ByVal strIniFile As String, ByVal StrSection As String, ByVal strKey As String) As String
    Dim strBuffer As String
    Dim intPos As Integer

    strBuffer = Space$(gintMAX_SIZE)
    
    If GetPrivateProfileString(StrSection, strKey, gstrNULL, strBuffer, gintMAX_SIZE, strIniFile) > 0 Then
        ReadIniFile = RTrim$(StripTerminator(strBuffer))
    Else
        ReadIniFile = gstrNULL
    End If
End Function


'FUNCTION: WriteIniFile (Writes an Ini File)

Function WriteIniFile(ByVal strFilename As String, ByVal StrSection As String, ByVal strKey As String, ByVal strString As String) As Long
    WriteIniFile = WritePrivateProfileString(StrSection, strKey, strString, strFilename)
End Function

Download this snippet Add to My Saved Code

ReadIniFile Reads Ini Files WriteIniFile Writes Ini Files Comments

No comments have been posted about ReadIniFile Reads Ini Files WriteIniFile Writes Ini Files. Why not be the first to post a comment about ReadIniFile Reads Ini Files WriteIniFile Writes Ini Files.

ReadIniFile Reads Ini Files WriteIniFile Writes Ini Files

ReadIniFile Reads Ini Files WriteIniFile Writes Ini Files Comments

Post your comment

Difficulty