Hallo Leute,
ich habe eine Frage!
Und zwar lasse ich mich mit _FileListToArray in eine Combo eines Netzwerkordners anzeigen.
(Der PC arbeitet als Datenserver, somit sind doch hunderte Ordner freigegeben ^^)
Mit einem Druck auf den Start Button sollte der Ordner, den ich in dem Combo makiert habe, zu einem festen Ziel kopiert werden.
(C:\Von MedienServer)
Ungefähr soweit bin ich:
...
Case $Copy
$Kopieren = DirCopy (>Hier fehlt die wichtige stelle<, "C:\Von MedienServer", 1)
While 1
If $Kopieren = 1 Then MsgBox (1, "", "Fertig!")
ExitLoop
EndIf
Sleep (100)
WEnd
Edit:
Hier mal das ganze Skript:
#include <GUIConstants.au3>
#include <File.au3>
#Region ### START Koda GUI section ### Form=d:\autoit\koda\forms\copygui.kxf
$KopierenGUI = GUICreate("Kopieren !", 455, 265, 465, 319)
$DirList = GUICtrlCreateCombo("---", 96, 56, 265, 25)
GUICtrlSetFont(-1, 11, 800, 0, "Comic Sans MS")
$Copy = GUICtrlCreateButton("Kopieren", 112, 112, 209, 113, 0)
GUICtrlSetFont(-1, 36, 800, 0, "Comic Sans MS")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$Dir = "\\Medien\Sonstiges"
$Dir_Combo = _FileListToArray($Dir)
If Not @error Then
For $i = 1 To Ubound($Dir_Combo)-1
If FileGetAttrib($Dir&"\"&$Dir_Combo[$i]) = "D" Then
GuiCtrlSetData($DirList, $Dir_Combo[$i])
EndIf
Next
EndIf
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Noch ohne den "neuen" Teil