Tipp 7.3 - Wert in WIN.INI schreiben

Wie kann ich einen Wert in die WIN.INI schreiben?

Mit dieser Funktion können Sie einen Wert in die WIN.INI schreiben. Kopieren Sie einfach nachfolgenden Quellcode in die Zwischenablage und fügen Sie anschließend den Inhalt der Zwischenablage in ein neues Modul ein. Die Aufrufparameter finden Sie im Quellcode beschrieben.

Api-AufrufeVerwendete Win32-Api-Aufrufe und Typen: WriteProfileString

Beispiel:

Option Explicit
 
Public Declare Function WriteProfileString _
    Lib "kernel32" Alias _
    "WriteProfileStringA" _
    (ByVal lpszSection As String, _
    ByVal lpszKeyName As String, _
    ByVal lpszString As String) As Long
 
Public Function WriteWIniSetting( _
                sSection As String, _
                sKey As String, _
                sValue As String) As Boolean
  '// -----------------------------------------------------
  '// Methode:   | Schreibt einen Wert in die WIN.INI
  '// -----------------------------------------------------
  '// Parameter: | sSection = Sektionsname [...]
  '//            | sKey = Schlüsselname
  '//            | sValue = zu schreibender Wert
  '// -----------------------------------------------------
  '// Rückgabe:  | True = Schreiben war erfolgreich
  '// -----------------------------------------------------
  '// Autor:     | Stefan Kulpa
  '//            | EDV Innovation & Consulting - Dormagen
  '// -----------------------------------------------------
  WriteWIniSetting = WriteProfileString(sSection, _
                                        sKey, sValue)
 
End Function