Кибор » Кибор - Интегрированная среда разработки ботов » Вопросы и решение проблем » Найти переименовать и заменить файлы

Страниц (1): [1]
 

1. Fintil - 11 Июня, 2023 - 04:26:04 - перейти к сообщению
Привет. Подскажите как реализовать.

В папке 'a' два файла admin_1.txt и user_2.txt со случайными цифрами после admin и user.
В папке 'b' два файла admin_321.txt и user_321.txt.

Нужно заменить файлы в папке 'a' файлами из папки 'b' с их переименованием admin_321.txt в admin_1.txt и user_321.txt в user_2.txt
2. Fintil - 11 Июня, 2023 - 07:15:13 - перейти к сообщению
Главная проблема, я не знаю как найти файл по части имени и сохранить его полное название в переменную.
3. Zireael - 12 Июня, 2023 - 08:31:13 - перейти к сообщению
 Цитата:
как найти файл по части имени и сохранить его полное название в переменную.

CODE:
string FileName[999];
int k=dir("D:\a", #FileName[0], "file", "txt"); // найти все txt файлы

string AdminFunnName = "";
for (int i=0; i<k; i++)
{
if(regexsearch(1, #AdminFunnName, FileName[i], "^admin_.+")) break; // найти файл, имя которого начинается с admin_
}
messagebox(AdminFunnName);
4. asterka - 13 Июня, 2023 - 05:43:54 - перейти к сообщению
Zireael , Спасибо! Всё работает. А выключить пк скриптом можно? Искал через поиск, не нашел.
5. Zireael - 13 Июня, 2023 - 05:58:49 - перейти к сообщению
 Цитата:
выключить пк скриптом можно?

CODE:
#define TRUE 1
#define FALSE 0
#define SE_SHUTDOWN_PRIVILEGE 0x13
#define EWX_FORCE 0x00000004
#define EWX_POWEROFF 0x00000008
#define SHTDN_REASON_FLAG_PLANNED 0x80000000
external(INT, "AdjustPrivilege" , "RtlAdjustPrivilege", "ntdll.dll");
external(INT, "ExitWindowsEx" , "ExitWindowsEx", "user32.dll");

int PreviousValue = 0;
AdjustPrivilege(SE_SHUTDOWN_PRIVILEGE, TRUE, FALSE, address(#PreviousValue));
ExitWindowsEx(EWX_POWEROFF | EWX_FORCE, SHTDN_REASON_FLAG_PLANNED);
6. asterka - 13 Июня, 2023 - 06:03:07 - перейти к сообщению
Zireael , Большое спасибо =)

Powered by ExBB FM 1.0 Final