Nochmal: Batch "CHOICE" - DRINGEND - Forum

Ctrl-Alt-Del

Freund der 4 Ringe!

Registered: Feb 2001
Location: Ländle
Posts: 3058

02.04.2002 - 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

Freund der 4 Ringe!

Registered: Feb 2001
Location: Ländle
Posts: 3058

02.04.2002 - 14:09

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

Gehts nicht ein bisserl kürzer?

Bearbeitet von Ctrl-Alt-Del am 02.04.2002, 14:11

JC

Administrator
Disruptor

Registered: Feb 2001
Location: Katratzi
Posts: 9067

02.04.2002 - 14:16

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

Ctrl-Alt-Del

Freund der 4 Ringe!

Registered: Feb 2001
Location: Ländle
Posts: 3058

02.04.2002 - 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

Moderator
Hoffnungsloser Optimist

Registered: Mar 2000
Location: MeidLing
Posts: 11338

02.04.2002 - 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

Freund der 4 Ringe!

Registered: Feb 2001
Location: Ländle
Posts: 3058

02.04.2002 - 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?

Bearbeitet von Ctrl-Alt-Del am 02.04.2002, 21:01

that

Moderator
Hoffnungsloser Optimist

Registered: Mar 2000
Location: MeidLing
Posts: 11338

02.04.2002 - 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

Freund der 4 Ringe!

Registered: Feb 2001
Location: Ländle
Posts: 3058

02.04.2002 - 23:11

@that

Thx - dank dir!

Ctrl-Alt-Del Freund der 4 Ringe! Registered: Feb 2001 Location: Ländle Posts: 3058	02.04.2002 - 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 Freund der 4 Ringe! Registered: Feb 2001 Location: Ländle Posts: 3058	02.04.2002 - 14:09 Das hier.... könnte eine Lösung sein - nicht? Gehts nicht ein bisserl kürzer? Bearbeitet von Ctrl-Alt-Del am 02.04.2002, 14:11
JC Administrator Disruptor Registered: Feb 2001 Location: Katratzi Posts: 9067	02.04.2002 - 14:16 naja, sämtliche REM-Einträge rauslöschen... und auf einmal ist's klein
Ctrl-Alt-Del Freund der 4 Ringe! Registered: Feb 2001 Location: Ländle Posts: 3058	02.04.2002 - 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 Moderator Hoffnungsloser Optimist Registered: Mar 2000 Location: MeidLing Posts: 11338	02.04.2002 - 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 Freund der 4 Ringe! Registered: Feb 2001 Location: Ländle Posts: 3058	02.04.2002 - 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? Bearbeitet von Ctrl-Alt-Del am 02.04.2002, 21:01
that Moderator Hoffnungsloser Optimist Registered: Mar 2000 Location: MeidLing Posts: 11338	02.04.2002 - 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 Freund der 4 Ringe! Registered: Feb 2001 Location: Ländle Posts: 3058	02.04.2002 - 23:11 @that Thx - dank dir!

Nochmal: Batch "CHOICE" - DRINGEND

Forum Index > Software > Coding Stuff

Ctrl-Alt-Del

Ctrl-Alt-Del

JC

Ctrl-Alt-Del

that

Ctrl-Alt-Del

that

Ctrl-Alt-Del