Vbscript in den vordergrund stellen?

also ich will eine msg box machen wo das Fenster An das System gebunden ist. Alle Anwendungen werden unterbrochen, bis der Benutzer auf das Meldungsfeld reagiert. Also, dass ich nichts anderes tun kann als auf die msg box zu reagieren.

Das hier wäre mein script:

X=MsgBox("Fehler während dem öffnen von dieser Datei, wollen sie dieses Problem beheben?",4+64,"Computer")

2 Antworten

PWolff

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

Computer, Technik, Technologie

23.04.2020, 19:07

Die gewünschte Eigenschaft eines Dialogfensters nennt sich "System Modal".

Bei VB heißt die zugehörige Konstante vbSystemModal; wenn es sie bei VBScript gibt, ebenfalls.

X = MsgBox("Fehler während dem öffnen von dieser Datei, wollen sie dieses Problem beheben?", vbYesNo Or vbInformation Or vbSystemModal, "Computer")

Woher ich das weiß:Berufserfahrung – Software-Entwickler

malikalik23

Fragesteller

23.04.2020, 19:09

ich habe gelesen dass man das auch mit der zahl 4096 machen kann

hier ist der link zur website: https://docs.microsoft.com/de-de/office/vba/language/reference/user-interface-help/msgbox-function

PWolff

23.04.2020, 19:10

@malikalik23

Man kann natürlich auch 4096 nehmen. Sollte man aber bleiben lassen: https://www.google.com/search?q=magische+Zahlen+Programmierung+Antipattern

PWolff

23.04.2020, 19:09

(Zur Information: Ich habe hier die Flags für Buttons, Icon und Modalität auf die mir geläufige Form gebracht - Namen statt Zahlenwerte und Or statt +)

malikalik23

Fragesteller

23.04.2020, 19:14

Also ich habe es probiert doch es ist immer noch gleich man kann alles tun was man will

PWolff

23.04.2020, 19:20

@malikalik23

Dann ist es wohl so, dass Windows sich nur von Windows 95 bis Windows ME um die System-Modalität von einfachen Anwendungen geschert hat. Dass die Windows' der NT-Schiene das nicht tun, ist auch gut so.

Vermutlich schaffen Systemdienste, die unter dem Systemkonto laufen, das noch. Vielleicht auch noch unter Administratorkonten. D. h. du müsstest das Script als Administrator ausführen, und wenn das nicht reicht, als Systemdienst.

malikalik23

Fragesteller

23.04.2020, 19:21

@PWolff

ich habe windows 10

PWolff

23.04.2020, 19:22

@malikalik23

Probiers erst mal mit Rechtsklick, dann Klick auf "Als Administrator ausführen".

Könnte sein, dass es funktioniert.

malikalik23

Fragesteller

23.04.2020, 19:24

@PWolff

mit rechtsclick steht da kein "Als Administrator ausführen".

PWolff

23.04.2020, 19:27

@malikalik23

Ich meinte beim Dateisymbol.

Sonst probier mal, das Script über ein anderes Script, nämlich eine Batch-Datei, zu starten. Endung .bat oder .cmd; Inhalt

Start "Starte vbScript" [Pfad_und_Name_des_VBScripts].vb

und starte diese Batch-Datei als Administrator.

malikalik23

Fragesteller

23.04.2020, 19:38

@PWolff

ich versuche es mal

ok habe es als administrator versucht doch es geht nicht weil es die datei nicht finden kann

ich habe die bat datei normal gestartet dann ging es aber das problem ist immernoch da

PWolff

23.04.2020, 20:28

@malikalik23

Hast du die Dateien in deinem Profil?

Bist du mit einem Benutzer der Gruppe Administratoren angemeldet (kannst du ein Programm als Administrator ausführen lassen ohne ein Passwort einzugeben?)

malikalik23

Fragesteller

30.04.2020, 13:49

@PWolff

ja das kann ich

PWolff

30.04.2020, 15:27

@malikalik23

Vermutlich geht es nicht ohne Zugriff auf das Windows-API: https://www.google.com/search?q=Windows+10+dialog+systemmodal&ie=utf-8&oe=utf-8

aber das sollte mit vbscript möglich sein.

YoshiLP

23.04.2020, 18:45

wofür brauchst du den script für ein Spiel ein Programm??

malikalik23

Fragesteller

23.04.2020, 18:47

Um einem Freund einen Streich zu spielen. In der Covid 19 - Zeit ist es ja ganz schön langweilig geworden

PWolff

23.04.2020, 19:21

@malikalik23

Irgendwie erinnert mich das an die nette Dialogbox

"Sie haben die Position des Mauszeigers geändert. Bitte starten Sie Ihr System neu, um die Änderungen zu übernehmen."

malikalik23

Fragesteller

23.04.2020, 18:59

Das heißt für ein programm

Ähnliche Fragen

VBScript: Zeichen zählen?

