Заметки о решаемых задачах АйТишников

Сделал - запиши. Нашёл - сохрани :)

Прошу прощения за рекламу на сайте. Я постарался сделать это максимально ненавязчиво и по минимуму. При чтении заинтересовавших вас статей она не будет вам мешать.
И если есть возможность поставить мой сайт в исключения у блокировщика рекламы, я буду очень признателен вам.

Заставляем работать 1C в терминале. backend.dll и backbas.dll

Заставляем работать 1C в терминале. backend.dll и backbas.dll

 

 

 

Для работы 1С в терминале нужно патчить файлы для 1с 8.1 backend.dll, для 8.2 backbas.dll.

В блокноте:

File="C:\Documents and Settings\ПУТЬ УКАЗЫВАЕТЕ СВОЙ\backbas.dll"
arr =split("10 00 00 FF D0 85 C0 0F 82 08 F8 FE FF 0F 84 16"," ")
arr2=split("10 00 00 FF D0 31 C0 0F 82 08 F8 FE FF 0F 84 16"," ")
for each c in arr
r=r & chrb(clng("&H" & c))
next
for each c in arr2
r2=r2 & chrb(clng("&H" & c))
next
set s=createobject("ADODB.Stream")
s.type=2
s.open
s.loadfromfile(File)
ss=s.readtext
s.position=0
s.writetext(replace(ss,r,r2))
s.position=0
s.type=1
s.position=2
ss=s.read
s.close
s.open
s.write(ss)
call s.savetofile(File,2)
ss=s.read
s.close
s.open
s.write(ss)
call s.savetofile(File,2)

Сохраняем как *.vbs, можно патчить как backend.ll так и backbas.dll

 

10 декабря 2011, 14:49    Александр 1C 0    656 0

 

 

 

 



Комментарии ()

    Вы должны авторизоваться, чтобы оставлять комментарии.