stimmt...sry
aber mit $data=StdOutRead("java.exe") bekomme ich kein output , einfach alles leer ....
Beiträge von johnnyboyy
-
-
@winsetstate
ja , ne funktioniert nicht so leicht , da der server eine parallele datei ist (java in konsole) aber habe mich grade bissl durchgelesen und mit shellexecute kann ich das server hiden -
hallo wie man der überschrift auslesen kann suche ich eine möglichkeit ein Konsolenfenster auszublenden und den inhalt in eine Editbox einfügen.
das spiel heißt Minecraft und ich will das Konsolenfenster weg kriegen (habe server am laufen server)
bin zurzeit soweit :Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("minecraft server tool", 789, 484, 192, 114)
$startserver = GUICtrlCreateButton("Start Server", 8, 8, 115, 25, $WS_GROUP)
$servertype = GUICtrlCreateCombo("choose the server type", 128, 8, 145, 25)
GUICtrlSetData(-1, "Normalx86|Normalx64|Hey0x86|Hey0x64")
$console = GUICtrlCreateEdit("", 8, 40, 769, 409)
GUICtrlSetData(-1, "<The Minecraft Server Tool>")
$command = GUICtrlCreateInput("", 8, 456, 649, 21)
$send = GUICtrlCreateButton("Send", 664, 454, 75, 25, $WS_GROUP)
$cmds = GUICtrlCreateButton("cmds", 744, 454, 35, 25, $WS_GROUP)
$Button1 = GUICtrlCreateButton("Open Server properties", 656, 8, 123, 25, $WS_GROUP)
$restart = GUICtrlCreateButton("Restart Server", 384, 8, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Reload everything", 280, 8, 91, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $startserver
$servert = GUICtrlRead($servertype)
If $servert = "Normalx86" Then
Run('"'&@ProgramFilesDir&'\Java\jre6\bin\java.exe" -Xms1024M -Xmx1024M -jar minecraft_server.jar nogui')
sleep(2000)
GUISetState(@SW_HIDE,"0x00000000003C0342")
ElseIf $servert = "Normalx64" Then
Run('"'&@ProgramFilesDir&'(x86)\Java\jre6\bin\java.exe" -Xms1024M -Xmx1024M -jar minecraft_server.jar nogui')
EndIf
EndSwitch
WEnd -
eigentlich wollte ich es alleine mit etwas hilfe machen...
aber so wäre ein link ganz schön nett -
Hallo , ich wollte mir ein youtube downloader basteln , hat bis jetzt auch super geklappt.
Nur möchte ich das er die dateien mit dem Youtube namen Kennzeichnet und alle " :-,;._/()=?`´ß}][{&%$§"!°^ " entfernt weil eine datei ja keine sonderzeichen haben darf...
aber ich komme nicht weiter. bei jedem versuch kommt immer kein name ... ich glaube ich mache alles falsch , könnt ihr mir bitte helfen?
hier meine scripts"Abfrage ohne Namenssuche"
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_Res_SaveSource=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****#include <inet.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <string.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>;####################### GRAPHICAL USER INTERFACE ############################################
[/autoit] [autoit][/autoit] [autoit]
$Form1 = GUICreate("YouTube Video Downloader", 332, 130, 192, 124)
$Label1 = GUICtrlCreateLabel("Vollständigen Youtube Link eingeben :", 8, 8, 186, 13)
$dwninput = GUICtrlCreateInput("http://www.youtube.com/watch?v=XXxxXXxxXXxx", 8, 24, 249, 21)
$download = GUICtrlCreateButton("==> Download Link Erstellen <==", 8, 48, 251, 21, $WS_GROUP)
$Input2 = GUICtrlCreateInput("Download LINK", 8, 72, 249, 21)
$Label2 = GUICtrlCreateLabel("Qualität =", 264, 8, 49, 17)
$qualli = GUICtrlCreateInput("18",265,27,"50","21",$ES_CENTER)
GUICtrlSetLimit($qualli, 2)
$QNFO = GUICtrlCreateButton("Info",265,50,50,21)
$DLDL = GUICtrlCreateLabel("<= Copy",265,76,50,21)
$Status = GUICtrlCreateLabel("percent",265,99,999,21)
$Progress1 = GUICtrlCreateProgress(8, 96, 250, 17)
GUISetState(@SW_SHOW)
;####################### GRAPHICAL USER INTERFACE ############################################$Percent = 0
[/autoit] [autoit][/autoit] [autoit]
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $QNFO
MsgBox(64,"QNFO","Die Quallität wird in zahlen eingegeben"&@CRLF&"LD = 17"&@CRLF&"HQ = 18"&@CRLF&"HD = 22")
Case $download
GUICtrlSetState($download ,$GUI_DISABLE)
$Video_Q = GUICtrlRead($Qualli)
$dwnlink = GUICtrlRead($dwninput)
$sCode = _INetGetSource($dwnlink)
$token = StringRegExp($sCode, "&t=(.*?)&", 3)
If Not IsArray($token) Then
MsgBox(0, "Error", "Ungültiger Link!")
Else
$value = StringMid($dwnlink, StringInStr($dwnlink, "v=") + 2)
GUICtrlSetData($Input2,"http://youtube.com/get_video?video_id=" & $value & "&t=" & $token[0]& "&fmt="&$Video_Q)
EndIf
$Antwort = InputBox("Antwort","möchten sie dieses Video downloaden? ja/nein","ja")
if $Antwort = "ja" Then
$link = GUICtrlRead($Input2)
$name = ".mp4"
$load = InetGet($link,$name,1,1)
Do
$filesize = InetGetInfo($load, 1)
Sleep(100)
GUICtrlSetData($Progress1,(InetGetInfo($load, 0)/$filesize)*100)
$Percent = Round((InetGetInfo($load,0)/$filesize)*100,0)
GUICtrlSetData($Status,$Percent & "% loaded")
Until InetGetInfo($load, 2)
GUICtrlSetData($Status, "Finish")
EndIf
GUICtrlSetState($download ,$GUI_ENABLE)
EndSwitchWEnd
[/autoit]"Ohne Abfrage mit namenssuche"
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_Res_SaveSource=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****#include <inet.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <string.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>;####################### GRAPHICAL USER INTERFACE ############################################
[/autoit] [autoit][/autoit] [autoit]
$Form1 = GUICreate("YouTube Video Downloader", 332, 95, 192, 124)
$Label1 = GUICtrlCreateLabel("Vollständigen Youtube Link eingeben :", 8, 8, 186, 13)
$dwninput = GUICtrlCreateInput("http://www.youtube.com/watch?v=XXxxXXxxXXxx", 8, 24, 249, 21)
$download = GUICtrlCreateButton("==> Download Link Erstellen <==", 8, 48, 251, 21, $WS_GROUP)
$Input2 = GUICtrlCreateInput("Download LINK", 8, 96, 249, 21)
$Text = GUICtrlCreateInput("its here", 8, 200, 249, 21)
$Label2 = GUICtrlCreateLabel("Qualität =", 266, 8, 49, 17)
$qualli = GUICtrlCreateInput("18",265,27,"50","21",$ES_CENTER)
GUICtrlSetLimit($qualli, 2)
$QNFO = GUICtrlCreateButton("Info",265,50,50,21)
$DLDL = GUICtrlCreateLabel("<= Copy",265,99,50,21)
$Status = GUICtrlCreateLabel("percent",265,76,999,21)
$Progress1 = GUICtrlCreateProgress(8, 72, 250, 17)
GUISetState(@SW_SHOW)
;####################### GRAPHICAL USER INTERFACE ############################################$Percent = 0
[/autoit] [autoit][/autoit] [autoit]
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $QNFO
MsgBox(64,"QNFO","Die Quallität wird in zahlen eingegeben"&@CRLF&"LD = 17"&@CRLF&"HQ = 18"&@CRLF&"HD = 22")
Case $download
GUICtrlSetState($download ,$GUI_DISABLE)
$Video_Q = GUICtrlRead($Qualli)
$dwnlink = GUICtrlRead($dwninput)
$sCode = _INetGetSource($dwnlink)
$Text2 = GUICtrlRead($Text)
$Link = GUICtrlRead($Input2)
$token = StringRegExp($sCode, "&t=(.*?)&", 3)
If Not IsArray($token) Then
MsgBox(0, "Error", "Ungültiger Link!")
Else
$value = StringMid($dwnlink, StringInStr($dwnlink, "v=") + 2)
GUICtrlSetData($Input2,"http://youtube.com/get_video?video_id=" & $value & "&t=" & $token[0]& "&fmt="&$Video_Q)$source = _INetGetSource($dwnlink)
[/autoit]
$array = _StringBetween($source, '<title>', '</title>')
$videoname = StringTrimLeft($array[0], 17)
$newname = StringReplace($videoname,":"," ")
GUICtrlSetData($Text2,$newname)
MsgBox("","",$Text2)
$dateiname = $Text2&".mp4"
$load = InetGet($link,$dateiname,1,1)
Do
$filesize = InetGetInfo($load, 1)
Sleep(100)
GUICtrlSetData($Progress1,(InetGetInfo($load, 0)/$filesize)*100)
$Percent = Round((InetGetInfo($load,0)/$filesize)*100,0)
GUICtrlSetData($Status,$Percent & "% loaded")
Until InetGetInfo($load, 2)
GUICtrlSetData($Status, "Finish")
MsgBox(0, "", StringTrimLeft($array[0], 17)&@CRLF&"wurde fertig gedownloaded")
GUICtrlSetState($download ,$GUI_ENABLE)
EndIf
EndSwitch
WEnd -
Unter
Windows 7 alles: 32/64
Vista alles: 32/64einfach ein
[autoit]#RequireAdmin
[/autoit]hinzuhügen , Tada so gings bei mir
-
also ich bin AutoIt fan^^
-
welche Value...?
EDIT : habe die lösung man muss eine .reg datei erstellen mit diesen Werten (von neu TXT abgeändert) dann kommt das auch ins Context von Neu
"Der inhalt der .reg datei"
-
okay ich verstehe da garnichts ...
gibt es nicht auch etwas anderes? -
Hallo erstmal.
Ich habe bei google nicht viel darüber gefunden , oder nur falsch gesucht.
Wie kann ich in das Context menu , Rechtsklick -> Neu etwas hinzufügen , ich möchte da ein .Bat datei also eine Neue Batch Anwendung die Leer ist.
Wie ist sowas zu machen? Wenn jemand helfen kann bin ich mir sicher die Autoit.de Community.
-
gebt da mal lol ein xD^^
-
Eigener Messenger , Quellcode geben?
das ist kein eigener... -
ich hab das entfernt aber wenn ich dann draufklicke geht das nicht mehr runter.... nachdem ich auf Abbrechen geklickt habe
-
danke ideas2code funktioniert prima^^ habe inetgetinfo übersehen^^
-
wie soll ich das mit Do Until machen??
sorry benutze diese Funktionen kaum...
-
@InetGetActive funktioniert bei mir nicht mehr seit der neuen version...
-
.... genau das weiß ich ja nicht wies geht......
-
ich weiß nicht wie ich ein Download progress machen kann in der neuen autoit version ...
bräuchte da bissl hilfe"Skript"
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <ProgressConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 339, 135, 192, 124)
$Input1 = GUICtrlCreateInput("Input1", 8, 8, 321, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL))
$Button1 = GUICtrlCreateButton("======> Download <======", 8, 32, 323, 25, $WS_GROUP)
$Progress1 = GUICtrlCreateProgress(8, 64, 326, 25)
$StatusBar1 = _GUICtrlStatusBar_Create($Form1)
_GUICtrlStatusBar_SetSimple($StatusBar1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $Button1
$link = GUICtrlRead($Input1)
$name = InputBox("Please enter a name !","filename")
inetget($link,$name,1,1)
EndSwitch
WEndfunc _Download()
[/autoit]
; weiß nicht
; wie das geht
; deswegen frage
; ich ja auch^^
_GUICtrlStatusBar_SetText($StatusBar1, "Download Abgeschlossen")
EndFunc"FertigesScript"
[autoit]
[/autoit]
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <ProgressConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Downloader!", 339, 112, 192, 124)
$Input1 = GUICtrlCreateInput("Input1", 0, 8, 339, 21, BitOR($ES_CENTER,$ES_AUTOHSCROLL))
$Button1 = GUICtrlCreateButton("======> Download <======", 0, 32, 339, 25, $WS_GROUP)
$Progress1 = GUICtrlCreateProgress(0, 60, 339, 25)
$StatusBar1 = _GUICtrlStatusBar_Create($Form1)
_GUICtrlStatusBar_SetSimple($StatusBar1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$Percent = 0
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $Button1
$link = GUICtrlRead($Input1)
$name = InputBox("Please enter a name !","filename")
$load = InetGet($link,$name,1,1)
Do
$filesize = InetGetInfo($load, 1)
Sleep(100)
GUICtrlSetData($Progress1,(InetGetInfo($load, 0)/$filesize)*100)
$Percent = Round((InetGetInfo($load,0)/$filesize)*100,0)
_GUICtrlStatusBar_SetText($StatusBar1,"schon "& $Percent & "% Gedownloadet")
Until InetGetInfo($load, 2)
_GUICtrlStatusBar_SetText($StatusBar1, "Download Abgeschlossen")
EndSwitch
WEnd -
ist das normal das wenn ich Abbrechen drücke das ding immerwieder runterkommt? weil das stört ein Klitzekleines bisschen...
Habe Windows 7 Ultimate 32bit -
Vielen dank!!!
Es klappt jetzt alles wunderbar.