![]() |
![]() |
![]() |
|
v7: Бухгалтерия 6.0 для windows 95 - как получить список пользователей ? | ☑ | ||
---|---|---|---|---|
0
Ковычки
05.07.13
✎
11:24
|
Уже интересовался, но может у кого есть готовое - как выдрать пользователей, полное имя и каталог из файла ADMIN\1SBW.ADM ?
|
|||
1
пипец
05.07.13
✎
12:00
|
если мне память не изменяет - утилита гендальфа читала
ЗЫ и зачем те выдирать ? |
|||
2
Ковычки
05.07.13
✎
13:36
|
(1) нужно "выдирать" программно, про гендальфа запамятовал, позырю
|
|||
3
Ковычки
06.07.13
✎
21:09
|
Сделал, частично, пока невкурю значения (делал ксором по известному)
mask=array(11,51,43,4,7,21,72,10,11,2,6,20,24,17,21,19,23,25,18) set fso=createobject("scripting.filesystemobject") set f=fso.opentextfile("1sbw.adm") s="" do while not f.atendofstream x=mid(f.readline,6,ubound(mask)+1) for i=0 to ubound(mask) s=s & chr(mask(i) xor asc(mid(x,i+1))) next s=s & vbcrlf loop msgbox s |
|||
4
Aleksey
06.07.13
✎
21:44
|
а чем 1sbwadm.exe не нравится? Зачем выдирать то?
|
|||
5
neomarat
06.07.13
✎
21:52
|
Какие вы старые! )))
|
|||
6
Ковычки
06.07.13
✎
22:03
|
даже так
mask=array(11,51,43,4,7,21,72,10,11,2,6,20,24,17,21,19,23,25,18,22,20,24,31,29,30,26,27,18,22,4,8,1,5,3,7,9,2,6,4,8,15,13,14,10,11,2,6,20,24,17,21,19,23,25,18,22,20,24,31,29,30,26,27,18,22,4,8,1,5,3,7,9,2,6,4,8,15,13,14,10,11,2,6,20,24,17,21,19,23,25,18,22,20,24,31,29,30,26,27,18,22,4,8,1,5,3,7,9,2,6,4,8,15,13,14,10,11,2,6,20,24,17,21,19,23,25,18,22) |
|||
7
Ковычки
06.07.13
✎
22:03
|
(4) нужно программно
в (6) и пароли и права частично |
|||
8
Ковычки
06.07.13
✎
22:04
|
mask=array(11,51,43,4,7,21,72,10,11,2,6,20,24,17,21,19,23,25,18,22,20,
24,31,29,30,26,27,18,22,4,8,1,5,3,7,9,2,6,4,8,15,13,14,10,11, 2,6,20,24,17,21,19,23,25,18,22,20,24,31,29,30,26,27,18,22,4, 8,1,5,3,7,9,2,6,4,8,15,13,14,10,11,2,6,20,24,17,21,19,23,25, 18,22,20,24,31,29,30,26,27,18,22,4,8,1,5,3,7,9,2,6,4,8,15,13, 14,10,11,2,6,20,24,17,21,19,23,25,18,22) |
|||
9
Ковычки
06.07.13
✎
22:06
|
пока несоображу, зависимость ксора
полученный по известным величинам шаблон подходит всегда - проверил |
|||
10
Ковычки
06.07.13
✎
22:17
|
шаблон достиг 238 элементов
|
|||
11
Ковычки
06.07.13
✎
22:21
|
возвращает, что то типа
{Name}{ALEX}{FullName=}{WorkDir=ALEX}{Password=1234567}}{Rights{Adm=1}{RunExcl=1}{JoModList=}{JoModAll=1}{JoNoChange=1}{JoRangeChange=1}{JoOperDel=1}{JoEnterBegDate=2415386}{JoEnterEndDate=2524593}{SkTypesMod=1}{SkModList=}{SkModAll=1}{Co начало не сначала и похоже немного не верно до второй { |
|||
12
Ковычки
06.07.13
✎
22:21
|
А так получаю список с именем, полным именем, рабочим каталогом и паролем
|
|||
13
Эльниньо
08.07.13
✎
09:59
|
Вспомнилось, как какой-то вирус руками выкусывали из command.com, когда ещё даже aidstest.exe не было.
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |