У меня есть приложение VB6, которое кто-то написал, и оно не работает только у некоторых пользователей, которые пытаются его использовать.
Это работающий код, который возвращает ошибку:
On Error GOTO error_handler
..
Set db = New ADODB.Connection
db.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=****;Password=****; Initial Catalog=***;Data Source=****,1433"
error_handler:
If db.Error.count then
strDBErrors = "No access to Main Database."
For Each err In db.errors
strDBErrors = strDBErrors & vbCrLf & err.Description
Next
MsgBox strDBErrors
После запуска этого кода я получаю два окна с ошибкой. В одном из них указано «Ошибка выполнения 3709», а в другом — две строки: одна из них — это мое пользовательское сообщение об ошибке, а вторая, если это: «Ошибка входа в систему для пользователя пользователя».
Это происходит только с одним пользователем на конкретном компьютере, на котором установлена эта программа. Это не происходит ни на одном другом компьютере с любым другим пользователем. Я попытался переустановить программу с этим пользователем на этом компьютере, но это не сработало.
Любые идеи?