Erstellen einer Messagebox mit einem Texteditor (Visual Basic Script)

    • VBScript

    Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von fischi.

      Erstellen einer Messagebox mit einem Texteditor (Visual Basic Script)

      Hallo Forum

      Ich dachte mir da es ja noch keine Tutorials zu VBS gibt mach ich einfach mal eins.
      In diesem Tutorial zeige ich euch wie man eine Messagebox mit einem normalen Texteditor schreibt.
      Als Texteditor nehme ich das Windows notepad.

      Ihr macht nun folgendes:

      1.Notepad öffnen

      2.Folgenden Code Einfügen:

      MsgBox "Inhalt des Messagebox",0,"Name der Box"

      3.Als .vbs Abspeichern

      So Sieht das dann aus:

      Hab ein bisschen drin Rumgemalt damit man sieht was welche Eigenschaften sind.

      Und hier nochmal alles erklärt:


      MsgBox heißt Messagebox und dass schreibt man um eine Messagebox zu öffnen.
      Eine Messagebox ist ein Fenster dass sich öffnet und eine Meldung anzeigt wie auf dem Bild oben.

      "Inhalt des Fensters" Ist der Inhalt also dass was in der Box steht.
      Der Inhalt kann ein Beliebiger Text sein.

      ,0, Diese Null sagt dass es die Option OK anzeigen soll es gibt natürlich auch andere Optionen.
      Hier sind die wichtigsten aufgelistet:

      • 0=OK-Fenster
      • 1=OK-/Abbrechen-Fenster
      • 2=Abbrechen-/Wiederholen-/Ignorieren-Fenster
      • 3=Ja-/Nein-/Abbrechen-Fenster
      • 4=Ja-/Nein-Fenster
      • 5=Wiederholen-/Abbrechen-Fenster
      • 16=Anzeigen des Stopp-Symbols
      • 32=Anzeigen des Fragezeichen-Symbols
      • 48=Anzeigen des Symbols Warnung
      • 64=Anzeigen des Symbols Information
      Man kann auch mehrere sachen kombinieren wie zum Beispiel Ja und Nein und dass Stopp Symbol dann Verbindet man die Zahlen mit einem + .

      Bsp.
      MsgBox"Inhalt der Messagebox",4 + 16,"Name der Box"

      "Name der Box" Dass ist der Titel also wie dass Fenster heißt


      Ich hoffe Ihr wisst jetzt wie man eine MessageBox mit VBS Erstellt.

      Mfg Wayne
      Hallo,

      da ich immer Problemme mit der richtigen Ziffer für die Buttons und das Symbolhatte habe ich mal folgende Zeilen vb Script geschrieben:

      Quellcode

      1. ' fischi - 6.03.2010
      2. Do
      3. x = Inputbox("Symbol : " & chr(10) & "0 = Ohne, 16 = Error, 32 = Question, 48 = Warning, 64 = Info" & chr(10) & chr(10) & "Button :" & chr(10) & "0 = ok, 1 = ok cancel, 2 = chancel retry ignore, 3 = yes no cancel, 4 = yes no, 5 = retry cancal, 16384 = ok help" & chr(10) & chr(10) & "Schaltflächenfokus : " & chr(10) & "0 = erste, 256 = zweite, 512 = dritte" & chr(10) & chr(10) & "Zahlen addieren und eingeben",WScript.Scriptname,"48+2+256")
      4. If x <> "" Then
      5. If InStr(x,"+") Then
      6. summand = Split(x,"+")
      7. x = 0
      8. For i = 0 To UBound(summand)
      9. x = x + summand(i)
      10. Next
      11. End If
      12. Msgbox "Mein 'x': " & x,x,"Titel - " & WScript.ScriptName
      13. End If
      14. Loop While x >= "0"


      Vielleicht hilft es ja noch dem einen oder anderen.

      Fischi