Показано с 1161 по 1170 из 1275
Древовидный режим
-
24.05.2023, 15:16 #11
- Регистрация
- 18.04.2018
- Адрес
- HP-Compaq DX2300 microtower PC
- Сообщений
- 249
- Сказал(а) спасибо
- 69
- Поблагодарили 1811 раз(а) в 395 сообщениях
Re: как ломануть 1C 8.3 for Linux
Сообщение от alexandr_ll
Поскольку удаление аднасектовского говна из базы тоже сводится к удалению записей в таблицах, то подумал:
открываем в конфигураторе базу CleanLics и правим имя таблицы и ключ поиска записи. Удаление одного "таракана" готово.
Код://Чистка раздела "Информационная база" РезультатИнфобаза = Ложь; // здесь "FILES" - имя таблиы table=FileDB.OpenTable(0,"FILES"); fields = РазвернутьЗначение(FileDB.GetTableFieldsArray(0)); FileDb.MoveFirstRecord(0); binnew = Новый Массив; Пока FileDb.MoveNextRecord(0) Цикл Попытка record = РазвернутьЗначение(FileDb.ReadRecord(0,1,Истина,Ложь,0,Ложь)); Попытка // здесь c01b78f6-1525-41b1-9cc1-69e3da58d2ac.pfl - ключ поиска записи Если record.FILENAME = "c01b78f6-1525-41b1-9cc1-69e3da58d2ac.pfl" Тогда КонецЕсли; Исключение Продолжить; КонецПопытки; // здесь c01b78f6-1525-41b1-9cc1-69e3da58d2ac.pfl - ключ поиска записи Если record.FILENAME = "c01b78f6-1525-41b1-9cc1-69e3da58d2ac.pfl" Тогда record = РазвернутьЗначение(FileDb.ReadRecord(0,1,Истина,Истина,1,Ложь)); len_before = FileDb.GetBlobDataLength(0,"BINARYDATA"); FileDb.WriteSimpleValue(0,"BINARYDATA",Преобразовать64(,binnew),Истина,1,Ложь,Ложь); FileDb.FlushRecord(0); len_after = FileDb.GetBlobDataLength(0,"BINARYDATA"); FileDb.WriteSimpleValue(0,"DATASIZE",len_after,Истина,0,Ложь,Ложь); FileDb.FlushRecord(0); FileDb.CloseTable(0); РезультатИнфобаза = Истина; Прервать; КонецЕсли; Исключение Прервать; КонецПопытки; КонецЦикла;
Код:DELETE FROM config WHERE filename = 'versions' DELETE FROM files WHERE filename = 'ib.pfl' DELETE FROM files WHERE filename = '071523a4-516f-4fce-ba4b-0d11ab7a1893.pfl' DELETE FROM params WHERE filename = 'locale.inf'
Возьмитесь кто-нибудь за реализацию идеи, мне лень.Последний раз редактировалось HPDX2300; 24.05.2023 в 16:54.
"кинжал хорош для того, у кого он есть, и плохо тому у кого он не окажется в нужное время"
-
2 пользователя(ей) сказали cпасибо:
redhat2020 (24.05.2023), vovashulga (24.05.2023)
Социальные закладки