Ошибка ADODB.Recordset '800a0bb9': аргументы неправильного типа

Set rsPlanID = Server.CreateObject("ADODB.Recordset")
rsPlanID.CursorLocation = adUseClient

strSQL = "SELECT PlanID FROM ATTJournals WHERE ATTUserDataID = " & ATTUserDataID 
rsPlanID.Open strSQL, m_objConn, adOpenStatic, adLockOptimistic

If Not rsPlanID.EOF Then
    response.Write "New PlanID:"  & rsPlanID("PlanID")
End If

Приведенный выше код написан в классическом asp.

Я получаю следующую ошибку:

Ошибка ADODB.Recordset '800a0bb9'
Аргументы неправильного типа, находятся за пределами допустимого диапазона или конфликтуют друг с другом.

Dows кто-нибудь знает причину этой ошибки и как ее исправить?