| |
VB Skript (VBS)vbs läuft nicht | | | Autor: hajosch | Datum: 26.02.15 10:23 |
| Hallo,
folgendes Script bringt die nachfolgende Fehlernachricht:
Set SRP = GetObject( "winmgmts:\\.\root\default:Systemrestore" )
abfrage = inputbox("Geben Sie bitte einen Namen für den Wiederherstellungspunkt ein: ", "Eingabe", "Routine")
if abfrage = "" then
antwort1 = msgbox ("Falsche Eingabe, oder Feld leer!", vbOKonly + vbExclamation,"Fehler")
else
CSRP = SRP.CreateRestorePoint( abfrage, 0, 100 )
antwort2 = msgbox ("Wiederherstellungspunkt '" & abfrage & "' wurde gesetzt!", vbOKonly + vbInformation,"Info")
end if
---------------------------
Windows Script Host
---------------------------
Skript: H:\Batch-Win8\SystemprüfpunktErst.vbs
Zeile: 6
Zeichen: 1
Fehler: Zugriff verweigert.
Code: 80041003
Quelle: SWbemObjectEx
Zeile 6 lautet:
CSRP = SRP.CreateRestorePoint( abfrage, 0, 100 )
In die msgbox habe ich sowohl "Eingabe", wie auch "Routine" eingegeben (ohne ").
Mein System: Windows 8.1
Wie bekomme ich das Script zum Laufen?
Gruß
hajosch | |
Re: vbs läuft nicht | | | Autor: powerzone3000 | Datum: 27.02.15 14:40 |
| Um Systemwiederherstellungspunkte zu erstellen, benötigt man Administratorrechte.
Füge folgenden Schnipsel an den Anfang deines VB-Scripts, dann sollte Windows (bei aktivierter Benutzerkontensteuerung) nach der Berechtigung fragen
If WScript.Arguments.length =0 Then
Set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "wscript.exe", """" & _
WScript.ScriptFullName & """" & " uac","", "runas", 1
Else
' Dein Code
End If
Beitrag wurde zuletzt am 27.02.15 um 14:41:07 editiert. | |
Re: vbs läuft nicht | | | Autor: hajosch | Datum: 28.02.15 10:34 |
|
---------------------------
Info
---------------------------
Wiederherstellungspunkt 'Routine' wurde gesetzt!
---------------------------
OK
---------------------------
Stimmt nicht!!!!
In der Systemwiederherstellung wird kein Wiederherstellungspunkt
unter heutigem Datum angezeigt.
Gruß hajosch | |
Re: vbs läuft nicht | | | Autor: powerzone3000 | Datum: 02.03.15 14:36 |
| Vermutlich wurde dann in den letzten 24 Stunden bereits ein Wiederherstellungspunkt erstellt.
siehe: https://msdn.microsoft.com/de-de/library/windows/desktop/aa378847%28v=vs.85%29.aspx
Zitat: | | If an application calls the CreateRestorePoint method to create a restore point, Windows skips creating this new restore point if any restore points have been created in the last 24 hours. The CreateRestorePoint method returns S_OK. | |
Das lässt sich aber durch einen Registryschlüssel beeinflussen:
Zitat: | | Developers can write applications that create the DWORD value SystemRestorePointCreationFrequency under the registry key HKLM\Software\Microsoft\Windows NT\CurrentVersion\SystemRestore. The value of this registry key can change the frequency of restore point creation. The value of this registry key can change the frequency of restore point creation.
If the application calls CreateRestorePoint to create a restore point, and the registry key value is 0, system restore does not skip creating the new restore point.
If the application calls CreateRestorePoint to create a restore point, and the registry key value is the integer N, system restore skips creating a new restore point if any restore points were created in the previous N minutes. | |
| |
Re: vbs läuft nicht | | | Autor: hajosch | Datum: 06.03.15 08:44 |
| Hallo powerzone3000,
das war's! Danke.
Gruß
hajosch | |
| 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 |
|
|
sevISDN 1.0
Überwachung aller eingehender Anrufe!
Die DLL erkennt alle über die CAPI-Schnittstelle eingehenden Anrufe und teilt Ihnen sogar mit, aus welchem Ortsbereich der Anruf stammt. Weitere Highlights: Online-Rufident, Erkennung der Anrufbehandlung u.v.m. Weitere InfosTipp des Monats TOP! Unser Nr. 1
Neu! sevDataGrid 3.0
Mehrspaltige Listen, mit oder ohne DB-Anbindung. Autom. Sortierung, Editieren von Spalteninhalten oder das interaktive Hinzufügen von Datenzeilen sind ebenso möglich wie das Erstellen eines Web-Reports. Weitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|