2

私は誰かが書いた 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

このコードを実行すると、2 つのボックスのエラーが発生します。1 つはランタイム エラー 3709 を示し、もう 1 つは 2 行あります。1 つはカスタム エラー メッセージで、2 番目は「ユーザー ユーザーのログオンに失敗しました」です。

これは、このプログラムがインストールされている特定のコンピューター上の 1 人のユーザーにのみ発生します。他のユーザーがいる他のコンピューターでは発生しません。そのコンピューターにそのユーザーでプログラムを再インストールしようとしましたが、うまくいきませんでした。

何か案は？

4

1 に答える 1

2

問題が何であるかはよくわかりませんが、Active Directory でユーザーを消去して再度作成したところ、機能しました。ただし、ユーザーは拒否グループのメンバーではありませんでした。

于 2011-08-10T15:34:18.307 に答える