Jump to content

Registry-Eintrag ändern?


Der letzte Beitrag zu diesem Thema ist mehr als 180 Tage alt. Bitte erstelle einen neuen Beitrag zu Deiner Anfrage!

Recommended Posts

Hallo Leute,

 

wie kann man einfach per Mausklick einen Registry Wert ändern?

 

z.B.

HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\TerminalServer\WinStations\RDP-Tcp\PortNumber

 

möchte ich einfach die Portnummer ändern können ohne vorher in die Registry mir den Pfad rauszusuchen.

 

Am Besten wäre den aufrufenden Kommando einfach einen Wert als Parameter zu übergeben...

 

Danke euch!

Link to comment

Hi!

Das kannst Du z.B. mit einem VB-Script machen, durch Import des Schlüssels mit entsprechend gesetzen Werten ... Boardsuche mit "Registry Import" bzw. "Script Registry" sollte Dir einige Beispiele / Anleitungen liefern, mit denen Du weitermachen kannst.

Ich mach solche Dinge immer mit Delphi. Wenn Du dazu Beispielcode brauchst, schick 'ne PN.

Gegrüßt!

Link to comment

Hi!

"...kann man nicht einfach ne reg-datei schreiben und dann einfach so importieren??"

- Jein.

Du kannst den Schlüssel in der Registry ändern und das dann exportieren. Das kannst Du jeweils für unterschiedliche Werte machen und hast dann entsprechend unterschiedliche Export-Dateien.

Die könntest Du Dir z.B. via Batch mit Parameter oder separate Batches importieren ... auf Knopfdruck.

Gegrüßt!

 

@blub: Von diesem großen Wurf habe ich auch schon gerüchteweise gehört. Ein Kollege meinte, das solle auch dialektfest sprachgesteuert sein. Kannst Du das bestätigen?

Link to comment

Hallo fisch-li,

 

kopiere das Script mal in datei bennene sie in blabla.vbs lege sie nun auf deinen desktop und klicke doppelt darauf.

 

 

On Error Resume Next

 

Set WshShell =CreateObject("WScript.Shell")

Path = "HKLM\SYSTEM\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp\PortNumber"

val = InputBox("Port Nummer eingeben", "RDP Portnumber ändern")

typ="REG_DWORD"

 

WshShell.RegWrite Path, val, Typ

If Err.Number <> 0 Then

WScript.Echo "Beim Bearbeiten der Registry ist ein Fehler aufgetreten: " & Err.Number

Else

WScript.Echo "Die Registry wurde erfolgreich bearbeitet"

End If

 

Gruß hustinettenbaer

Link to comment
Der letzte Beitrag zu diesem Thema ist mehr als 180 Tage alt. Bitte erstelle einen neuen Beitrag zu Deiner Anfrage!

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...