Nochmal: Batch "CHOICE" - DRINGEND

Seite 1 von 1 - Forum: Coding Stuff auf overclockers.at

URL: https://www.overclockers.at/coding-stuff/nochmal_batch_quotchoicequot_dringend_30290/page_1 - zur Vollversion wechseln!

Ctrl-Alt-Del schrieb am 02.04.2002 um 14:06

Sers Leute!

Ich bräucht dringend eine Alternative zum Befehl CHOICE der ohne Zusatzproggy
unter W2K Server leider nicht läuft.

Weiss da jemand was?

Was möcht ich damit machen?
Der Benutzer soll mit J/N bestätigen ob die angegebenen Parameter stimmen.
Falls er "J" drückt, soll das Batch normal weiterlaufen, wenn er jedoch "N"
drückt, soll er mittels goto zur Sprungmarke :Eingabe springen.

Wie wos choice?

Weiss wer wie ich so was in einer Batch ohne weitere Proggys machen kann?
Recht kurz sollte der Code auch noch sein - ich hab Wünsche wie?

Ctrl-Alt-Del schrieb am 02.04.2002 um 14:09

Das hier.... könnte eine Lösung sein - nicht?

Gehts nicht ein bisserl kürzer?

JC schrieb am 02.04.2002 um 14:16

naja, sämtliche REM-Einträge rauslöschen... und auf einmal ist's klein

Ctrl-Alt-Del schrieb am 02.04.2002 um 14:27

IF EXIST taste.com goto taste_da
ECHO a0100> > taste.dbg
ECHO mov ah,00> > taste.dbg
ECHO int 16> > taste.dbg
ECHO mov ah,4c> > taste.dbg
ECHO int 21> > taste.dbg
ECHO.> > taste.dbg
ECHO rcx> > taste.dbg
ECHO 8> > taste.dbg
ECHO rbx> > taste.dbg
ECHO 0> > taste.dbg
ECHO w0100> > taste.dbg
ECHO q> > taste.dbg
DEBUG < taste.dbg > nul
:taste_da
taste
IF ERRORLEVEL 58 GOTO nonumber
IF ERRORLEVEL 48 ECHO Ziffer gedrückt
:nonumber

Zulang, dass ich es mir merken könnte!

that schrieb am 02.04.2002 um 18:53

wie wärs mit WSH?

wirf das in ein "frage.vbs" und starte es mit "cscript frage.vbs"

x = MsgBox("Alle Daten nicht löschen?", 4)
WScript.echo x
WScript.Quit x

Da kommt 6 oder 7 raus, je nach Antwort... auch als Errorlevel.

Ctrl-Alt-Del schrieb am 02.04.2002 um 20:54

Zitat von that
wie wärs mit WSH?

wirf das in ein "frage.vbs" und starte es mit "cscript frage.vbs"

x = MsgBox("Alle Daten nicht löschen?", 4)
WScript.echo x
WScript.Quit x

Da kommt 6 oder 7 raus, je nach Antwort... auch als Errorlevel.

Hmmmm najo ein Windows Fenster?!?!?!
Tjo warum eigentlich nicht!

Thx, werds gleich mal probieren!

//edit:
Wuhhaaaaa ist ja genial - passt! Thx!

Für was ist eigentlich die 4 hinter dem MegBox Text?

Hätt da leider noch eine kleine Aufgabe....

Ein Text der mittels ECHO ausgegeben wird "ECHO Wiederholen Sie bitte die Eingabe!" soll
ca. 3 sec stehen bleiben dann soll das Batch weiterlaufen.

Ist das machbar?

that schrieb am 02.04.2002 um 21:32

Zitat von Ctrl-Alt-Del
Für was ist eigentlich die 4 hinter dem MegBox Text?

...

ca. 3 sec stehen bleiben

Die 4 spezifiziert die Art der Buttons:

vbOKOnly 0 Display OK button only.
vbOKCancel 1 Display OK and Cancel buttons.
vbAbortRetryIgnore 2 Display Abort, Retry, and Ignore buttons.
vbYesNoCancel 3 Display Yes, No, and Cancel buttons.
vbYesNo 4 Display Yes and No buttons.
vbRetryCancel 5 Display Retry and Cancel buttons.
vbCritical 16 Display Critical Message icon.
vbQuestion 32 Display Warning Query icon.
vbExclamation 48 Display Warning Message icon.
vbInformation 64 Display Information Message icon.
vbDefaultButton1 0 First button is the default.
vbDefaultButton2 256 Second button is the default.
vbDefaultButton3 512 Third button is the default.

und das sind die Ergebnisse:

vbOK 1 OK button was clicked.
vbCancel 2 Cancel button was clicked.
vbAbort 3 Abort button was clicked.
vbRetry 4 Retry button was clicked.
vbIgnore 5 Ignore button was clicked.
vbYes 6 Yes button was clicked.
vbNo 7 No button was clicked.

Für Delays in Batchfiles kenn ich leider nur "sleep.exe" ausm Resourcekit.

Ctrl-Alt-Del schrieb am 02.04.2002 um 23:11

@that

Thx - dank dir!