Для 8.х:
Как отключить узел от распределенной информационной базы?
Поскольку сама конфигурация заблокирована, то этот код надо создавать в обработке, открыв каую-нибудь другую (незаблокированную) конфигурацию, вставить кнопку в конфигураторе. Сохранить её как внешнюю обработку и выполнить, запустив базу в режиме 1С:Предприятие в монопольном режиме (и открыв внешнюю обработку из файла).

При этом, этот код нельзя выполнить в режиме отладчика, т.е./или имея конфигуратор открытым на отключаемой базе, поскольку требуется исключительная блокировка доступа к базе этого кода.

Название параметра не имеет значение, хотя по умолчанию, параметр процедуры для кнопки командной панели

Код 1C v 8.х

 Процедура ОтключитьГлавныйУзелНажатие(Кнопка)   

будет проставляется как "Кнопка", а вставляемой через меню Форма --> Вставить элемент управления... подучается "Элемент"

Код 1C v 8.х

 Процедура ОтключитьГлавныйУзелНажатие(Элемент)   

Готовая обработка для 8.1 - Отключить Восстановить Подчиненный узел от Главного узела Скачивать файлы может только зарегистрированный пользователь!

Привожу тут код внешней обработки отключение - восстановление подключения к УРБД:

Код 1C v 8.х

 Процедура ОтключитьГлавныйУзелНажатие(Элемент)

   Если ПланыОбмена.ГлавныйУзел()<> Неопределено Тогда

       СохранитьЗначение("ВосстановитьЗначениеГлавногоУзлаВПодчиненном",

           ПланыОбмена.ГлавныйУзел());

       ПланыОбмена.УстановитьГлавныйУзел(Неопределено);

   КонецЕсли;

   Предупреждение("Главный узел отключен");

КонецПроцедуры



Процедура ВосстановитьГлавныйУзелНажатие(Элемент)

   Если ПланыОбмена.ГлавныйУзел()= Неопределено Тогда

   ПланыОбмена.УстановитьГлавныйУзел(

       ВосстановитьЗначение(

       "ВосстановитьЗначениеГлавногоУзлаВПодчиненном"));

   КонецЕсли;

Предупреждение("Главный узел восстановлен");

КонецПроцедуры   

Для 7.7:
При преобразовании информационной базы в режим использования компоненты УРБД (Управление Распределенными Информационными Базами), в ИБ вносятся некоторые изменения, не позволяющие использовать базу в обычном режиме. А именно: добавляются три таблицы, отвечающие за процесс синхронизации, и вносятся изменения в таблицу 1ssystem.dbf Не забудьте сделать резервную копию перед тем, как: Удалить файлы 1sdbset.dbf, 1sdbset.cdx, 1sdwnlds.dbf, 1sdwnlds.cdx, 1supdts.dbf, 1supdts.cdx Удалить единственную запись из файла 1ssystem.dbf Зайти в режим конфигуратора, открыть, например, свойства конфигурации, добавить какой-нибудь символ в комментарий, а потом его удалить. После этого сохранить конфигурацию.

Ниже приведено несколько способов получения списка баз 1С 7.7 из реестра:
Код получения списка баз 1С 7.7 из 8.х

