14
Batch ausgabe in TextBox anzeigen lassen
Moin 
Nunja... die überschrift sagt eigentlich schon alles....
Ich möchte von einer X belibigen batch die ausgaben in einer TextBox anzeigen lassen....
LG
Nunja... die überschrift sagt eigentlich schon alles....
Ich möchte von einer X belibigen batch die ausgaben in einer TextBox anzeigen lassen....
LG
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 148505
Url: https://administrator.de/contentid/148505
Printed on: April 25, 2024 at 05:04 o'clock
14 Comments
Latest comment
Moin Superbios.
Einfach den Snippet unten verwenden. Ist aber keine "schöne" box.
Das ist quasi eine Nachricht die sich der User selbst schickt. wenn du ne klassische Windowsmeldung willst nimm dieses VBScript und starte es von deiner Batch aus.
Da haste die typische Box.
Wenn du aber ne Variable ausgeben willst musst du mal fragen wie man variablen von Batch in VB übergibt.
Grüße
Einfach den Snippet unten verwenden. Ist aber keine "schöne" box.
msg %username% Deine Ausgabe.Das ist quasi eine Nachricht die sich der User selbst schickt. wenn du ne klassische Windowsmeldung willst nimm dieses VBScript und starte es von deiner Batch aus.
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Popup "Deine Ausgabe",48,"Überschrift" Da haste die typische Box.
Wenn du aber ne Variable ausgeben willst musst du mal fragen wie man variablen von Batch in VB übergibt.
Grüße
Wenn du aber ne Variable ausgeben willst musst du mal fragen wie man variablen von Batch in VB übergibt.
... obwohl, so ein Geheimnis ist das dann ja auch wieder nicht 
:@echo off & setlocal
set "Ausgabe=Der Ausgabetext"
set "Titel=Der Fenstertitel"
set M=%temp%\MBox.vbs
>%M% echo MsgBox WScript.Arguments(0),48,WScript.Arguments(1)
cscript //nologo %M% "%Ausgabe%" "%Titel%"
cscript //nologo %M% "Geht auch ohne Variablen" "OV"
cscript //nologo %M% "... und mehrmals" "3. Box" Grüße
bastla
P.S.: @bankaifan: Die "typische" Box wäre die "
MsgBox" - die "PopUp"-Version wird vorrangig dazu verwendet, die Info nur für eine bestimmte Zeit anzuzeigen und dann das Script automatisch fortzusetzen ...
oder so:
zB TEST.VBS -Datei erstellen mit Inhalt:
msgbox "Hallo",0,"Wichtiger System-Hinweis:"
Diese VBS kannst Du dann mit "call test.vbs" aus Deiner batch aufrufen
Gruss
Ralf
[Edit Biber] Zum Vergleich mal die Zeile von oben in Codeformatierung.
[/Edit]
zB TEST.VBS -Datei erstellen mit Inhalt:
msgbox "Hallo
",0,"Wichtiger System-Hinweis:"Diese VBS kannst Du dann mit "call test.vbs" aus Deiner batch aufrufen
Gruss
Ralf
[Edit Biber] Zum Vergleich mal die Zeile von oben in Codeformatierung.
msgbox "Hallo :-)",0,"Wichtiger System-Hinweis:"
Danke Bastla für die Aufklärung :D was bewirkt denn eigentlich das 64,48,32 usw.?
Und ja. VBS ist ned so mein Fachgebiet aber die Msgbox find ich hässlich xD
Und ja. VBS ist ned so mein Fachgebiet
aber die Msgbox find ich hässlich xD
Hallo, und danke für die zahlreichen antworten...
Ok... ich habe mich (wieder ein mal) unverständlich ausgedrückt...
In VB ( NICHT vbs!!!) eine Textbox...
Und in der sollen dann ausgaben einer batch stehen...
z.b. wenn jetzt in der batch ein echo befehl mit Hi ist, dann soll in der TB hi stehen
etc.
Ok... ich habe mich (wieder ein mal) unverständlich ausgedrückt...
In VB ( NICHT vbs!!!) eine Textbox...
Und in der sollen dann ausgaben einer batch stehen...
z.b. wenn jetzt in der batch ein echo befehl mit Hi ist, dann soll in der TB hi stehen
etc.
Hallo bankaifan!
Grüße
bastla
was bewirkt denn eigentlich das 64,48,32 usw.?
Einfach mal testen ... Grüße
bastla
Hallo superbios!
Du könntest versuchen, mit Deiner ungenannten VB-Version das "Shell.Exec" von VBScript zu verwenden / "nachzubauen" - ein Beispiel für die Verwendung findest Du im zweiten Script dieses "Scripting Guy"-Artikels ...
[Edit] Unter VB2005Express zB funktioniert
[/Edit]
Grüße
bastla
Du könntest versuchen, mit Deiner ungenannten VB-Version das "Shell.Exec" von VBScript zu verwenden / "nachzubauen" - ein Beispiel für die Verwendung findest Du im zweiten Script dieses "Scripting Guy"-Artikels ...
[Edit] Unter VB2005Express zB funktioniert
Dim objShell = CreateObject("WScript.Shell")
Dim objExecObject = objShell.Exec _
("D:\TestBatch.cmd")
Do While Not objExecObject.StdOut.AtEndOfStream
TextBox1.Text = objExecObject.StdOut.ReadAll()
LoopGrüße
bastla
Ich habe VirsualBasic 2010 Express.....
Hallo superbios!
Grüße
bastla
Ich habe VirsualBasic 2010 Express.....
... und beim Testen welchen Erfolg gehabt?Grüße
bastla
Nein, noch nicht probiert, ich installier mir gerade die Virsual Studio 2010 Ultimate Edition....
Ok.. Funktioniert perfekt
Mein einziges problem noch:
Das werden längere scripts, die in manchen phasen länger brauchen...
Und die Text box ( ich hab ne RichTextBox verwendet) Bleit "oben" d.h. man muss von hand runterscrollen...
Mein einziges problem noch:
Das werden längere scripts, die in manchen phasen länger brauchen...
Und die Text box ( ich hab ne RichTextBox verwendet) Bleit "oben" d.h. man muss von hand runterscrollen...
Hallo superbios!
An das Ende des Textes solltest Du mit
kommen ...
Grüße
bastla
An das Ende des Textes solltest Du mit
RichTextBox1.SelectionStart = RichTextBox1.TextLength
Grüße
bastla
Moin bastla
Alles so weit ok
Nur... es funktionieren leider keine defrag scripts ö.ä.
Win 7 64 bit....
LG;
superbios
Alles so weit ok
Nur... es funktionieren leider keine defrag scripts ö.ä.
Win 7 64 bit....
LG;
superbios
Hallo superbios!
Grüße
bastla
Alles so weit ok
Freut mich Nur... es funktionieren leider keine defrag scripts ö.ä.
Das dürfte allerdings ein ganz anderes Thema und damit einen neuen Thread wert sein ...Grüße
bastla
