Call out to script to stop with attribute in wWWHomePage

Posted by Steven Maxon on Super User See other posts from Super User or by Steven Maxon
Published on 2010-06-09T06:24:32Z Indexed on 2010/06/09 6:32 UTC
Read the original article Hit count: 323

Filed under:

I'm getting an error when I try and call out the script to stop in line 8

'Bind to the user object using the current user

Set objSysInfo = CreateObject("ADSystemInfo") strUserDN = objSysInfo.UserName Set objUser = GetObject("LDAP://" & strUserDN)

strwWWHomePage = objItem.Get("wWWHomePage") If wWWHomePage <> 6 Then wscript.quit Else Set ppt = CreateObject("PowerPoint.Application") ppt.Visible = True ppt.Presentations.Open "\abngan01\tracking\ppt.pptx" End If

© Super User or respective owner

Call out to script to stop with attribute in wWWHomePage

Posted by Steven Maxon on Stack Overflow See other posts from Stack Overflow or by Steven Maxon
Published on 2010-06-09T06:45:30Z Indexed on 2010/06/09 6:52 UTC
Read the original article Hit count: 323

Filed under:

I'm gettinga n error message in line 8 when I try to call out the script to stop when it finds teh attribute in the Web page: field in AD.

Set objSysInfo = CreateObject("ADSystemInfo")
strUserDN = objSysInfo.UserName
Set objUser = GetObject("LDAP://" & strUserDN)


strwWWHomePage = objItem.Get("wWWHomePage")
If wWWHomePage  6 Then
  wscript.quit
Else
  Set ppt = CreateObject("PowerPoint.Application")
  ppt.Visible = True
  ppt.Presentations.Open "\\abngan01\tracking\ppt.pptx"
End If

© Stack Overflow or respective owner

Related posts about new