Нужно или выбор или какая-то попытка/исключение
примерный код:
UserName = "Admin" Pass= "" CodeBlock= "123" Set v8 = CreateObject("V83.COMConnector") ConnectString = "srvr='" + ServerName + ":1541'; ref='" + BaseName + "'; Usr='" + UserName + "'; pwd='" + Pass + "'; UC='" + CodeBlock + "';" Set Connect = V8.Connect(ConnectString)
в базе, где есть пользователь Admin - такой код прекрасно отработает.
Но как быть с базами, в которых вообще пользователей нет? И добавлять не планируется в общем-то.
аналогичный вопрос к коду
Set WshShell=CreateObject("WScript.Shell") 'Выгрузка базы DumpIBFile = """" & foldername & "\" & Base & "_" & FormatDateTime(Now, 2) & ".dt""" ConnectString = """C:\Program Files (x86)\1cv8\8.3.5.1443\bin\1CV8.EXE"" CONFIG /S "& ServerName & ":1541" &"\"& BaseName &" /N Admin /P " &" /DumpIB " & DumpIBFile &"/UC " & CodeBlock RetCode = WshShell.Run(ConnectString,1,true)
здесь тоже хотелось бы обработать исключение. пользователь - либо админ, либо пусто