|
You last visited: Today at 15:13
Advertisement
Ordner im Ordner erstellen
Discussion on Ordner im Ordner erstellen within the AutoIt forum part of the Coders Den category.
05/23/2013, 20:00
|
#1
|
elite*gold: 0
Join Date: Nov 2011
Posts: 1,448
Received Thanks: 1,257
|
Ordner im Ordner erstellen
n'Abend,
Ich habe es bis jetzt geschafft das das Script immer einen neuen Ordner erstellt von 1 - unendlich, also das auf dem Desktop ein Ordner "1" erstellt wird und danach dann der Ordner "2" usw.
Nun möchte ich aber sobald die Checkbox1 checked ist, das das Script keine neuen Ordner auf dem Desktop erstellt, sondern in dem Ordner "1" einen Ordner "2" und im Ordner "2" dann den Ordner "3" , bis man halt wieder Button1 drückt, erstellt.
PHP Code:
#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <GUIConstants.au3> #include <Misc.au3>
;Script begins after this text. ;Script by Kilroy. @elitepvpers.com ; ; AUTOIT VERSION 8.3.3.3
;---- einmal öffnen schutz-------- If _Singleton("Ordner", 1) = 0 Then Exit EndIf
#Region ### START Koda GUI section ### Form= $Form1_1 = GUICreate("Ordner", 178, 97, 437, 286) $Label1 = GUICtrlCreateLabel("Ordner erstellt", 56, 8, 72, 17) $Label2 = GUICtrlCreateLabel("Unterordner erstellt", 56, 32, 96, 17) $Label3 = GUICtrlCreateLabel("", 16, 8, 36, 17) $Label4 = GUICtrlCreateLabel("", 16, 32, 36, 17) $Button1 = GUICtrlCreateButton("Start", 56, 56, 49, 25) $Checkbox1 = GUICtrlCreateCheckbox("", 152, 32, 25, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ###
$schleife = 0 $es = 1 ; Ordner name
;While startet; While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE ; Rotes X beendet Programm ; Exit Case $Button1 ; Ändert Button von Start zu Stop und von Stop zu Start If $schleife = 0 Then AdlibRegister("schleife", 200) GUICtrlSetData($button1, "Stop") $schleife = 1 Else AdlibUnRegister() GUICtrlSetData($button1, "Start") $schleife = 0 EndIf EndSwitch WEnd Func schleife() ; Createt die Ordner DirCreate(@DesktopDir & "\" & $es) If FileExists(@DesktopDir & "\" & $es) Then $es = $es + 1 GUICtrlSetData($Label3, $es) EndIf EndFunc
Hoffe jemand kann mir Tipps geben wie ich das am besten anstelle..
#Jede gute Antwort = Thanks.
MfG
Kilroy.
|
|
|
05/23/2013, 20:15
|
#2
|
elite*gold: 1445
Join Date: Sep 2011
Posts: 199
Received Thanks: 177
|
PHP Code:
$nOrdner = 0 ;Ordnernummer/name
$sPath = "/" & $nOrdner ;Pfad nach @DesktopDir
;GUI + While ...
Func schleife()
If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then
DirCreate(@DesktopDir & $sPath)
$nOrdner += 1
$sPath &= "/" & $nOrdner
Else
DirCreate(@DesktopDir & "/" & $nOrdner)
$nOrdner += 1
EndIf
EndFunc
|
|
|
Similar Threads
|
[Service]2007 Ordner - China Ordner - Exen
12/25/2009 - Metin2 Private Server - 4 Replies
Threads/Postings mit dem Inhalt "Ich biete einen Service an" oder "Ich mache euch Accounts" sind ab nun nur noch ab einer bestimmten Anzahl von Beiträgen gestattet. Nur User mit 400+ Postings ist dieses erlaubt.
Da es zu viele "Betrüger" in dieser eigentlich sehr nützlichen Methode gibt/gab, haben wir uns entschlossen dies so einzuführen.
(nen captcha Service darf man ab 50 - 100 posts anbeiten.)
|
[SUCHE] chinesischen ordner + metin2 ordner von 2007!
09/25/2009 - Metin2 Private Server - 4 Replies
hey!
ich suche dringenst einen chinesischen ordner von metin2 also von irgendeinem P-server. außerdem suche ich die 2007er metin2 version :)
wäre nett wenn mir welche den link per pn schicken könnten, gibt auch n Thanks :)
MfG JayJay
|
All times are GMT +1. The time now is 15:16.
|
|