Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

gelöst Text und Reg Werte über Batch verrechnen?

Mitglied: sraw75

sraw75 (Level 1) - Jetzt verbinden

15.07.2007, aktualisiert 22:35 Uhr, 4267 Aufrufe, 8 Kommentare

Hallo zusammen!

Ich möchte folgende Aufgabe lösen, bin aber offenbar noch weit von der Lösung entfernt:

Ist es möglich mittels einer Batch einen Zahlenwert aus der Registry auszulesen (z.B. Schlüsselname: HKEY_LOCAL_MACHINESOFTWARETest, Wert 0, Name: X, Typ: REG_SZ, Daten: 65.12345), hier also 65.12345. Dann einen Wert aus einer Textdatei auszulesen, z.B. aus C: est.txt mit enthaltener Zeile 0.12345, den ersten Wert vom zweiten zu subtrahieren und das Ergebnis wieder in den obigen Registryschlüssel zurückzuschreiben?

Wäre für einen Lösungsansatz echt dankbar, google schon seit Tagen rum und komme auf keinen grünen Zweig!

Danke schonmal im Vorraus!!
Mitglied: bastla
15.07.2007 um 13:09 Uhr
Hallo sraw75 und willkommen im Forum!

Nur mit Batch allein wüsste ich keine (weniger aufwändige) Möglichkeit, Berechnungen mit Dezimalzahlen durchzuführen, als die folgende Kombination Batch - temporäres VBScript:
01.
@echo off & setlocal 
02.
set "ARV=%temp%\AlterRegVal.vbs" 
03.
set Wert= 
04.
for /f "delims=" %%i in (C:\Test.txt) do if not defined Wert set Wert=%%i 
05.
if not defined Wert goto :eof 
06.
echo CreateObject("WScript.Shell").RegWrite "HKLM\Software\Test",Replace(%Wert%-Replace(CreateObject("WScript.Shell").RegRead("HKLM\Software\Test"),".",","),",","."), "REG_SZ">"%ARV%" 
07.
cscript //nologo "%ARV%" 
08.
del "%ARV%"
Kurze Erklärung:
Mangels näherer Informationen gehe ich davon aus, dass "C:\Test.txt" als ersten (einzigen?) Inhalt den "zweiten" Wert hat und lasse diesen per Batch in eine Variable %Wert% einlesen. Sollte dies nicht gelingen, wird die Batchdatei sofort beendet.

Im nächsten Schritt wird ein temporäres VB-Script zum Auslesen des alten Reg-Wertes, sowie Berechnen und wieder Schreiben des neuen Wertes erzeugt. Dabei wird %Wert% direkt in den Programmcode eingefügt.

Nachdem das Script ausgeführt wurde, kann dieses wieder gelöscht werden.

Da ich alle VB-Anweisungen in eine Zeile "gequetscht" habe und diese damit etwas schwerer nachvollziehbar sind, hier noch die "ausführliche" Version des Scripts (wobei der konstante Wert für "dDateiWert" Deinem Beispiel entspricht und einige zusätzliche Variable verwendet werden):
01.
Set WshShell = CreateObject("WScript.Shell") 
02.
sRegWert = WshShell.RegRead("HKLM\Software\Test") 
03.
dRegWert = Replace(sRegWert, ".", ",") 
04.
dDateiWert = 0.12345 
05.
dNeuerRegWert = dDateiWert - dRegWert 
06.
sNeuerRegWert = Replace(dNeuerRegWert, "," ,".") 
07.
WshShell.RegWrite "HKLM\Software\Test", sNeuerRegWert, "REG_SZ"
Die beiden "Replcae"-Vorgänge sind wegen der impliziten Typkonvertierung String -> Double erforderlich (die Dezimalzahl wird hier mit "," erwartet).

Anmerkung: Ein Fehler, der zB daraus resultieren könnte, dass dem ausführenden User kein Schreibzugriff auf HKLM erlaubt ist oder dass der entsprechende Reg-Wert noch nicht angelegt wurde, führt zwar zur Ausgabe einer Fehlermeldung, wird jedoch (noch) nicht erst in der nächsten Version unten behandelt.


