Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Akkustand als .txt Datei ausgeben (2 Akkus)
Autor: woodpecker
Datum: 28.08.18 17:52
Hallo, ich möchte den Akkustand, von den beiden Akku´s am Tablet mit Windows 10, in eine .txt Datei schreiben. Für den internen Akku ist das auch kein Problem, aber beim externen komme ich einfach nicht weiter. Vielleicht hat ja einer eine Idee oder ne Lösung für mich. mein bisheriges script: Do Set WshShell = WScript.CreateObject("WScript.Shell") strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2") Set colItems = objWMIService.ExecQuery( "SELECT * FROM Win32_Battery",,48) For Each objItem in colItems Set FSO = CreateObject("Scripting.FileSystemObject") Set MyFile = FSO.CreateTextFile("c:\VBS\akku.txt ", TRUE) MyFile.Close Set MyFile = FSO.OpenTextFile("c:\VBS\akku.txt", 8) MyFile.WriteLine ""& objItem.EstimatedChargeRemaining &"" MyFile.Close next WScript.sleep 60000 Loop

Akkustand als .txt Datei ausgeben (2 Akkus)	1.549	woodpecker	28.08.18 17:52
Re: Akkustand als .txt Datei ausgeben (2 Akkus)	529	Franki	04.09.18 01:42
Re: Akkustand als .txt Datei ausgeben (2 Akkus)	506	woodpecker	04.09.18 20:11

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen