asp error 0x80070035

cz007j

Freshman
Joined
Jul 28, 2004
Messages
26
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?
 
Back
Top