also hier ist erst mal meine icq nummer ich bin immer noch der meinung das in einem chat besser schreiben zu können als im forum und dort auf die antworten warten zu müssen achja raupi danke fürs aufräumen (459577593) nonever hab ich schon jetzt kannst du mich ja auch noch adden bitte^^
Beiträge von Sithlord95
-
-
gut willkommen im team(siehe pn)
ich würde mich aber noch freuen wenn vielleciht noch mehr mit machen^^ps: ich hab autoit seit ungefähr 5 monaten das könnte was werden mti dem script^^
-
danke raupi für deine mühe
doch leider hat noch niemand gesagt das er mitmachen will^^ -
hallo leute
mir is gestern die idee gekommen eine art task mgr in auto it zu machen
ich hab sogar schon mal angefangenSpoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
#include <GUIConstants.au3>
#include <inet.au3>
Opt('guioneventmode', 1)global $lolli = 0
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
#Region ### START Koda GUI section ### Form=$Form1 = GUICreate("AutoIt Task-mgr", 395, 422, 193, 125)
[/autoit] [autoit][/autoit] [autoit]
$MenuItem6 = GUICtrlCreateMenu("&Datei")
$MenuItem10 = GUICtrlCreateMenuItem("Öffnen(Ausführen)", $MenuItem6)
$MenuItem1443 = GUICtrlCreateMenuItem("Öffnen(Dialog)", $MenuItem6)
$MenuItem54321 = GUICtrlCreateMenuItem("Ausführen", $MenuItem6)
$MenuItem1222 = GUICtrlCreateMenuItem("Cmd.exe", $MenuItem6)
$MenuItem13 = GUICtrlCreateMenuItem("Notepad.exe", $MenuItem6)
$MenuItem13653 = GUICtrlCreateMenuItem("Verschieben", $MenuItem6)
$MenuItem1193 = GUICtrlCreateMenuItem("Programm schließen", $MenuItem6)
GUIctrlSetOnEvent($MenuItem54321, "_wtfishere12")
func _wtfishere12()
send("{LWINDOWN}" & "r")
sleep(50)
send("{lwinup}")
endfunc
$MenuItem5 = GUICtrlCreateMenu("&Optionen")
$MenuItem2323 = GUICtrlCreateMenuItem("Kill Prozess", $MenuItem5)
$MenuItem23 = GUICtrlCreateMenuItem("Administrator werden", $MenuItem5)
$MenuItem21 = GUICtrlCreateMenuItem("Check Prozess", $MenuItem5)
$MenuItem11 = GUICtrlCreateMenuItem("Check Prozesse", $MenuItem5)
$MenuItem22 = GUICtrlCreateMenuItem("Batch schreiben(.bat)", $MenuItem5)
GUIctrlSetOnEvent($MenuItem13653, "_wtfishere")
GUIctrlSetOnEvent($MenuItem2323, "_MenuBatch78")
GUIctrlSetOnEvent($MenuItem13, "_MenuBatch7")
GUIctrlSetOnEvent($MenuItem1222, "_MenuBatch8")
GUIctrlSetOnEvent($MenuItem1443, "_MenuBatch9")
GUIctrlSetOnEvent($MenuItem10, "_MenuBatch10")
$MenuItem4 = GUICtrlCreateMenu("&Ansicht")
$MenuItem113 = GUICtrlCreateMenuItem("Minimieren", $MenuItem4)
$MenuItem3432= GUICtrlCreateMenuItem("Benutzername :" &@username, $MenuItem4)
$MenuItem3435= GUICtrlCreateMenuItem("Windows Infos :" &@OSVersion & ":" & @OSServicePack, $MenuItem4)
$MenuItem3436= GUICtrlCreateMenuItem("Ip des Netzwerkadapters:" & @IPAddress1, $MenuItem4)
$MenuItem3437= GUICtrlCreateMenuItem("Computername :" &@ComputerName, $MenuItem4)
$MenuItem3438= GUICtrlCreateMenuItem("Logonserver :" &@LogonServer & " Logondomain :" &@LogonDomain & " Logondnsdomain :" & @LogonDNSDomain, $MenuItem4)
GUIctrlSetOnEvent($MenuItem3437, "_MenuBatch991131")
GUIctrlSetOnEvent($MenuItem3438, "_MenuBatch991132")
GUIctrlSetOnEvent($MenuItem3436, "_MenuBatch9911345")
$MenuItem3 = GUICtrlCreateMenu("&?")
$MenuItem111 = GUICtrlCreateMenuItem("Hilfe", $MenuItem3)
GUIctrlSetOnEvent($MenuItem111, "_MenuBatch1")
GUIctrlSetOnEvent($MenuItem113, "_MenuBatch2")
func _wtfishere()
$xD234 = inputbox( "Datei verschieben", "Gib die Datei + den Pfad an in der sie sich momentan befindet")
$xD235 = InputBox( "Datei verschieben", "Gib die Datei + den Pfad an wo die Datei hingeschoben werden soll")
FileMove( $xD234, $xD235)
endfunc
func _MenuBatch78()
$lalu = InputBox( "Kill Prozess", "Gib den Namen des Prozesses an den du killen willst")
ProcessClose($lalu)
endfunc
func _MenuBatch10()
$lolalol = InputBox( "Such dir eine Datei zum öffnen aus", "Gib den pfad zum öffnen an")
$lol23 = InputBox( "Gib den Ordner an", "Gib den pfad des Ordners an in der sich die Datei befindet /nicht die Datei nur den Ordner + den Pfad vom Ordner")
run( $lolalol,$lol23)endfunc
[/autoit] [autoit][/autoit] [autoit]
func _MenuBatch9()
$Var = FileOpenDialog("Such dir eine Datei zum öffnen aus eine sinnvolle wie .exe .bat ...",@MyDocumentsDir,"exe,bat (*.exe;*.bat)", 1)
run($var)
endfunc
func _MenuBatch8()
run("cmd.exe")
endfunc
func _MenuBatch7()
Run("notepad.exe")
endfunc
func _MenuBatch5()
exit
endfunc
func _MenuBatch6()
msgbox(0, "noch nciht verfügbar", "nicht verfügbar")
endfunc
GUIctrlSetOnEvent($MenuItem23, "_MenuBatch6")
GUIctrlSetOnEvent($MenuItem1193, "_MenuBatch5")
GUIctrlSetOnEvent($MenuItem21, "_MenuBatch3")
GUIctrlSetOnEvent($MenuItem11, "_MenuBatch4")
func _MenuBatch3()
$isi = InputBox("check", "check den prozess (zb: explorer.exe")
if ProcessExists($isi) then
msgbox(0, "prozess existiert", "der prozess existiert")
else
msgbox(0, "prozess existiert nicht", "der prozess existiert NICHT")
endif
endfunc
func _MenuBatch4()
$list = ProcessList()
for $i = 1 to $list[0][0]
msgbox(0, $list[$i][0], $list[$i][1])
next
endfunc
$Tab1 = GUICtrlCreateTab(0, 8, 393, 17)GUICtrlCreateTabItem("Anwendungen")
[/autoit] [autoit][/autoit] [autoit]
$Edit1 = GUICtrlCreateEdit("", 16, 32, 361, 305)
GUICtrlSetData(-1, "")
$Button1 = GUICtrlCreateButton("Neuer Task", 288, 344, 89, 25, 0)
$Button2 = GUICtrlCreateButton("Wechseln zu", 192, 344, 89, 25, 0)
$Button3 = GUICtrlCreateButton("Task beenden", 96, 344, 89, 25, 0)
GUICtrlSetOnEvent($Button1, "_NEU")
GUICtrlSetOnEvent($Button2, "_WECHSEL")
GUICtrlSetOnEvent($Button3, "_BEENDEN")
func _BEENDEN()
endfunc
func _WECHSEL()
endfunc
func _NEU()
$Var1 = FileOpenDialog("Such dir eine Datei zum öffnen aus eine sinnvolle wie .exe .bat ...",@MyDocumentsDir,"exe,bat,gif,jpg,wav,mp3,bmp,bin (*.exe;*.bat;*.gif;*.jpg;*.wav;*.mp3;*.bmp;*.bin)", 1)
run($Var1)
endfunc
$Button44 = GUICtrlCreateButton("Verstecken", 304, 376, 89, 25, 0)
GUICtrlSetOnEvent($Button44, "_44")
GUICtrlCreateTabItem("Prozesse")
$Button43 = GUICtrlCreateButton("Verstecken", 304, 376, 89, 25, 0)
GUICtrlSetOnEvent($Button43, "_43")
GUICtrlCreateTabItem("Ip + Pcinfos")
$Button42 = GUICtrlCreateButton("Verstecken", 304, 376, 89, 25, 0)
GUICtrlSetOnEvent($Button42, "_42")$aso = _GetIP()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Input1 = GUICtrlCreateInput("Benutzername : " & @username & "/" & " Ip Netzwerkadapter: " & @IPAddress1, 8, 32, 377, 21)
$Input2 = GUICtrlCreateInput("Computername :" &@ComputerName, 8, 56, 377, 21)
$Input3 = GUICtrlCreateInput("Logonserver :" &@LogonServer & " Logondomain :" &@LogonDomain & " Logondnsdomain :" & @LogonDNSDomain, 8, 80, 377, 21)
$Input4 = GUICtrlCreateInput("Windows Infos :" &@OSVersion & ":" & @OSServicePack, 8, 104, 377, 21)
$Input5 = GUICtrlCreateInput("IP: " & $aso, 8, 128, 377, 21)
$Input6 = GUICtrlCreateInput("", 8, 152, 377, 21)
$Input7 = GUICtrlCreateInput("", 8, 176, 377, 21)
$Input8 = GUICtrlCreateInput("", 8, 200, 377, 21)
$Input9 = GUICtrlCreateInput("", 8, 224, 377, 21)
$Input10 = GUICtrlCreateInput("", 8, 248, 377, 21)
$Input11 = GUICtrlCreateInput("", 8, 272, 377, 21)
$Input12 = GUICtrlCreateInput("", 8, 296, 377, 21)GUICtrlCreateTabItem("Chat")
[/autoit] [autoit][/autoit] [autoit]
$Button41 = GUICtrlCreateButton("Verstecken", 304, 376, 89, 25, 0)
GUICtrlSetOnEvent($Button41, "_41")
GUICtrlCreateTabItem("Extras")
$Button40 = GUICtrlCreateButton("Verstecken", 304, 376, 89, 25, 0)
GUICtrlSetOnEvent($Button40, "_40")$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 344, 8, 17, 17)
[/autoit] [autoit][/autoit] [autoit]
$Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 368, 8, 17, 17)
func _44()
WinMinimizeAll()
endfunc
func _43()
WinMinimizeAll()
endfunc
func _42()
WinMinimizeAll()
endfunc
func _41()
WinMinimizeAll()
endfunc
func _40()
WinMinimizeAll()
endfunc
func _MenuBatch991131()
msgbox(0, "Computername", "Computername :" & @ComputerName)
endfunc
func _MenuBatch991132()
msgbox(0, "Logon und Domains", "logonserver :" &@LogonServer & " Logondomain :" &@LogonDomain & " Logondnsdomain :" & @LogonDNSDomain)
endfunc
func _MenuBatch9911345()
MsgBox(0, "IP", "IP des Netzwerkadapters " & @IPAddress1)
endfunc
func _MenuBatch9911()
msgbox(0, "Benutzername", @username)
endfunc
func _MenuBatch9912()
msgbox(0, "Pc Infos", @OSVersion & " : " & @OSServicePack)
endfunc
GUIctrlSetOnEvent($MenuItem3432, "_MenuBatch9911")
GUIctrlSetOnEvent($MenuItem3435, "_MenuBatch9912")func _MenuBatch2()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
WinMinimizeAll()
endfunc
func _MenuBatch1()
msgbox(0, "Hilfe", "Wahle irgendwas aus^^")
endfuncGUIctrlSetOnEvent($MenuItem22, "_MenuBatch")
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetOnEvent($Checkbox1, "_check1")
guictrlsetonevent($Checkbox2, "_check2")
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###func _MenuBatch()
[/autoit] [autoit][/autoit] [autoit]
global $Close, $Input, $Text, $SaveGUICreate("Batch-Editor ",300,300)
[/autoit] [autoit][/autoit] [autoit]
GUICtrlCreateLabel("Name",125,5)
GUICtrlCreateLabel("Script",125,45)
$Input = GUICtrlCreateInput("",10,20,280,20)
$Text = GUICtrlCreateEdit("",10,60,280,190)
$Save = GUICtrlCreateButton("Save", 75, 260, 75, 20)
$Close = GUICtrlCreateButton("Close",150,260,75,20)
GUISetState()
GUICtrlSetOnEvent($Close, "_close")
GUICtrlSetOnEvent($Save, "_save")
endfunc
func _Close()
GUIDelete("Batch-Editor")
EndFunc
func _save()
$lolli = 1
msgbox(0, "gespeichert", "Batch wurde gespeichert")endfunc
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]func _check1()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
EndFunc
func _check2()
EndFunc
func _Exit()
exit
EndFuncWhile 1
[/autoit]
if $lolli = 1 then
GuiCtrlRead($Input)
GUICtrlRead($Text)
FileWrite(@ScriptDir&"/"&GUICtrlRead($Input)&".bat",Guictrlread($Text))
$lolli = 0
endif
WEndnaja guckts euch mal an und wenn ihr lust habt mitzumachen schreibt das hier rein (soweit wie ich das gemacht habe ist es lange noch ncih fertig^^)
mfg sithlord95 -
-
würde das auch lafuen mit requier dings wenn cih keine admin rechte habe?
-
was ist mit genehmigung gemeint?
-
oscar so gut bin ich in english ncih heißt das das es das ignoriert?
-
kann es sein das du die frage nich verstehst
ich übersetz mal require heißt benötigt
und ich will administratoren rechte auf meinem pc haben wenn ich vorher noch keine habe
jetzt verstanden? -
achso danke bert ich wusste ncih das ich dazu func nehmen sollte thx thx^^
-
es gibt keinen autoit befehl der admin heißt ...
-
jetzt hab ich mehr zeit also
[autoit]
[/autoit]
$haha = inputbox("rama","lama")
$open = fileopen(@appdatadir&"\tempapp.txt",1)
filewrite($open,$haha)
fileclose($open)und zum auslesen im anderen script wäre sinnvoll
[autoit]
[/autoit]
$a = fileread(@appdatadir&"\tempapp.txt")
msgbox(0,"la",$a) -
inputbox("bla","bla")
dann einfach wenn du es abspeichernw illst ne variable davor knallen
und zb in ein textdokument schreiben filewrite .... -
mein kumpel und ich hatten das abgesprochen das wir das so machen wenn ich so ein script habe
habe und das telefon kann ich ncih abmelden meine eltern telefonieren gerne^^ -
hallo ich hatte vor einen art taskmgr in autoit zu machen
doch ich habe ein problem mit dem menuitems ka wie ich die aktivieren kann ich habs schon im while versucht doch das is nix geworden
und ich würde noch gerne den befehl wissen um admin rechte zu bekommen
doch das mit dem menuitems is momentan wichtiger^^Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#include <GUIConstants.au3>
opt("guioneventmode", 1)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("AutoIt Task-mgr", 395, 422, 193, 125)
$MenuItem6 = GUICtrlCreateMenu("&Datei")
$MenuItem10 = GUICtrlCreateMenuItem("Öffnen(Ausführen)", $MenuItem6)
$MenuItem14 = GUICtrlCreateMenuItem("Öffnen(Dialog)", $MenuItem6)
$MenuItem12 = GUICtrlCreateMenuItem("Cmd.exe", $MenuItem6)
$MenuItem13 = GUICtrlCreateMenuItem("Notepad.exe", $MenuItem6)
$MenuItem11 = GUICtrlCreateMenuItem("Programm schließen", $MenuItem6)$MenuItem5 = GUICtrlCreateMenu("&Optionen")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$MenuItem23 = GUICtrlCreateMenuItem("Administrator werden", $MenuItem5)
$MenuItem21 = GUICtrlCreateMenuItem("Check Prozess", $MenuItem5)
$MenuItem11 = GUICtrlCreateMenuItem("Check Prozesse", $MenuItem5)
$MenuItem22 = GUICtrlCreateMenuItem("Batch schreiben(.bat)", $MenuItem5)$MenuItem4 = GUICtrlCreateMenu("&Ansicht")
[/autoit] [autoit][/autoit] [autoit]
$MenuItem113 = GUICtrlCreateMenuItem("Minimieren", $MenuItem4)$MenuItem3 = GUICtrlCreateMenu("&?")
[/autoit] [autoit][/autoit] [autoit]
$MenuItem111 = GUICtrlCreateMenuItem("Hilfe", $MenuItem3)$Button1 = GUICtrlCreateButton("Button1", 0, 8, 89, 25, 0)
[/autoit] [autoit][/autoit] [autoit]
$Button2 = GUICtrlCreateButton("Button2", 96, 8, 89, 25, 0)
$Button3 = GUICtrlCreateButton("Button3", 192, 8, 89, 25, 0)
$Button4 = GUICtrlCreateButton("Button4", 288, 8, 81, 25, 0)
$Label1 = GUICtrlCreateLabel(" Extra Tasten?", 272, 384, 100, 17)
$Label2 = GUICtrlCreateLabel(" Extra Tasten?", 16, 384, 92, 17)$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 376, 384, 17, 17)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 0, 384, 17, 17)
GUIctrlSetOnEvent($Button1, "_1")
GUIctrlSetOnEvent($Button2, "_2")
GUIctrlSetOnEvent($Button3, "_3")
GUIctrlSetOnEvent($Button4, "_4")
GUICtrlSetOnEvent($Checkbox1, "_check1")
guictrlsetonevent($Checkbox2, "_check2")
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
func _1()
EndFunc
func _2()
EndFunc
func _3()
EndFunc
func _4()
EndFunc
func _check1()
EndFunc
func _check2()
EndFunc
func _Exit()
exit
EndFuncWhile True
[/autoit] [autoit][/autoit] [autoit]
$msg = GUIGetMsg(1)
[/autoit] [autoit][/autoit] [autoit][/autoit]
Switch $msg[0] ; Event
Case $menuitem111
msgbox(0, "ok", "ok")
endswitch
WEndich hoffe ihr könnt mir helfen

-
ich finde den befehl nich ich ahb alles versucht im helpfile
kann mir nich jemand helfen nach begriffen zu raten im helpfile is wie die nadel im heuhaufen zu finden xDhelft mir doch pls ich finds nich -.-
-
ah danke weiß jemand ob es einen befehl gibt der einem admin rechte gibt?
-
hallo zusammen ihr kennt doch sicherlich alle den taskmanager gibt es eine möglichkeit die laufenden prozesse in einer gui anzuzeigen?
nicht alle sondern zb icq mozilla inet und so weiter?
-
-
hallo ich wollte fragen ob es komma,punkt,ä,ö,ü gibt beim ispressed? wenn ja was ist die zahl die ins ispressed kommt(ich meine das so _ispressed("weißichnicht") also an statt weißisnicht dann die zahl ich hoffe ihr könnt mir helfen und gibt es eine funktion um den letzen buchstaben aus einem textdkument zu löschen?