Registry vs. AppData

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Andreas,
neben den Registry-Einträgen z.B. über VBA-Setting nutze ich immer gerne noch die "alten" Inidateien. Mit zwei API-Funktionen kannst Du die ganz leicht ein- oder auslesen.
Dazu habe ich mir auch mal eine Lese/Schreibfunktion gebaut.

Code:





	
	
	
	


Private Declare PtrSafe Function GetPrivateProfileStringA Lib "kernel32" ( _
        ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, _
        ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Private Declare PtrSafe Function WritePrivateProfileStringA Lib "kernel32" ( _
        ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, _
        ByVal lpFileName As String) As Long

Function SetGetInidaten(sBereich As String, sItem As String, Optional sDaten As String) As String
'Schreibt Daten in die Textdatei oder liest Daten aus der Textdatei
  Dim sPfad As String, sTxt As String * 5000, l As Integer
 
  sPfad = Environ$("TEMP") & "&bsol;MyIni.txt"
  If sDaten <> "" Then
     WritePrivateProfileStringA sBereich, sItem, sDaten, sPfad
  Else
     l = GetPrivateProfileStringA(sBereich, sItem, "none", sTxt, 5000, sPfad)
     SetGetInidaten = Left$(sTxt, l)
 End If
End Function

Sub Schreibewas1()
  SetGetInidaten "Sektor1", "MeinWert", "Hallo World!"
End Sub

Sub Lesewas1()
  MsgBox SetGetInidaten("Sektor1", "MeinWert")
End Sub

_________________________
viele Grüße aus Freigericht 😊
Karl-Heinz

Hallo,
ob Du das ganze in der Registry, per Datei in einem Ordner, auf einem Tabellenblatt oder in den CustomDocumentProperties oder wo auch immer machst ist im Grunde egal.
Man muss sich natürlich grundlegende Fragen stellen. Die wichtigste Frage ist meines Erachtens ob alle Nutzer die gleichen Einstellungen verwenden oder ob jeder Nutzer individuelle Einstellungen bekommen soll. Vielleicht wäre es auch interessant, ob und wie die Einstellungen gesichert werden sollen, z. B. wenn der Rechner/Server getauscht wird. Da muss man halt entscheiden, ob man die AddIns im User-Verzeichnis, die Registry oder die Einstellungsdatei sichert und auf den neuen Rechner/Server kopiert. Bei den letzten beiden varianten kann man dann das AddIn einfach aus dem original wieder installieren.
Übrigens kann man auch in einer Addin-Datei Werte in Tabellenblätter schreiben und auslesen (oder CustomDocumentProperties). Da AddIn-Dateien idR in einen Benutzerorder kopiert werden, sind diese Einstellungen dann Nutzerbezogen.
Bei den Einstellungsdateien (ob ini, xml oder was auch immer ...) muss man halt den entsprechenden Ordner wählen, in den man die Datei ablegt, um es benutzerbezogen oder für alle gleich möchte.
Alle Möglichkeiten sind also grundsätzlich geeignet.
Gruß
Michael

Beliebteste Forumthreads (12 Monate)

17
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Registry vs. AppData

17 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

17
Beiträge zum Forumthread

Beiträge zu diesem Forumthread