Nur zur Sicherheit noch eine abschließende Frage: Die angegebenen Beispielszahlen würden bei Subtraktion des Wertes aus der Registry vom Wert in der Datei -65 ergeben - sollte eventuell doch umgekehrt der Wert der Datei vom in der Registry gespeicherten Wert abgezogen werden? Falls ja, wäre die "echo"-Zeile durch diese Version zu ersetzen:
01.
echo CreateObject("WScript.Shell").RegWrite "HKLM\Software\Test",Replace(Replace(CreateObject("WScript.Shell").RegRead("HKLM\Software\Test"),".",",")-%Wert%,",","."), "REG_SZ">"%ARV%"
Grüße
bastla

[Edit] Reg-Schlüsselbezeichnung zu Testzwecken auf ein Mindestmaß gekürzt; könnte natürlich auch "HKLM\Software\Test\Wert 0\X" lauten ... [/Edit]
Bitte warten ..
Mitglied: bastla
15.07.2007 um 13:50 Uhr
... Nachtrag: Mit Fehlerbehandlung könnte die Version 1 so aussehen:
01.
@echo off & setlocal 
02.
set "ARV=%temp%\AlterRegVal.vbs" 
03.
set Wert= 
04.
for /f "delims=" %%i in (C:\Test.txt) do if not defined Wert set Wert=%%i 
05.
if not defined Wert goto :eof 
06.
echo On Error Resume Next:sN=Replace(%Wert%-Replace(CreateObject("WScript.Shell").RegRead("HKLM\Software\Test"),".",","),",","."):If Err.Number^<^>0 Then WScript.Quit(1)>"%ARV%" 
07.
echo CreateObject("WScript.Shell").RegWrite "HKLM\Software\Test",sN, "REG_SZ":If Err.Number^<^>0 Then WScript.Quit(2)>>"%ARV%" 
08.
cscript //nologo "%ARV%" 
09.
if errorlevel 2 echo Reg-Wert konnte nicht geschrieben werden. & del "%ARV%" & goto :eof 
10.
if errorlevel 1 echo Reg-Wert konnte nicht gelesen oder verarbeitet werden.  & del "%ARV%" & goto :eof 
11.
del "%ARV%"
Für Version 2 wären folgende "echo"-Zeilen zu verwenden:
01.
echo On Error Resume Next:sN=Replace(Replace(CreateObject("WScript.Shell").RegRead("HKLM\Software\Test"),".",",")-%Wert%,",","."):If Err.Number^<^>0 Then WScript.Quit(1)>"%ARV%" 
02.
echo CreateObject("WScript.Shell").RegWrite "HKLM\Software\Test",sN, "REG_SZ":If Err.Number^<^>0 Then WScript.Quit(2)>>"%ARV%"
Grüße
bastla
Bitte warten ..
Mitglied: sraw75
15.07.2007 um 21:25 Uhr
Hallo bastla!

Danke für die schnelle Antwort und die Mühe. Ich bekomme das Script aber nicht zum laufen. Nach dem Ausführen ist der Wert in der Registry immer noch der Gleiche. Hab momentan auch noch keine Ahnung wo der Fehler liegt.

P.S.: Die Version 2 ist übrigens die Richtige, hatte mich anfangs verschrieben.

Grüße!
Bitte warten ..
Mitglied: 50496
15.07.2007 um 21:32 Uhr
Wie sieht's denn mit den Berechtigungen auf den Schlüssel aus? Als normaler "Benutzer" hat man nur Leserechte.
Bitte warten ..
Mitglied: bastla
15.07.2007 um 21:34 Uhr
Hallo sraw75!

Was steht denn in der "Test.txt"?

Versuch es auch einmal mit "echo on" statt "echo off" in der ersten Zeile und starte direkt von der Kommandozeile, dann siehst Du, wie weit es geht.

Grüße
bastla

[Edit] @50496: Ein Fehler beim Schreiben sollte in der vorläufigen Letzt-Version eigentlich gemeldet werden. [/Edit]
Bitte warten ..
Mitglied: bastla
15.07.2007 um 21:42 Uhr
... und noch was: Den Registry-Key hast Du an Deine Bedingungen angepasst (ich hatte bei meinen Tests den Schlüssel ja direkt unter HKLM\Software angelegt)?

Grüße
bastla
Bitte warten ..
Mitglied: sraw75
15.07.2007 um 22:22 Uhr
Ich hab's, du bist der Hammer!! Der Fehler war tatsächlich der falsche Pfad zur Reg-Datei. Ich hatte unter HKLM\Software einen Ordner namens Test angelegt und der eigentliche Schlüssel in dem der Wert abgelegt ist hies X. Der korrekte Pfad ist also: HKLM\Software\Test\X. Damit klappts.

