OS:WINDWOS2003 SP1
ASP3.0
IIS6.0
ASPにてLDAPの認証を検討しています。
strPath = "LDAP://xx.xx.xx.xx:xxx/CN=%USER%,ou=xxxx,ou=xxx,o=xxxxx"
strUser = "ユーザID"
strPassword = "パスワード"
Set objDSO = GetObject("LDAP:")
Set objUser = objDSO.OpenDSObject(Replace(strPath,"%USER%",strUser), strUser, strPassword, 0)
とした時に、
Err.numberに -2147023570 が返ってきてしまいます。
何故、-2147023570が返ってくるのか原因が分かりません。
よろしくお願いします。
あと、"%USER%" は、ASP(ActiveServerPages)だと、文字列になっていますよね?
引数にはなっていないような・・
まずはこのサイトどおり作って、変更を加えていってはいかがでしょうか。
接続はできました。
ソースはぼかしています。
正常(0)errnumberはかえってくるようになったのですが、
以下の状態を取得したいのですが、ASPでのサンプルがないため、よくわかりません。
あと、もう少しなのですが、
状態(status)ACTIVE,ENACTVE、PASSWORD)、
PwdExpData(ユーザーパスワードの有効期限)
ポイントで釣って申し訳ありませんが明確な回答をいただけましたら300ポイント進呈します。
strPath = "LDAP://xxx.xxx.xxx.xxx:xxx/"
strUser = "cn=" & Request.Form("USERID") & ",ou=xxxx,ou=xxx,o=xxxx"
strPassword = Request.Form("PASSWORD")
Dim objDSO,objUser
Set objDSO = GetObject("LDAP:")
Set objUser = objDSO.OpenDSObject(strPath & strUser, strUser, strPassword, ADS_FAST_BIND)
If Err.Number <> 0 Then
'認証失敗
Else
'認証成功
End If