asp error 0x80070035

[cz007j]

Hi, I'm getting a random error that says

Error Type:

(0x80070035)

C:\INETPUB\WWWROOT\NEWINTRANET\TOOLS\CONTACTPOINTS\../../includes/IsInGroup.asp, line 15

 

here's my code:

<script language="VBScript" RUNAT=Server>

Function IsInGroupReturn(User, Group)

Dim Member

If Group.IsMember(User.ADsPath) Then

IsInGroupReturn = True

Else

IsInGroupReturn = False

End If

End Function

 

Function IsInGroup(strUsername, strUserDomain, GroupName)

Dim objDomain, objGroup, objUser

Set objDomain = GetObject("WinNT://" & strUserDomain)

Set objGroup = objDomain.GetObject("Group", GroupName)

Set objUser = GetObject("WinNT://" & strUserDomain & "/" & strUsername)

IsInGroup = IsInGroupReturn(objUser, objGroup)

End Function

</SCRIPT>

 

It seems that this used to work b4 I started the job. The guy who create it left and is unreachable. I have no clue why this stopped working. Can anyone help?

[Robby]

Is this ASP.NET ?

[cz007j]

Is this ASP.NET ?

No, it's an asp error, but I figured everyone here must all know asp pretty well in order to do asp .net, so i posted it here