Desktop Management Scripting-Sprache › Funktionen › Funktionen zum Bearbeiten der Registrierung › RegSetVariable - Speichern einer Variablen in einem Registrierungsschlüssel

RegSetVariable - Speichern einer Variablen in einem Registrierungsschlüssel

Gültig für Windows

Die Funktion "RegSetVariable" speichert eine Variable im angegebenen Registrierungsschlüssel.

Funktionssyntax:

RegSetVariable(hKey as Integer, name as String, value as Integer) as Boolean

RegSetVariable(hKey as Integer, name as String,	value as String) as Boolean

RegSetVariable(hkey as integer, name as string, buffer as void, bufsize as integer) as integer.

RegSetVariable(hkey as integer, name as string, buffer as void, bufsize as integer, type as integer) as integer.

hKey

Gibt einen zurzeit offenen oder einen vordefinierten Schlüssel an. Der Parameter "hKey" kann einen der folgenden vordefinierten Werte aufweisen:

HKEY_CLASSES_ROOT

HKEY_CURRENT_USER

HKEY_LOCAL_MACHINE

HKEY_USERS

name

Gibt den Namen der festzulegenden Variablen an.

value

Gibt den Zeichenfolgen- oder Ganzzahlwert an, der in der Variablen festgelegt werden soll.

buffer

Der Puffer, der den in der Variablen festzulegenden Wert enthält.

bufsize

Größe des Puffers in Zeichen, wenn der Puffer den Typ "String" oder den Array-Typ "char" aufweist, andernfalls wird die Anzahl an Byte angegeben.

type

Der Typ des Registrierungseintrags.

Der Typ des Registrierungseintrags wird in Microsoft-Notation zurückgegeben:

REG_NONE

Wert 0

REG_SZ

Wert 1

REG_EXPAND_SZ

Wert 2

REG_BINARY

Wert 3

REG_DWORD

Wert 4

REG_DWORD_LITTLE_ENDIAN

Wert 5

REG_DWORD_BIG_ENDIAN

Wert 6

REG_LINK

Wert 7

REG_MULTI_SZ

Wert 8

Bei erfolgreichem Abschluss gibt die Funktion TRUE zurück, andernfalls FALSE.

Beispiel:

Führen Sie vor dem Starten des folgenden Beispiels zunächst das Beispiel für die Funktion "RegOpenKey" aus.

Dim value as string
Dim hkey1 as integer
Dim name, str, dummy as string
Dim i, i1, rtr, int as integer
Dim bBuf[100] as Byte
Dim cBuf[100] as char

ClrScr()

hkey1 = RegOpenKey(HKEY_LOCAL_MACHINE, "SOFTWARE\CA\4 test only")
if hkey1 = 0 then
	Print("RegOpenKey failed.")
	exit
endif

rtr = RegQueryVariable(hkey1, "var_2", str, int)
Print(Str(rtr) + ": var_2 = " + str)
int = 100
str = ""
rtr = RegQueryVariable(hkey1, "var_2", dummy, int, str)
Print(Str(rtr) + ": var_2(" + Str(int) + ") = " + str)
int = 100
str = ""
rtr = RegQueryVariable(hkey1, "var_2", dummy, int, cBuf)
for i1 = 0 to int - 1
	str = str + cBuf[i1]
next i1
Print(Str(rtr) + ": var_2(" + Str(int) + ") = " + str)
int = 100
str = "| "
rtr = RegQueryVariable(hkey1, "var_2", dummy, int, bBuf)
for i1 = 0 to int - 1
	str = str + Str(bBuf[i1]) + " | "
next i1
Print(Str(rtr) + ": var_2(" + Str(int) + ") = " + str)

RegCloseKey(hkey1)