Всем доброго времени! Собрал новый сервер на базе виндоус 2003, установил Управление торговлей 8.1, прописал всех пользователей сервера которые должны работать в терминале и столкнулся с неприятностью. При первом подключении нового пользователя выдается сообщение что каталог информационных баз пуст и предлагает создать. На старом сервере с 1С 7 при первом подключении нового пользователя сразу предлагалось выбрать из имеющихся а не самому прописывать путь. Может кто-нибудь подсказать как решить эту проблему а не входить под каждым и прописывать вручную. Заранее спасибо!
sigor52
08.04.2010, 11:30
Всем доброго времени! Собрал новый сервер на базе виндоус 2003, установил Управление торговлей 8.1, прописал всех пользователей сервера которые должны работать в терминале и столкнулся с неприятностью. При первом подключении нового пользователя выдается сообщение что каталог информационных баз пуст и предлагает создать. На старом сервере с 1С 7 при первом подключении нового пользователя сразу предлагалось выбрать из имеющихся а не самому прописывать путь. Может кто-нибудь подсказать как решить эту проблему а не входить под каждым и прописывать вручную. Заранее спасибо!
У меня таже проблема только еще с раздачей ключей для юзеров в терминале. Под админкой все работает, а когда другой узер входит по терминалу то ему еще пишет не найден ключ. ПОМОГИТЕ
kolemual
08.04.2010, 11:42
Под админкой все работает, а когда другой узер входит по терминалу то ему еще пишет не найден ключ
судя по всему пользуешься пираткой с эмулятором ключа? тут все просто, ищещь в интернете (их там полно) пропатченную backend.dll под свою платформу и меняешь на родную в каталоге bin
sigor52
08.04.2010, 16:33
Добавлено через 4 часа 33 минуты 45 секунд
Всем спасибо за помощь сделал следующее:
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)
Все прекрасно заработало
hipp0p0
20.09.2010, 09:31
Вау-у-у. Огромное спасибо. А то бьюсь тута...:good: