This shows you the differences between two versions of the page.
Both sides previous revision Previous revision | Next revision Both sides next revision | ||
userspace:etu_notepad [2015/04/03 10:49] Robert Tauber [ETU Notepad++] |
userspace:etu_notepad [2015/04/03 10:49] Robert Tauber [Copy.exe / Copy.au3] |
||
---|---|---|---|
Line 66: | Line 66: | ||
</ | </ | ||
- | ==== Copy.exe / Copy.au3 ==== | ||
- | Kopieren und Umbenennen \\ | ||
- | //Später ermitteln der Version Nummer// | ||
- | <code autoit> | ||
- | #include < | ||
- | #include < | ||
- | |||
- | ;RT: Wo binn ich / Wo sol es denn hin | ||
- | Local $sPath = @ScriptDir | ||
- | Local $aPath = StringSplit( @ScriptDir, " | ||
- | Local $sPathTo = " | ||
- | local $extention = " | ||
- | |||
- | ;RT: Zur Kontrolle | ||
- | ; | ||
- | ;MsgBox ( 1, "Zeil Pfad", $sPathTo | ||
- | |||
- | ;RT: Erstmal aufräumen | ||
- | DirRemove ( $sPathTo , 1 ) | ||
- | |||
- | ;RT: Wie sehen meine Ordner aus | ||
- | Local $sFolderList = _FileListToArray($sPath , " | ||
- | local $i = 0 | ||
- | |||
- | ;RT: Jetzt Ordner für ordner | ||
- | For $i = 1 to $sFolderList[0] | ||
- | ;RT: Was gibt es im aktuellen ordner | ||
- | Local $sFileList = _FileListToArray($sPath & " | ||
- | ;RT: Umbennenenen der *.[$extention] | ||
- | if $sFileList <> 0 Then | ||
- | if $sFileList[0] = 1 Then | ||
- | ; | ||
- | $sFrom = $sPath & " | ||
- | $sTo = $sPathTo & " | ||
- | FileCopy ( $sFrom, $sTo, 9 ) | ||
- | ;DirRemove ( $sFrom ,1 ) | ||
- | ;MsgBox ( 1, " | ||
- | Else | ||
- | MsgBox ( 1, " | ||
- | _ArrayDisplay($sFileList, | ||
- | EndIf | ||
- | Else | ||
- | ;MsgBox ( 1, "No Subfolders in: ", $sPath & " | ||
- | endif | ||
- | Next | ||
- | |||
- | Exit | ||
- | |||
- | |||
- | |||
- | </ | ||
==== setup.ins ==== | ==== setup.ins ==== |