Код 1C v 8.х

 функция сзПолучитьСписокБаз()

    попытка

        олеСкрипт = новый COMОбъект("MSScriptControl.ScriptControl");

        олеСкрипт.Language = "VBScript";

        стрКод =

        "function strGetListBase()

        |  const RootKey = &H80000001

        |  set Reg = GetObject(""winmgmts:{impersonationLevel=impersonate}!\\."" &_

        |                      ""\root\default:StdRegProv"")

        |  PathKey = ""Software\1C\1Cv7\7.7\Titles""

        |  Reg.EnumValues RootKey, PathKey, Arr

        |  Answer = ""{""""#"""",4772b3b4-f4a3-49c0-a1a5-8cb5961511a3,"" & chr(10)

        |  Answer = Answer & ""{3,1e512aab-1b41-4ef6-9375-f0137be9dd91,0,0,"" & chr(10)

        |  Answer = Answer & ""{"" & (UBound(Arr) + 1) & "","" & chr(10)

        |  for x = LBound(Arr) to UBound(Arr)

        |    call Reg.GetStringValue(RootKey, PathKey, Arr(x), Value)

        |    Answer = Answer & ""{1e512aab-1b41-4ef6-9375-f0137be9dd91,"" & chr(10) &_

        |             ""{"""""" & replace(Value, """""""", """""""""""") & """""",0,"" &_

        |             chr(10) & ""{""""S"""","""""" & Arr(x)& """"""},"" &_

        |             chr(10) & ""{3,0,"" & chr(10) & ""{0},"""""""",-1,-1,0,0}"" &_

        |             chr(10) & ""}"" & chr(10) & ""}""

        |    if x <> UBound(Arr) then Answer = Answer & "",""

        |    Answer = Answer & chr(10)

        |  next

        |  Answer = Answer & ""},"" & chr(10) & ""{""""Pattern""""}"" & chr(10) &_

        |           ""}"" & chr(10) & ""}""

        |  strGetListBase = Answer

        |end function";

        олеСкрипт.AddCode(стрКод);

        стрОтвет = олеСкрипт.Run("strGetListBase");

        Ответ = ЗначениеИзСтрокиВнутр(стрОтвет);

        Ответ.СортироватьПоПредставлению();

    исключение

        Ответ = новый СписокЗначений;

        Ответ.Добавить("Базы 1С:Передприятия 7.7 не обнаруженны!");

    конецпопытки;

    возврат Ответ;

конецфункции   

Код для 1С 7.7

Код 1C v 7.x

 

Функция ПолучитьСписокБаз1()

    Перем Value,arrValues;

    Scr = CreateObject("MSScriptControl.ScriptControl");

    Scr.Language = "vbscript";

    Scr.Timeout=-1;

    HKEY_CURRENT_USER = 2147483649;

    strKeyPath = "Software\1C\1Cv7\7.7\Titles";

    Locator=СоздатьОбъект("WbemScripting.SWbemLocator");

    ServiceDef=Locator.ConnectServer(".","root\default");

    oReg = ServiceDef.Get("StdRegProv");

    Dict=СоздатьОбъект("Scripting.Dictionary");

    Scr.AddObject("Dict",Dict);

    Scr.AddObject("oReg",oReg);

    Scr.ExecuteStatement("dim arrValues,Value:");

    Scr.ExecuteStatement("oReg.EnumValues "+HKEY_CURRENT_USER+","""+strKeyPath+""",arrValues:");

    Scr.ExecuteStatement("for i=lbound(arrValues) to ubound(arrValues):Dict.add ""pj"" & i, arrValues(i):next");

    ТЗБаз=СоздатьОбъект("ТаблицаЗначений");

    ТЗБаз.НоваяКолонка("Путь");

    ТЗБаз.НоваяКолонка("Описание");

    Для к=0 По Dict.count Цикл

        Д=Dict.Item("pj"+к);

        Scr.ExecuteStatement("oReg.GetStringValue "+HKEY_CURRENT_USER+","""+strKeyPath+""","""+Д+""",Value");

        ТЗБаз.НоваяСтрока();

        ТЗБаз.Путь = Д;

        ТЗБаз.Описание = Scr.eval("Value");

    КонецЦикла;

	//Посмотрим что в ТЗ

	//ТЗБаз.ВыбратьСтроку();

    Возврат ТЗБаз;

КонецФункции



Процедура ПолучитьСписокБаз2()

     Попытка

          scrptCtrl=createobject("MSScriptControl.ScriptControl");

          scrptCtrl.language="vbscript";

          scrptCtrl.addcode("Function Get1CV77Titles()

          |const HKEY_CURRENT_USER = &H80000001

          |Set oReg=GetObject(""winmgmts:{impersonationLevel=impersonate}!\\."" &_

          |""\root\default:StdRegProv"")

          |strKeyPath = ""Software\1C\1Cv7\7.7\Titles""

          |oReg.EnumValues HKEY_CURRENT_USER, strKeyPath, arrValues

          |strInfo=vbNullString

          |For i = LBound(arrValues) To UBound(arrValues)

          | call oReg.GetStringValue(HKEY_CURRENT_USER,strKeyPath,arrValues(i),Value)

          | strInfo=strInfo & arrValues(i) & ""="" & Value & vbCrLF

          |Next

          |Get1CV77Titles = strInfo 

          |End Function");

          Сообщить(scrptCtrl.run("Get1CV77Titles"));

     Исключение

          Сообщить(ОписаниеОшибки()); 

     КонецПопытки;

КонецПроцедуры

<Сообщил Gloom>

                  

Процедура ПолучитьСписокБаз3()

     Ключ="HKEY_CURRENT_USER\Software\1C\1Cv7\7.7\Titles";

     ИмяКаталога=СокрЛП(КаталогПользователя());

     ИмяБазы=СокрЛП(каталогИБ());

     Если прав(ИмяКаталога,1)<>"\" Тогда ИмяКаталога=ИмяКаталога+"\" КонецЕсли;

     Если прав(ИмяБазы,1)<>"\" Тогда ИмяБазы=ИмяБазы+"\" КонецЕсли;

     ИмяБазыСтр=Симв(34)+СтрЗаменить(ИмяБазы,"\","\\")+Симв(34);

     ИмяФайла="USER.TXT";

     Команда="Regedit /ea "+Симв(34)+ИмяКаталога+ИмяФайла+Симв(34)+" "+Симв(34)+Ключ+Симв(34);

     КомандаСистемы(Команда);

     Текст=СоздатьОбъект("Текст");

     Текст.КодоваяСтраница(0);

     Текст.Открыть(ИмяКаталога+ИмяФайла);

     Текст.Показать();

     Стр=""; Нашли=0;

     Для сч=1 по Текст.КоличествоСтрок() Цикл

          Стр=СокрЛП(Текст.ПолучитьСтроку(сч));

          Сообщить(Стр);

          Если Найти(стр,ИмяБазыСтр)<>0 Тогда

               Нашли=1;

               прервать;

          КонецЕсли;

     КонецЦикла;

КонецПроцедуры

 Set Sh = CreateObject("WScript.Shell")

'Переиндексирую базу

Set oExec1 = Sh.Exec("""C:\Program Files\1Cv77\BIN\1cv7.exe"" CONFIG /d""C:\bases2005"" /nПрограммист /pXXXXX /@c:\bases2005\ExtForms\sys\Chk.txt")



'Дожидаюсь, пока она не отработает

Do While oExec1.Status = 0

    WScript.Sleep 100

Loop



Set oExec1 = Nothing

WScript.Sleep 10000   

Код 1C v 7.x

 

спКомп = СоздатьОбъект("СписокЗначений");

Попытка

	ScrptCtrl=СоздатьОбъект("MSScriptControl.ScriptControl");

	ScrptCtrl.Language="vbscript";

	ScrptCtrl.AddCode("

	|Function GetComputers()

	|	Set WinNT = GetObject(""WinNT:"")  

	|	WinNT.Filter = Array(""domain"")

	|	For Each Domain In WinNT

	|		Set ADSI = GetObject(""WinNT://"" & Domain.Name) 

	|		ADSI.Filter = Array(""computer"")

	|		For Each Comp In ADSI

	|			strInfo=strInfo & Domain.Name & "";"" & Comp.Name & vbCrLf

	|		Next

	|	Next

	|	GetComputers = strInfo

	|End Function

	|");

	Текст=СокрЛП(ScrptCtrl.Run("GetComputers"));  

	ScrptCtrl = "";

Исключение

	Предупреждение(ОписаниеОшибки());

	Возврат;

КонецПопытки;



Для Индекс=1 по СтрКоличествоСтрок(Текст) Цикл

	СтрТекста=СтрПолучитьСтроку(Текст,Индекс); 

	Разделитель=Найти(СтрТекста,";");

	Домен=Лев(СтрТекста,Разделитель-1);

	Компьютер=Прав(СтрТекста,СтрДлина(СтрТекста)-Разделитель);

	спКомп.ДобавитьЗначение(Компьютер,Домен+""+Компьютер); 

КонецЦикла; 

спКомп.Сортировать();

Код 1C v 8.х

 

спКомп = Новый СписокЗначений;

Попытка

	ScrptCtrl= Новый COMОбъект("MSScriptControl.ScriptControl");

	ScrptCtrl.Language="vbscript";

	ScrptCtrl.AddCode("

	|Function GetComputers()

	|	Set WinNT = GetObject(""WinNT:"")  

	|	WinNT.Filter = Array(""domain"")

	|	For Each Domain In WinNT

	|		Set ADSI = GetObject(""WinNT://"" & Domain.Name) 

	|		ADSI.Filter = Array(""computer"")

	|		For Each Comp In ADSI

	|			strInfo=strInfo & Domain.Name & "";"" & Comp.Name & vbCrLf

	|		Next

	|	Next

	|	GetComputers = strInfo

	|End Function

	|");

	Текст=СокрЛП(ScrptCtrl.Run("GetComputers"));  

	ScrptCtrl = "";

Исключение

	Предупреждение(ОписаниеОшибки());

	Возврат;

КонецПопытки;



Для Индекс=1 по СтрЧислоСтрок(Текст) Цикл

	СтрТекста=СтрПолучитьСтроку(Текст,Индекс); 

	Разделитель=Найти(СтрТекста,";");

	Домен=Лев(СтрТекста,Разделитель-1);

	Компьютер=Прав(СтрТекста,СтрДлина(СтрТекста)-Разделитель);

	спКомп.Добавить(Компьютер,Домен+""+Компьютер); 

КонецЦикла; 

спКомп.СортироватьПоПредставлению();

//Выберем комп

спКомп.ВыбратьЭлемент(); 

   

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

1. С версии 8.1.11 включен циклический перезапуск процессов, по наступлению интервала происходит автоматический перезапуск рабочих процессов rphost.

2. В некоторых случаях причиной ошибки могут стать утечки памяти.

3. Действия администратора в консоли (команда удалить пользователя)

4. Процесс rphost на серверном компьютере завершился аварийно

5. Ошибочное принятие высокой интенсивности пользователей за атаку на протокол в некоторых случаях Windows

6. Устаревание данных в кэшах

7. Плохо отслеживаемые события в фоновых процессах

8. Нестандартные запросы могут приводить к падениям rphost

Способы устранения
1. с 8.1.11 включен циклический перезапуск процессов, для анализа этого события на компьютере сервера 1С:Предприятия необходимо включить запись в технологический журнал событий PROC (пример файла logcfg.xml).
Когда процесс выключается, будет выведено событие PROC со свойством Txt=Process become disable.
Когда процесс останавливается, будет выведено событие PROC со свойством Txt=Process terminated. Any clients finished with error. Если аварийные завершения работы пользователей совпадают по времени с выводом этого события, то причиной является принудительная остановка рабочего процесса либо администратором (через консоль кластера), либо вследствие автоматического перезапуска.

2. перезагрузить сервер
3. убедиться, что причиной являются/не являются действия администратора в консоли
4. создать на сервере приложения два или более рабочих процесса, чтобы иметь возможность переподключиться в случаи сбоя рабочего процесса
5. Запусти программу regedit.exe, добавь новое значение типа DWORD с именем SynAttackProtect в раздел реестра HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\ и присвой ему значение 00000000
Имеет смысл делать для ОС Windows 2003 SP1 (http://msdn.microsoft.com/ru-ru/library/ms189083.aspx).

6. arp -d *
ipconfig /flushdns
ipconfig /registerdns
nbtstat -R
nbtstat -RR

7. отключить фоновые процессы во всех базах

8. найти технологическим журналом запрос, приводящий к падению


p.s. Кроме того, 54 ошибку можно получить на релизах <= 8.1.12.98 при ри конвертации конвертором ИБ 77(DBF) -> 81(SQL) в типовой ТиС (демо, взятой с ИТС) релиз. 954 в клиент-серверном варианте.

обойти можно так:

- выполните конвертацию в файловый фариант информационной базы 1С:Предприятия 8.1,
- выгрузите полученную информационную базу в файл,
- загрузите в клиент-серверный вариант информационной базы 1С:Предприятия 8.1.

Подробнее на www.gilev.ru

Проблема для 1С 7.7 решается следующим образом:

Устанавливаем 32-битную сборку 1С - 7.70.027 (должна быть у вашего франча или ищите в просторах интернета).

В каждый каталог базы (если у вас их несколько) кладем пустой файл OrdNoChk.prm (иначе 1С будет говорить про неправильный порядок сортировки и вылетать, но и это решаемо - запусить 1С в режиме конфигуратора и в меню Администрирование - Кодовая страница таблиц ИБ выставить "Текущая системная установка")

Так же для запуска 1С под SQL-сервером, при создании базы указать в ее свойствах параметр Collation: Cyrillic_General_CI_AS

В русской версии Windows Vista в случае правильной установки (в Панели Управления Regional Settings) русского языка (в трёх местах), этот параметр система проставить автоматически.

Но это можно сделать только в том случае, если на ВСЕХ компьютерах, работающих с базой 1С, установлена Windows Vista. Если же часть пользователей работает на Windows XP, а часть - на Windows Vista, поможет либо отключение проверки порядка сортировки или установка терминального сервера.

Если при попытке подключиться к базе SQL на Windows Vista 1С выдаёт ошибку "Для доступа к базе данных требуется ODBC-драйвер для MS SQL Server версии 3.50.0303 или старше." Это происходит из-за несовместимости ODBC драйверов старших версий. Чтобы решить эту проблему нам достаточно скопировать два файла с компьютера с Windows XP - sqlserv32.dll и sqlserv32.rll в папку SYSTEM32 вашей Windows Vista.

PS: Так же надо не забывать, чтобы загрузились внешние компоненты, первый запуск надо выполнить с отключенным Контролем учетных записей (User Account Control, UAC) или правой крысой - Запуск от имени Администратор.

Как отключить Контроль учетных записей (User Account Control, UAC)?
* Пуск »
* Панель управления »
* Учетные записи пользователей »
* Включение или отключение контроля учетных записей (UAC) »
* Снимите галочку с параметра «Используйте контроль учетных записей (UAC) для защиты компьютера» »
* Нажмите «OK» »
* Перезагрузите компьютер

Скачать sqlserv32.dll, sqlserv32.rll и OrdNoChk.prm одним файлом

Для 1С 7.7:
1. Воспользуйтесь файлом Отключение splash-заставки появляющейся при запуске 1С-Предприятия 7.7

2. При OLE - Нужно поставить NO_SPLASH_SHOW Внимание! - работает это только при запуске в режиме OLE Automation сервера

Код 1C v 7.x

 V7 = СоздатьОбъект("V77.Application");

Открыта=V7.Initialize(V7.RMTrade,"/dD:\ASP_COPY\1sbdb /nUser /p11111 /m", "NO_SPLASH_SHOW");

Если Открыта=0 Тогда

    Предупреждение("Ошибка открытия инф. базы");

КонецЕсли;

ИмпортБИ=V7.CreateObject("БухгалтерскиеИтоги");

//...

3. Изменить/убрать заставку при запуске
1 способ: Resource Browser'ом (плагин к FAR) заходим в 1crcrus.dll.
В ветке 1049/ZLIB_DATA находим что-то, так вот если ZLIB_DATA удалить, то никаких заставок при запуске 1С не будет. Правильно - потому что их нету
2 способ:
"Любым HEX-редактором найти в запускаемом *.EXE файле последовательность и заменить на другую:
Тип Имя файла: Найти: Заменить на:
Для Сетевой версии: в файле 1cv7.exe найти: 8B 87 54 85 00 00 и заменить на: 31 C0 90 90 90 90
Для Локальной версии: в файле 1cv7l.exe найти: 8B 8B 54 85 00 00 и заменить на 31 C9 90 90 90 90
Приведенные последовательности встречаются в файлах один раз, но для различных релизов по разным смещениям."
3 способ: Использовать патчер Soarona(по сути, он выполняет способ 2, ищите его на просторах Интернета)

Для 1С 8.х:
Для запуска создвайте скрипт VBS c кодом(для разных версий меняйте 81 на 80 или 82):
Для Файлового варианта

Код VBS

 Set DB=CreateObject("v81.Application")

DB.Connect("File=D:\1C_base\ZUPRAZR;Usr=EMigachev;Pwd=12345")

DB.Visible=True   

Для Клиент-серверного варианта

Код VBS

 Set DB=CreateObject("v81.Application")

DB.Connect("Srvr=co1-aps-04;Ref=zup;Usr=EMigachev;Pwd=12345;")

DB.Visible=True   

Для 7.7:
CONFIG - конфигуратор
DEBUG - отладчик
ENTERPRISE - предприятие
/D<Путь> - каталог информационной базы данных
/U<Путь> - каталог пользователя
/N<Имя> - имя пользователя, как оно указанно в списке пользователей
в конфигураторе
/P<Пароль> - пароль пользователя, имя которого указано в параметре /N
/M - монопольный режим
/T<Путь> - параметр для переопределения каталога временных файлов
Если путь имеет вид, типа c:\Program Files\папка, то для запуска
необходимо весь путь береться в "" - /D"C:\Program Files\base1c"

а) для командной строки (bat-файл):
С:Program Files/1Cv77/BIN/1CV7.exe /DC:/Base1C
б) для ярлыка (появляются кавычки):
“С:Program Files/1Cv77/BIN/1CV7.exe” /DC:/Base1C

Для 8.х :
CONFIG запуск системы 1С:Предприятие в режиме «Конфигуратор»;
ENTERPRISE запуск системы 1С:Предприятие в режиме «1С:Предприятие»;
CREATEINFOBASE <connect string> [/AddInList [<имя ИБ>]] создание информационной базы
<connect string>
строка, задающая параметры информационной базы, каждый из которых представляет собой фрагмент вида
<Имя параметра=><Значение>,
где Имя параметра — имя параметра, а Значение — его значение.
Фрагменты отделяются друг от друга символами ';'.
Если значение содержит пробельные символы, то оно должно быть заключено в двойные кавычки (").

Примеры использования параметров:

Открытие 1С:Предприятия для файлового варианта:
"C:\Program Files\1cv81\bin\1cv8.exe" ENTERPRISE /F"D:\1C_base\ZUPRAZR" /N"Админ" /P"12345"

Открытие 1С:Предприятия для клиент-серверного варианта:
"C:\Program Files\1cv81\bin\1cv8.exe" ENTERPRISE /S"server-1C\ZUP" /N"Админ" /P"12345"
Если на одном сервере стоит 8.1 и 8.2, то при подключении к базам 8.2 нужно указывать порт сервера (например 1641):
"C:\Program Files\1cv82\common\1cestart.exe" ENTERPRISE /S"server-1C:1641\ZUP" /N"Админ" /P"12345"

Запуск программы под пользователем и выполнение обработки при открытии:
"C:\Program Files\1cv82\8.2.11.235\bin\1cv8s.exe" ENTERPRISE /F "D:\1C\HRM" /N user /P password /Execute "D:\1C\Внешние_обработки_1С\РаботающиеОбработки\РабочийСтол.epf"

Для снятия блокировки установки соединений с информационной базой
в cmd: start C:\Progra~1\1cv81\bin\1cv8.exe /UC "код доступа"
в ярлыке: "C:\Program Files\1cv81\bin\1cv8.exe" ENTERPRISE /F"D:\1C\HRM" /N"Иванов И.И." /P"Пароль" /UC 456743

Запустить 1С под собой на машине пользователя, если стоит аутентификация Windows
C:\Program Files\1cv81\bin\1cv8.exe" /WA-
В данном случае 1С при входе обязательно потребует ввести пароль.

Создание файла шаблонов конфигураций
DESIGNER /F"D:\V8\Cfgs81\ИБ81" /CreateTemplateListFile "templates.lst" -TemplatesSourcePath "D:\V8\Cfgs81\tmpIts"

Примеры работы с хранилищем:
для конфигурации, не присоединенной к текущему хранилищу
DESIGNER /F"D:\V8\Cfgs82\ИБ82" /ConfigurationRepositoryF "D:\V8\Cfgs82" /ConfigurationRepositoryN "Администратор" /ConfigurationRepositoryReport "D:\ByObject.mxl" -NBegin 1 -NEnd 2 –GroupByObject
для присоединенной к хранилищу конфигурации, информация для отчетов берется из текущего хранилища
DESIGNER /F"D:\V8\Cfgs82\ИБ82" /ConfigurationRepositoryReport "D:\ByComment.mxl" -NBegin 1 -NEnd 2 -GroupByComment

Создать базу и прописать её в списке баз у пользователя:
Создаст базу с конфигураций из файла 1Cv8.cf в созданной папке «test3» на диске E и добавит путь к базе в список баз под именем «TEST33».
"C:\Program Files\1cv82\common\1cestart.exe" CREATEINFOBASE File=e:\test3; /AddInListTEST33 /UseTemplate "C:\Documents and Settings\User\My Documents\tmplts\TestVendor\TestConfig\1Cv8.cf"

С 8.2.12 программа установки выполняет регистрацию COM-соединения "для компьютера". Имеется возможность выполнить регистрацию "для пользователя" с помощью командной строки
regsvr32 /n /i:user comcntr.dll

Автоматическая загрузка валют
Создаем пользователя под конкретное действие, устанавливаем в правах настройки пользователя соответствующие значения, например, галочку «Автозагрузка курсов валют при начале работы программы» для Бухгалтерии или «Загружать актуальные курсы валют при запуске системы» для УПП.
"C:\Program Files\1cv81\bin\1cv8.exe" enterprise /SServer-1C\1C-Work /NAdmin /P12345 /Out"C:\Logi1C\log.txt" -NoT_runcate /DisableStartupMessages
Вообще данная идея пришла в голову, когда я подсмотрела в нестандартной конфе, что у Пользователя можно также поставить на выполнение и глобальную процедуру при его входе в систему. В стандартных можно воспользоваться параметром /Execute, создав обработку, например, запускающую допроведения документов и после завершающей работу системы:
// безусловное завершение работы программы
ЗавершитьРаботуСистемы(Ложь);
Автоматическое сохранение баз банных средствами 1С:
1) создаем файлик .bat с строкой
"C:\Program Files\1cv82\common\1cestart.exe" DESIGNER /S Server-1C\1C-Work82 /N"Администратор" /P"12345" /DumpIB \\bdc\BackUp\Base_%date-10%.dt
2) создаем регламентированное задание на сервере с правами админа с выполнением этого файла в определенное время.
Зная формат вывода даты, можно посмотреть через echo %date%, можно выбирая отдельные части даты формировать более удобное представление файла используя символы, например:
%date3% - вывод с третьего знака
%date3,2% - вывод 2-х знаков начиная с третьего

Пример файла для обновления конфигурации
echo off
cls
"C:\Program Files\1cv81\bin\1cv8.exe" ENTERPRISE /S"server\ESKM" /N"Admin" /P"ESKM" /DisableStartupMessages /C"ЗавершитьРаботуПользователей"
"C:\Program Files\1cv81\bin\1cv8.exe" CONFIG /S"server\ESKM" /N"Admin" /P"ESKM" /DisableStartupMessages /UpdateDBCfg /UC"ПакетноеОбновлениеКонфигурацииИБ"
"C:\Program Files\1cv81\bin\1cv8.exe" ENTERPRISE /S"server\ESKM" /N"Admin" /P"ESKM" /C"РазрешитьРаботуПользователей" /UC"ПакетноеОбновлениеКонфигурацииИБ"

Для снятия блокировки установки соединений с информационной базой нужно:
Войти в информационную базу, используя параметр запуска "/UC" с тем же кодом разрешения доступа, который был указан при установке блокировки.

Запустить данную обработку, указав в качестве действия блокировки "Снять блокировку соединений".

Нажать кнопку "Выполнить".

в cmd
start C:\Progra~1\1cv81\bin\1cv8.exe /UC <код доступа>

в ярлыке
"C:\Program Files\1cv81\bin\1cv8.exe" ENTERPRISE /F D:\Конфигурации\Типовые\УпрТорг /N ИмяПользователя /P Пароль /UC 456743

Подробнее о параметрах
Для файлового варианта определен параметр:
File — каталог информационной базы;

Locale — язык (страна), которые будут использованы при создании информационной базы. Допустимые значения такие же как у параметра <Форматная строка> метода Формат. Параметр Locale задавать не обязательно. Если не задан, то будут использованы региональные установки текущей информационной базы.

Для клиент-серверного варианта определены параметры:
Srvr — имя сервера 1С:Предприятия;

Ref — имя информационной базы на сервере;

SQLSrvr — имя SQL сервера;

SQLDB — имя SQL базы данных;

SQLUID — имя пользователя SQL;

SQLPwd — пароль пользователя SQL. Если пароль для пользователя SQL не задан, то данный параметр можно не указывать

SQLYOffs - смещение дат, используемое для хранения дат в SQL Server. Может принимать значения 0 или 2000. Данный параметр задавать не обязательно. Если не задан принимается значение 0.

Locale - язык (страна), (аналогично файловому варианту).

Для всех вариантов определены параметры:

Usr — имя пользователя;

Pwd — пароль

/AddInList
параметр, показывающий, под каким именем добавлять базу в список, если не указан, база не будет добавлена в список. Если не указано имя, используется умолчание, аналогичное интерактивному созданию информационной базы.

Одновременное использование ключей не допускается.

Параметры командной строки для указания параметров запуска:

/@<имя файла>
параметры командной строки записаны в указанном файле

/F<Путь>
путь к информационной базе, если она хранится в файле (имя файла указывать не надо)

/S<Адрес>
адрес информационной базы, хранящейся на сервере 1С:Предприятия 8.0, складывается следующим образом:

<Имя компьютера, работающего сервером приложений>\ <Ссылочное имя информационной базы, известное в рамках сервера 1С:Предприятия 8.0>

/N<Имя>
имя пользователя. Должно быть указано так же, как в списке пользователей, создаваемом в Конфигураторе

/P<Пароль>
пароль пользователя, имя которого указано в параметре /N. Если у пользователя нет пароля, этот параметр можно опустить

/WA-
запрет применения Windows-аутентификации при старте Предприятия или Конфигуратора

/WA+
установка обязательного применения Windows-аутентификации при старте 1С:Предприятия или Конфигуратора. Если ключ /WA не указывается, то подразумевается, что используется параметр командной строки /WA+

/AU-
запрет вывода вопроса об обновлении текущей версии 1С:Предприятия с административной установки

/AU+
установка вывода вопроса об обновлении текущей версии 1С:Предприятия с административной установки. Если ключ /AU не указывается, то подразумевается, что используется параметр командной строки /AU+

/Out<Имя файла>
[-NoT_runcate]
установка файла для вывода служебных сообщений. Если задан ключ –NoT_runcate (через пробел), файл не очищается

/L<Каталог>
указывается каталог локализованных ресурсов интерфейса (например, «RU»)

/DisableStartupMessages
Подавляет стартовые сообщения: «Конфигурация базы данных не соответствует сохраненной конфигурации. Продолжить?»; «Возможностей Вашего компьютера недостаточно для редактирования справки по конфигурации. Для редактирования справки необходимо установить Microsoft Internet Explorer версии 6.0 или выше.»; «Возможностей Вашего компьютера недостаточно для редактирования html-документов, в том числе разделов справки. Для редактирования html-документов необходимо установить Microsoft Internet Explorer версии 6.0 или выше. В данном запуске редактирование html-документов будет недоступно.»

/C<Строка текста>
передача параметра в конфигурацию

С:\1CV8\BIN\1CV8.EXE ENTERPRISE /FDB

Приведенная командная строка означает, что система 1С:Предприятие 8.0 будет запущена в режиме «1С:Предприятие», а информационная база находится в подкаталоге «\DB» каталога «С:\1CV8\BIN».

С:\1cv81bin\1cv8.exe enterprise /s Serv06\ZUP /L RU
А эта приведенная командная строка означает, что система 1С:Предприятие 8.0 будет запущена в режиме «1С:Предприятие», адрес информационной базы ZUP, хранящейся на сервере 1С:Предприятия Serv06 и интерфейс Русский

При включении / перезагрузке компьютера под управлением Windows XP из автозагрузки не загружается Сервер защиты с сообщением об ошибке: HASP Device Driver not installed (-100).
Драйвер защиты загружается медленнее, чем Сервер защиты из автозагрузки.

Решение проблемы:
Вместо Сервера защиты (NHSRVW32.EXE) использовать Менеджер лицензий LMSETUP, устанавливаемый в качестве службы (Service) Windows.
Менеджер лицензий LMSETUP доступен по адресу:
http://www.aladdin.com/support/hasp/enduser.asp

Изменить информацию в файле 1SSYSTEM.DBF
DBSETUUID = "00000000-0000-0000-0000-000000000000"

Можно, для надежности сменить и остальные поля на:

EVENTIDTA = "0"
DBSIGN = ""
SNAPSHPER = "C"



Затем удалить файлы 1SDBSET.DBF, 1SDWNLDS.DBF, 1SUPDTS.DBF и соответствующие индексные файлы (.CDX) .

Бесплатные бонусы казино - по другому их называют "бездепы".

Настройки в системном реестре:

Путь к 1С:
HKEY_LOCAL_MACHINE&# 092;SOFTWARE&# 092;Microsoft&# 092;Windows&# 092;CurrentVersion&# 092;App Paths&# 092;1Cv7s.exe
Заголовки ИБ:
HKEY_LOCAL_MACHINE&# 092;Software&# 092;1C&# 092;1Cv7&# 092;7.7&# 092;Titles
Пути к каталогам загрузки/выгрузки:
HKEY_CURRENT_USER&# 092;Software&# 092;1C&# 092;1Cv7&# 092;7.7&# 092;Заголовок ИБ&# 092;Config&# 092;Upload/Download directories
Чтобы нормально работало по почте:
HKEY_LOCAL_MACHINE&# 092;Software&# 092;Microsoft&# 092;Windows Messaging Subsystem&# 092;MAPI = '1'
Если по умолчанию OutlookExpress:
HKEY_LOCAL_MACHINE&# 092;Software&# 092;Clients&# 092;Mail&# 092;Outlook Express&# 092;DLLPath = sysRoot+'&# 092;OUTLOOK EXPRESS&# 092;MSOE.DLL'
Если по умолчанию TheBat!:
HKEY_LOCAL_MACHINE&# 092;Software&# 092;Clients&# 092;Mail&# 092;The Bat!&# 092;DLLPath = sysRoot+'&# 092;THE BAT!&# 092;TBMapi.DLL'


Информация в файле 1SDBSET.DBF
DBSIGN - Код базы (как он отображается в настройках ЦБ/ПБ)
DBDESCR - Наименование базы
DBSTATUS - "M" - Текущая, "P" - Центральная, "C" - Перифирийная, "N" - никакая или неинициализированная (т.е. не было первой выгрузки, статус при создании новой)
DBFNCP - имя файла загрузки из ЦБ в ПБ
DBFNPC - имя файла загрузки из ПБ в ЦБ
DBFAUTO - признак автообмена
EMAILFLGS - признак использования почты
EMAIL - почтовый адрес

Наиболее эффективно это можно сделать с помощью объектов OLE Automation , работа с которыми осуществляется при помощи:
sp_OACreate, sp_OAGetProperty, sp_OASetProperty, sp_OAMethod, sp_OAGetErrorInfo, sp_OADestroy (подробное описание есть в http://technet.microsoft.com/ru-ru/library/ms203721(sql.90).aspx).
Рабочий пример процедуры (была написана для сохранения zip-архивов, хранящихся в базе):

Код

CREATE PROCEDURE dbo.SaveRequestDataAsFile (
@FileName varchar(1024) --имя файла
,@FilePath varchar(1024) --путь файла
,@ReqID --некое условие на таблицу
)
AS
BEGIN

DECLARE
@Stream integer,
@Buffer varbinary(4096),
@Size integer,
@Pos integer,
@BufSize integer,
@FileNameLocal varchar(1024),
@HR integer

if RIGHT(@FilePath, 1)<>'&# 092;' begin set @FilePath=@FilePath+'&# 092;' end

set @FileNameLocal = @FilePath + @FileName

SET @BufSize = 4096

EXEC @HR = sp_OACreate 'ADODB.Stream',@Stream OUT
if @HR<>0
begin
--обработка ошибки создания объекта
EXEC [dbo].[sp_displayoaerrorinfo] @Stream ,@HR
end

EXEC @HR = sp_OASetProperty @Stream,'Type',1 -- binary
EXEC @HR = sp_OASetProperty @Stream,'Mode',3 -- write|read
EXEC @HR = sp_OAMethod @Stream,'Open'

S_elect
@Size = DATALENGTH(SrvRequests.RequestData)
FROM SrvRequests WHERE SrvRequests.RequestID = @ReqID

Set @Pos=0

WHILE @Pos < @Size BEGIN
SET @BufSize = CASE WHEN @Size - @Pos < 4096 THEN @Size - @Pos ELSE 4096 END

S_elect @Buffer = substring(SrvRequests.RequestData ,@Pos+1, @BufSize)
from SrvRequests where SrvRequests.RequestID = @ReqID

EXEC @HR = sp_OAMethod @Stream, 'Write', NULL, @Buffer

SET @Pos = @Pos + @BufSize
END

EXEC @HR = sp_OAMethod @Stream,'SaveToFile',null, @FileNameLocal,2
EXEC @HR = sp_OAMethod @Stream,'Close'
EXEC @HR = sp_OADestroy @Stream
END

Рекомендуется создать еще пару процедур для внятного описания ошибок в случае их возникновения

Код

CREATE PROCEDURE sp_hexadecimal
@binvalue varbinary(255),
@hexvalue varchar(255) OUTPUT
AS
DECLARE @charvalue varchar(255)
DECLARE @i int
DECLARE @length int
DECLARE @hexstring char(16)
S_elect @charvalue = '0x'
S_elect @i = 1
S_elect @length = DATALENGTH(@binvalue)
S_elect @hexstring = '0123456789abcdef'
WHILE (@i <= @length)
BEGIN
DECLARE @tempint int
DECLARE @firstint int
DECLARE @secondint int
S_elect @tempint = CONVERT(int, SUBSTRING(@binvalue,@i,1))
S_elect @firstint = FLOOR(@tempint/16)
S_elect @secondint = @tempint - (@firstint* 16)
S_elect @charvalue = @charvalue +
SUBSTRING(@hexstring, @firstint+1, 1) +
SUBSTRING(@hexstring, @secondint+1, 1)
S_elect @i = @i + 1
END
----------------------------------------------------------------------
CREATE PROCEDURE sp_displayoaerrorinfo
@object int,
@hresult int
AS
DECLARE @output varchar(255)
DECLARE @hrhex char(10)
DECLARE @hr int
DECLARE @source varchar(255)
DECLARE @description varchar(255)
PRINT 'OLE Automation Error Information'
EXEC sp_hexadecimal @hresult, @hrhex OUT
S_elect @output = ' HRESULT: ' + @hrhex
PRINT @output
EXEC @hr = sp_OAGetErrorInfo @object, @source OUT, @description OUT
IF @hr = 0
BEGIN
S_elect @output = ' Source: ' + @source
PRINT @output
S_elect @output = ' Description: ' + @description
PRINT @output
END
ELSE
BEGIN
PRINT ' sp_OAGetErrorInfo failed.'
RETURN
END

Ниже привожу пример функции нечеткого сравнения строк. Возвращаемое значение - от 0 (вообще не совпадает) до 1 (совпадает полностью)
По опыту, результат сравнения можно считать достоверным при совпадении больше 0.8 (80%)

Код

CREATE FUNCTION fn_FuzzyCompareString(
@Stri1 varchar(250),
@Stri2 varchar(250),
@MaxLen int)
RETURNS float
AS
BEGIN

DECLARE @Str1 varchar(250), @Str2 varchar(250), @SCountVar int,
@SCountEq int, @LenStr int, @Res float
DECLARE @NumSymbStr2 int
DECLARE @Cnt1 int, @Cnt2 int
DECLARE @SubStr varchar(250)

SELECT
@LenStr=1,
@SCountVar=0 ,
@SCountEq=0,
@res=0

Set @Str1 = replace(LTRIM(RTRIM(upper(@Stri1))),'.',' ')
Set @Str2 = replace(LTRIM(RTRIM(upper(@Stri2))),'.',' ')

if ((@MaxLen <= 0) or (Len(@Str1)=0) or (Len(@Str2)=0))
Begin
Set @Res=0
End
else
begin
While (@LenStr<=@MaxLen)
BEGIN
Set @NumSymbStr2=1
Set @Cnt2=0

While ((@Cnt2+@LenStr)<=LEN(@Str2))
BEGIN

Set @SubStr = '%'+SUBSTRING(@Str2,@NumSymbStr2,@LenStr)+'%'
if (PATINDEX(@SubStr, @Str1)<>0)
begin
Set @SCountEq=@SCountEq+1
end

Set @SCountVar=@SCountVar+1
Set @NumSymbStr2=@NumSymbStr2+1
Set @Cnt2 = @Cnt2+1
END


Set @NumSymbStr2=1
Set @Cnt2=0

While ((@Cnt2+@LenStr)<=LEN(@Str1))
BEGIN

Set @SubStr = '%'+SUBSTRING(@Str1,@NumSymbStr2,@LenStr)+'%'
if (PATINDEX(@SubStr, @Str2)<>0)
begin
Set @SCountEq=@SCountEq+1
end

Set @SCountVar=@SCountVar+1
Set @NumSymbStr2=@NumSymbStr2+1
Set @Cnt2 = @Cnt2+1
END

Set @LenStr=@LEnStr+1
END

end
if @SCountVar=0
SET @Res=0
Else
BEGIN
SET @Res=Convert(Numeric (10,5),@SCountEq)/Convert(Numeric (10,5),@SCountVar)
END

RETURN @Res
END

Использование этой функции (на примере прямого запроса к справочнику ФизЛица для 1С:ТиС 7.7): в выборку попадут все физлица, у которых релевантность выше 0.8

Код

DECLARE @FIO varchar(250)

Set @FIO = 'Иванов Петр'

SELECT
Спр.Code as [ФизЛицоКод],
Спр.ID as [ФизЛицо],
Спр.DESCR as [ФИО],
dbo.fn_FuzzyCompareString(dbo.fn_FIO(Спр.DESCR),@FIO,3) As [Релевантность]
FROM
SC503 as Спр (nolock)
where
ISMARK = 0
and
ISFOLDER = 2
and
dbo.fn_FuzzyCompareString(dbo.fn_FIO(Спр.DESCR),@FIO,3)>=0.8
GO

 CREATE PROCEDURE sp_DBReindex AS

SET NOCOUNT ON

DECLARE @TableName char(32)

DECLARE SysCur CURSOR FOR S_elect name FROM sysobjects WHERE type='U'

OPEN SysCur

FETCH NEXT FROM SysCur INTO @TableName

WHILE @@FETCH_STATUS=0

BEGIN

DBCC DBREINDEX(@TableName)

FETCH NEXT FROM SysCur INTO @TableName

END

CLOSE SysCur

DEALLOCATE SysCur