Vielen Dank nochmal und Grüße!!
Bitte warten ..
Mitglied: bastla
15.07.2007 um 22:35 Uhr
Hallo sraw75!

War eigentlich mein Fehler, aber Dein angegebener Pfad war auch nicht ganz klar, daher die "Kurzfassung" bei mir.

Freut mich, dass es jetzt klappt.

Grüße
bastla

P.S.: Falls übrigens mehrere Schlüssel zu bearbeiten wären, sollte vielleicht ein "echtes" Script mit Parameterübergabe besser passen ...
Bitte warten ..
Ähnliche Inhalte
Windows 8

Excel: Ergebnis einer Formel als Wert in andere Formel verrechnen

Frage von missmurphyWindows 89 Kommentare

Hallo zusammen, ich sitze an einer 2 blättrigen Excel Datei mit einer Budgetübersicht auf dem einen und der Belegliste ...

Batch & Shell

Batch: Variable einen Wert zuweisen

gelöst Frage von veniplexBatch & Shell7 Kommentare

Hallo zusammen! Ich bin gerade am verzweifeln Ich habe in Batch 2 Variablen: Wenn ich mir von diesen den ...

Batch & Shell

CSV kleinerer Wert (Batch)

Frage von jochengBatch & Shell3 Kommentare

Ich habe eine CSV Datei mit folgendem Inhalt: 29664;24,95 29664;12,95 29645;9,95 29645;9,95 29655;12,95 29655;24,95 29664;24,95 29655,12,95 29655,24,95 29664;12,95 29664;24,95 ...

Windows 10

Google-Trends Werte exportiert, wie kann man die als Text gespeicherten Werte als Zahl konvertieren?

Frage von BerrylesWindows 102 Kommentare

Hallo, ich bräuchte dringend Hilfe. Für eine Analyse benötigen wir Google-Trends Daten und diese konnten nur als CSV-Datei exportiert ...

Neue Wissensbeiträge
Windows 10
Zero-Day-Lücke in Microsoft Edge
Information von kgborn vor 1 TagWindows 10

In Microsofts Edge-Browser klafft wohl eine nicht geschlossene (0-Day) Sicherheitslücke im Just In Time Compiler (JIT Compiler) für Javascript. ...

Sicherheit
Microsoft und Skype: Sicherheit
Information von kgborn vor 1 TagSicherheit

Die Tage gab es ja einige Berichte zur Sicherheit des Skype-Updaters. Der Updater von Skype läuft unter dem Konto ...

Datenschutz

Behörden ignorieren Sicherheitsbedenken gegenüber Windows 10

Information von Penny.Cilin vor 2 TagenDatenschutz8 Kommentare

Hallo, passend zum Thema Ablösung LIMUX in München ein interessanter Beitrag dazu: Behörden ignorieren Sicherheitsbedenken gegenüber Windows 10 Anscheinend ...

Sicherheit
Information Security Hub Munich airport
Information von brammer vor 2 TagenSicherheit

Hallo, Neues Center für Cyber Kriminalität am Münchener Flughafen brammer

Heiß diskutierte Inhalte
DSL, VDSL
Mindestgeschwindigkeiten DSL Telekom
Frage von justlukasDSL, VDSL14 Kommentare

Hallo zusammen, Seit diesem Jahr habe ich Verständnisprobleme mit dem Verhalten der Telekom. Wir haben seit einem Jahr VDSL ...

Windows 10
Windows 10 (1709) Tastur und Maus wieder einschalten?
Frage von LochkartenstanzerWindows 1011 Kommentare

Moin, Ich habe von einem Kunden einen Win10-Rechner bekommen, bei dem weder Tastatur noch Maus geht. Die Hardware funktioniert ...

Humor (lol)
Was könnte man mit einem Server machen? Idee gesucht
Frage von 2SeitenHumor (lol)11 Kommentare

Hey Zusammen Ich habe einen alten HP G2 Rackserver zu Hause rumliegen. 28GB Ram, 1xAMD Prozi mit etwa 2GHz. ...

Switche und Hubs
LANCOM-Switch: Probleme (no link) mit SFP-Modulen?
Frage von THETOBSwitche und Hubs11 Kommentare

Hi zusammen, ich habe folgendes Problem: Und zwar habe ich an einem Standort drei Switche verbaut - LANCOM GS-2326P+, ...