Microsoft VBScript runtime error '800a01fb�

Results 1 to 2 of 2

Thread: Microsoft VBScript runtime error '800a01fb�

  1. #1
    Join Date
    Dec 1969

    Default Microsoft VBScript runtime error '800a01fb�

    im getting an error as below mentioned, its not always. im getting it randomly.<BR><BR>Microsoft VBScript runtime error &#039;800a01fb&#039; <BR>An exception occurred: &#039;oBjRightsAction1.Open&#039; <BR><BR>D:PROJECTSKELDKELD_APPSALES../include/functions.asp, line 473 <BR><BR>Below is my code:<BR>=================<BR>Function fnPermittedRights(sDept,sFeature)<BR> Dim sSqlAction1, oBjRightsAction1, arrAction1<BR> Set oBjRightsAction1 = Server.CreateObject("ADODB.RecordSet")<BR> fnPermittedRights = ""<BR> sSqlAction1 = "SELECT user_priv from users where users_id = &#039;admin&#039;"<BR> if oBjRightsAction1.state &#060;&#062; 0 then<BR> oBjRightsAction1.close<BR> end if<BR> oBjRightsAction1.Open sSqlAction1, objConn, adOpenKeyset<BR> If oBjRightsAction1.BOF = False Then<BR> arrAction1 = oBjRightsAction1.getrows()<BR> if arrAction1(0,0) = 1 then<BR> fnPermittedRights = "ADD,DELETE,EDIT,PRINT,SELECT,VIEW"<BR> end if<BR> end if<BR> set oBjRightsAction1 = nothing<BR>End Function<BR><BR>I checked whether objConn State is closed, but it is always in open mode, I donno from where im getting this error.<BR>Im using ADO version 2.7 and sql server 2000.<BR><BR>Can anyone plz help me to figure it out.<BR><BR>Thanx in advance.<BR><BR>Murali.

  2. #2
    Join Date
    Dec 1969

    Default that is wrong

    You check the state of a CONNECTION object not of a RECORDSET.<BR><BR>See this,<BR>

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts