Что нового

Два действия на кнопку

Scampy

Новичок
Сообщения
54
Репутация
0
Всем доброго времени суток!
Имеются 3 папки: C:\1, C:\2 и C:\test
В папке C:\1 лежит файл 111.txt, в C:\2 лежит файл 222.txt, в C:\test лежат файлы 111.txt и 222.txt которые очень часто обновляются. И есть скрипт копирующий эти 2 файла из папки C:\test в папки C:\1 и C:\2
Код:
#include <GUIConstantsEx.au3>

$GUI = GUICreate("Тест", 250, 150, 400, 300)
$Checkbox1 = GUICtrlCreateCheckbox("Файл 111 в папке C:\1", 10, 30, 150, 17)
$Checkbox2 = GUICtrlCreateCheckbox("Файл 222 в папке C:\2", 10, 50, 150, 17)

Example()
Func Example()
$t1 = FileGetTime("C:\1\111.txt", 0)
$t11 = $t1[2] & '.' & $t1[1] & '.' & $t1[0]
$Label1 = GUICtrlCreateLabel($t11, 170, 32, 145, 17)

$t2 = FileGetTime("C:\2\222.txt", 0)
$t22 = $t2[2] & '.' & $t2[1] & '.' & $t2[0]
$Label2 = GUICtrlCreateLabel($t22, 170, 52, 145, 17)

$Button1 = GUICtrlCreateButton("Обновить", 10, 100, 75, 25)

GUISetState(@SW_SHOW)

While 1
    Switch GUIGetMsg()
        Case -3
            Exit
		 Case $Button1
			if GUICtrlRead($Checkbox1) = 1 Then FileCopy("C:\test\111.txt", "C:\1", 1)
            if GUICtrlRead($Checkbox2) = 1 Then FileCopy("C:\test\222.txt", "C:\2", 1)
	  EndSwitch
WEnd


Как сделать чтоб при его выполнении файлы не только копировались, но так же менялось значение их даты создания?
 

firex

AutoIT Гуру
Сообщения
943
Репутация
208
Scampy [?]
но так же менялось значение их даты создания
1. Воспользоваться функцией FileSetTime.
2. Создать файл:
Код:
FileDelete( "C:\1\111.txt" )
FileWrite( "C:\1\111.txt", FileRead( "C:\test\111.txt" ) )
 
Верх