[flo]

Hallo Hoffe ich bin im richtigen Forum


Meine Frage ist: Wie kann ich ein VB Script auch mit nicht Admin Rechten ausführen

[flo]

Hallo, wo sind die Experten?


Weis das keiner

[puppet]

Das kommt doch darauf an was der nicht-Admin für Rechte hat!
Und es kommt auch darauf an wie du das VB-Skript ausführen willst (in Word/Excel/Outlook usw oder über den Windows-Scripting-Host).

[flo]

Zitat

  Das kommt doch darauf an was der nicht-Admin für Rechte hat!

Der ganz normale eingeschränkte benutzer von Win XP

Zitat

Und es kommt auch darauf an wie du das VB-Skript ausführen willst (in Word/Excel/Outlook usw oder über den Windows-Scripting-Host).

Über Windows-Scripting-Host

[puppet]

Also mit einem "eingeschränkten Konto" unter XP Pro + SP2 kann ich VBScripte einfach über den Explorer aufrufen (was ja auch über den Scripting Host geht) und auch über das CLI per cscript.

[flo]

hm das is komisch, wenn ich das script im admin modus starte geht es einbandfrei im eingeschränkten tut sich gar nix, und das script gibt einfach nur ne nachricht auf den bildschirm aus

[puppet]

Na dann tut es aber doch was! Was für eine Meldung wäre evtl noch interessant. Schon mal die Sicherheitseinstellungen für das auszuführende Skript überprüft?

[flo]

nein es tut nix, es soll ne nachricht ausgeben, macht es aber nicht


War oben nicht verständlich geschrieben sorry

Dieser Beitrag wurde von Flo01 bearbeitet: 20. März 2005 - 17:21

[puppet]

Also ein simples Skript mit dem Inhalt MsgBox "Test" funktioniert bei mir wunderbar.
Das mit den Sicherheitseinstellungen habe ich gerade gecheckt, da gibt der cscript eine Fehlermeldung aus.
Was passiert wenn du das Skript über das CLI startest?

[flo]

Zitat

CLI

was ist das?


Hier ist der Quelltext


MsgBox "Hallo lieber Nutzer," & vbcr & "Das System wurde gereinigt." & vbcr & "Es wird jedoch empfohlen:" & vbcr & "- Alle 2 Tage die Antiviren Datenbank zu aktualisieren (rechtsklick auf das kleine Rote K," & vbcr & " am unteren rechten Rand des bildes --> dann auf Antiviren Datenbank aktualisieren.)" & vbcr & "- Einmal im Monat den gesamten Arbeitsplatz auf Viren durchsuchen" & vbcr & "- Alle 2 Monate, Festplatte Defragmentieren (Start, Programme, Zubehör, Systemprogramme)" & vbcr & vbcr & "Änderungen:" & vbcr & "- Die Internetverbindung wird über das Symbol T-Online hergestellt" & vbcr & "- Emails werden über Microsoft Outlook versendet und automatisch (bei Internetverbindung), alle 5 Minuten abgerufen." & vbcr & "- Die Email adresse ist eingerichtet und lautet: [email protected]" & vbcr & "- Der Internet Browser (Programm um internetseiten anzuzeigen) ist der Internet Explorer." & vbcr & vbcr & "Installiert wurden: Win XP Home Edition, Win XP Service Pack 2, Kaspersky AntiVirus, Microsoft Office 2003"

Dim fso, t
Set fso = CreateObject("Scripting.FileSystemObject")
Set t = fso.GetFile("c:\Dokumente und Einstellungen\All Users\Startmenü\Programme\Autostart\start.vbs")


Dim x
x = MsgBox("Soll diese Meldung bei dem nächsten Systemstart Angezeigt werden?",67 , "Info")

If x = 7 Then x = fso.DeleteFile("c:\Dokumente und Einstellungen\All Users\Startmenü\Programme\Autostart\start.vbs")End If



habe es noch eingebaut das er die datei löscht, da die meldung nur einmal angezeigt werden soll!

Dieser Beitrag wurde von Flo01 bearbeitet: 20. März 2005 - 17:42

[flo]

Ähm danke Für den Link aber verstehen tue ich es Trotzdem ned

[puppet]

Ja weil es schwachsinn is was Xandros geschrieben hat, ich meinte das Command Line Interface (Eingabeaufforderung...) und nicht die CLI Dienste von .NET.
Das Skript funktioniert bei mir auch als eingeschränkter User, allerdings wirst du keinen Erfolg dabei haben als eingeschränkter User eine Datei im "All Users"-Profil zu erstellen/modifizieren/löschen.

Dieser Beitrag wurde von puppet bearbeitet: 20. März 2005 - 17:59

[flo]

Zitat

User eine Datei im "All Users"-Profil zu erstellen/modifizieren/löschen.

ok das kann ich ja verstehen, nur bei mir wird noch nicht mal der text ausgegeben, und ich habe nix an den rechten verstellet, und es ist auch kein nLitet System,


Edit: Habe auch noch ein anderes problem,


Ich mochte das man einen Text in eine Input Box eingeben kann, das klappt auch!

Das ganze speeicher ich in einer Variable, geht auch, nur wie kann ich den text der in der Variable gespeichert ist in eine Textdatei schreiben?


Ziel ist es, das ein User eine nachricht eingeben kann die dann beim nächsten systemstart ausgegeben wird und der User dann entscheiden kann ob sie weiter angezeigt werden soll oder nicht

Dieser Beitrag wurde von Flo01 bearbeitet: 20. März 2005 - 18:11

[puppet]

Na dann sag uns doch bitte was für eine Ausgabe kommt wenn du das Skript per CLI über die cscript.exe aufrufst.
Zu deinem zweiten Problem:

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("C:\Test.txt", True)
a.WriteLine ("Klonk")
a.Close
Set a = fs.OpenTextFile("C:\Test.txt", 1)
strText = a.ReadLine
a.Close
MsgBox strText

Du solltest ggf auch mal die Kurzreferenz überfliegen:
Start-Ausführen: hh C:\Programme\Gemeinsame Dateien\Microsoft Shared\VBA\VBA6\1031\VBLR6.CHM