Wenn ich Wörter zählen möchte mache ich das in Kopf was ein bisschen doof wird wenn man so um die 300 - 400 Wörter zählen muss. Dann kam mir die Idee: Wenn ich ein Wort gezählt habe haue ich einmal auf die Leertaste/eine Taste. Am Schluss drücke ich Enter und mein Programm soll zählen wie viele Zeichen ich eingegeben hab. Wie würde das gehen?

Worte = InputBox("Gib einfach Buchstaben und leerstellen ein und diese Werden dann gezählt!","Wörter zählen")

'Hier Wörter zählen

'_____________________________________________


'_____________________________________________

msgbox ""&Anzahl&" Wörter",0+64,"Wörter gezählt"
'Ende

î hier eine kleine Vorgabe ;)

...zur Frage

VBS o.Ä. Script um Mausklick zu generieren?

Würde gerne an der Stelle auf dem Screen, wo sich mein Mauszeiger befindet, einen Klick generieren.

Gesucht wird etwas im Format:

shell.sendkeys("{leftclick}")

Wenn möglich in einer "Programmiersprache", welche auf jedem Windowscomputer schon ohne Download weiterer Software vorhanden ist, sprich ausgeführt werden kann.

Habe mal gelesen, dass in VBS Mausklicke nicht funktionieren, aber wollte trotzdem mal nachfragen.

...zur Frage

Mehrere MsgBox-Abfragen hintereinander möglich?

Hallo, da hier doch so viele Könner unterwegs sind: Ich hänge schon wieder fest.

Ich habe zwei msg-Boxen vbYesNoCancel. Wenn die erste Box mit Ja bestätigt wird, wird eine Prozedur gestartet.
Wenn ich den Button Abbrechen klicke, soll die zuletzt geöffnete Userform neu geladen und die Sub beendet werden.

Wenn ich den Nein Button klicke öffnet sich die nächste msg Box vbYesNoCancel.
Wenn nun Ja geklickt wird, wird wieder eine Prozedur gestartet, beim Abbrechen wieder die Userform neu geladen und die Sub beendet.
Und bei Nein wird eine weitere Prozedur gestartet.

Eigentlich dürfte es ja nicht schwer sein, aber bei mir hängt es. Die Userform wird neu geladen aber die nächste msg Box öffnet nur und dann passiert nichts, wenn ich dort einen Button klicke.

So sieht es nun aus (und vielen Dank im Voraus):

Public Sub InspectionCriterion()
    Dim msg As String, msg2 As String, msg3 As String
    msg = MsgBox("Ist das Merkmal ein Gewinde?", vbYesNoCancel + vbQuestion, "")
    


    If msg = vbYes Then
    UserFormThread.Show
    ElseIf msg = vbNo Then
    msg2 = MsgBox("Ist das Merkmal zu messen?", vbYesNoCancel + vbQuestion, "")
    ElseIf msg = vbCancel Then
    Call InspectionFeatures
    Exit Sub
    


    If msg2 = vbYes Then
    UserFormDimension.Show
    ElseIf msg2 = vbNo Then UserFormText.Show
    Else
    Exit Sub
    End If
    End If
    
    
End Su

...zur Frage

Nachfolge-Technologie für HTML-Applications (HTA)?

In früheren Versionen des Internet Explorers wurde ein Typ von lokalen Anwendungen unterstützt, der sich "HTML-Applications" (HTA) nannte: Im Grunde eine normale Webanwendung, aber ohne serverseitigen Anteil und mit umfangreichen Berechtigungen auf dem lokalen System ausgestattet. Typischer Anwendungsfall waren administrative Scripts (VBScript, JScript), die eine einfache GUI brauchten. Irgendwann mit IE9/IE10 war das aber nicht mehr state-of-the-art.

Gibt es dafür einen legitimen Nachfolger unter Windows? Was wäre der Königsweg, um z.B. ein Powershell-Script mit einer GUI aufwerten, die gescriptet (und nicht kompiliert) ist und auf einem Windows-Betriebssystem im Auslieferungszustand (ohne zusätzliche Software) ablauffähig wäre?

...zur Frage

Excel, Variable in Msg Box integrieren?

Hallo, wie kann ich eine Variable in einer Msg Box integrieren.

Folgendermaßen sieht der Code aus:

'Sollte eins der Felder (Monat.Text, Referenz.Text, Wert.Text) unausgefüllt sein, so soll die Variable den folgenden Wert annehmen

Dim Fehlendes_Feld As String

If Monat.Text = "" Then Fehlendes_Feld = Monat

If Referenz.Text = "" Then Fehlendes_Feld = Referenz

If Wert.Text = "" Then Fehlendes_Feld = Wert

MsgBox Prompt:="Bitte folgendes Feld ausfüllen: Fehlendes_Feld ", Title:="Fehler"

Die Msg Box zeigt mir halt den Text an und passt die Variable leider nicht an. Wie ändere ich das?

