Автор: sarti
Дата сообщения: 09.02.2010 07:31
VladimirLitvinenko, во-первых, обнови 1С до 8.1.15.х. Во-вторых, создай в корне любого тома новый каталог, обзови его как-нибудь попроще (например "11"), открой его, создай в нём текстовый файлик с простым именем (например "22") и скопируй в него этот текст:
[more=...]
File="backend.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)
[/more]
После сохрани, закрой и измени расширение с *.txt на *.vbs и скопируй в этот же каталог файл "backend.dll". Потом запусти файл "22.vbs". Выполнение оного обычно занимает 2-3 минуты, иногда 5-10 - всё зависит от мощности машинки.
