Вы параноик, коллега)
Ничего военного в этой процедуре нет.
Сами можете посмотреть:
Connection = СоздатьОбъект("ADODB.Connection");
Попытка
Connection.Open("Driver={MySQL ODBC 5.1 Driver};Server=" + СокрЛП(glServer) +
//Connection.Open("Driver={MySQL ODBC 5.2 ANSI Driver};Server=" + СокрЛП(glServer) +
";Port=" + glPort +
";Database=" + СокрЛП(glDatabase) +
";User=" + СокрЛП(glUser) +
";Password=" + СокрЛП(glPassword));
Сообщить("Соединение установлено.");
RecordSet = СоздатьОбъект("ADODB.RecordSet");
RecordSet.ActiveConnection = Connection;
RecordSet.LockType = 3;
Cmd = СоздатьОбъект("ADODB.Command");
Cmd.ActiveConnection=Connection;
Cmd.CommandTimeout = 7000;
Cmd.CommandType = 1;
Исключение
Сообщить("Ошибка подключения - " + ОписаниеОшибки());
КонецПопытки;
строку подключения и драйвер (не забудьте предварительно установить) выбираете в зависимости от операционки - в первом случае нормально работает с XP-2003, во втором - с win7-2008 и иже с ними
как-то так...