...zur Frage

wie mit batch verknüpfung erzeugen?

wie kann man mit batch verknüpfungen erstellen und denen dann einen pfad zuweisen?

...zur Frage

In WINDOWS BATCH - Datei (.bat) Abfragen, ob Netzteil angeschlossen ist?

Hallo!

Ich bin Anfänger beim Programmieren von .BAT - Dateien. Deswegen meine Frage: Kann man es programmieren, dass die BATCH - Datei beim Ausführen zuerst im System nachsieht, ob ein Netzteil angeschlossen ist und, wenn NEIN, den PC herunterfährt?

Wenn möglich soll das Herunterfahren sogar noch 30 Sekunden lang durch Eingabe eines Passwortes gestoppt werden können - das wäre noch COOLER!

Wenn das mit einer .BAT - Datei ein Problem ist, würde auch ein .VBS - Skript gehen.

DANKE!

P.S.: Ich habe einen Laptop; sprich: Ohne Netzteil wir der Akku aktiviert. Falls ihr euch fragt, was die Frage soll. Ich möchte nämlich, dass ALLE Benutzer den PC NUR mit Netzteil verwenden dürfen.

...zur Frage

Ist der Windows Wecker parameterisiert aufrufbar?

Ich würde gerne die Windows 10 App "Alarm & Uhr" per Kommandozeile mit einem Parameter füttern, der mir einen Wecker auf eine errechnete Uhrzeit stellt.

Ist das möglich?

...zur Frage

Tonfrequenzen mit vbs oder batch ausgeben?

Wie geht das? Kann man Buchstaben in anderen Sprachen über dieser Methode "aussprechen" lassen?

...zur Frage

Batch: .jar als Unterprogramm starten, aber nicht auf Beendigung warten?

Ich möchte mit Batch eine score.jar starten, die parallel zur Batch (und anderen jars) laufen soll (->Batch soll nicht auf Beendigung warten). Wenn die Batch aber beendet wird, soll sich die score.jar auch schließen.

Start mit java.exe --> schließt sich wie gewünscht, batch wird aber nicht fortgesetzt

Start mit start "..." --> Batch wird fortgesetzt, aber die jar nicht beendet.

Gibt es da noch eine 3.Möglichkeit ... vielleicht auch mit vbs?

...zur Frage

Mit vbs programm starten?

Also ich möchte mit batch eine vbs erstellen die eine msgbox öffnet wo drinnen stehen soll ob man eine seite öffnen will oder nicht drückt man auf neine passiert nix und auf ja passiert was soweit habe ich es schonmal nur leider kenne ich mich mit vbs nicht gut aus, könnte jemand vllt. mein unfertiges skript vervollständigen ?

@echo off

echo choicex=MsgBox("Want to download latest version?" ,36, "Update!") > opensite.vbs

echo If choicex=6 Then (ab hier habe ich keine ahnung mehr) >> opensite.vbs

start /wait opensite.vbs

del /s /q opensite.vbs

...zur Frage

Per VBScript überprüfen ob Laptop am Strom?

Hi, ich will per VBScript oder wenn möglich auch einer Batch - Datei oder was auch immer überprüfen, ob mein Laptop am PC angeschlossen ist. Wenn dies der Fall ist, soll er in den Akkumodus "Höchstleistung" gehen, wenn er über den Akku läuft, dann in den Energiesparmodus. Wie kann man das per selbstgeschriebenem (also nicht gedownloadeten Programmen...) realisieren?

Danke ^^

...zur Frage

Batch mehrere zeilen in eine Datei einfügen?

Hey, ich möchte sehr viele zeilen in eine TXT datei schreiben. Allerdings möchte ich nicht für jede zeile das hier ausführen:

echo Zeile1 >>test.txt
echo Zeile2 >>test.txt
...

Kann man das nicht einfacher machen mit klammern oder so? z.B.

echo (
Zeile1
Zeile2
...
) >>test.txt

Gibt es da eine möglichkeit?

Wäre es so möglich einfach Lieder von batch erstellen zu lassen? (einfach die MP3 in texteditor kopieren und batch das ganze wider umwandeln lassen)

Danke

...zur Frage

Wie erreiche ich, dass eine VBA-MsgBox nur einmal aufpoppt?

Ich habe schon mehrere Beiträge gelesen, bekomme es aber nicht hin. Kann mir einer diesen Befehl korrigieren. Die Msg Box soll nur einmal aufpoppen, wenn dieser bestimmte Wert auftaucht. Der Befehl funktioniert, aber poppt bei jeder weiteren Zelleingabe auf.

Private Sub Worksheet_Change(ByVal Target As Range)
 x = Range("D15").Value
 If x = "LK" Then MsgBox "Dieses Produkt benötigt eine  Lebensmittelkühlung!", vbInformation, "Hinweis" 
End Sub

...zur Frage

Was möchtest Du wissen?

Deine Frage stellen