lizard
Goto Top

VB6 REG BINARY Wert ändern

Hi.
Ich hab das problem, dass ich alles außer den REG_Binary Wert ändern kann.
Leider hab ich keine passende Hilfe gefunden, wie ich das mit meinem vorhanden Code anstellen könnte.

Dies ist der Code den ich im Mom. hab:

~~~ CODE ANFANG ~~~
Private Sub SetKeyValue(sKeyName As String, sValueName As String, vValueSetting As Variant, lValueType As Long)
Dim lRetVal As Long
Dim hKey As Long

lRetVal = RegOpenKeyEx(HKEY_LOCAL_MACHINE, sKeyName, 0, KEY_SET_VALUE, hKey)
lRetVal = SetValueEx(hKey, sValueName, lValueType, vValueSetting)
RegCloseKey (hKey)
End Sub

Private Sub Command1_Click()
SetKeyValue "SOFTWARE\RealVNC\WinVNC4", "Password", "hierdanndassPW", REG_BINARY
End Sub
~~~ CODE ENDE ~~~

Mein Ziel ist es, dass ich dann das pw vom VNC übers netz auf jeder station ändern kann.
Somit will ich mir ersparen überall auf den stationen ein neues pw zu vergeben. (sind viele Rechner)

Wie kann ich es schaffen, dass ich den REG_BINARY Wert in die Registry bekomm?
Mit REG_DWORD und REG_SZ funktioniert der oben angegebene Code.


Hab irgend etwas mit "Byte arrays" gelesen.
Kann aber damit nichts anfangen.

Danke für eure Hilfe!

Content-Key: 100149

Url: https://administrator.de/contentid/100149

Printed on: April 25, 2024 at 09:04 o'clock

Member: bastla
bastla Oct 24, 2008 at 22:57:43 (UTC)
Goto Top
Hallo Lizard!

Versuch es so:
SetKeyValue "SOFTWARE\RealVNC\WinVNC4", "Password", Array(104,105,101,114,100,97,110,110,100,97,115,80,87), REG_BINARY
Grüße
bastla
Member: Lizard
Lizard Oct 27, 2008 at 10:27:25 (UTC)
Goto Top
Danke für die Antwort.
Aber irgendwie macht der nichts, wenn ich das 1zu1 kopiere.

Muss ich noch irgend was eintragen?

MFG