N/APosted on - 10/22/2011
I need your help kindly anyone.
My company’s network consists of a single Active Directory domain named suppose Net.com. All servers on the Net.com network run Windows Server 2008.Net.com contains a server named KI-2 that has the Active Directory Federation Services (AD FS) role installed. I have to test the Connectivity of clients in the network to make sure that they can reach the new Federation server and that the Federation server is operational please tell me what should I do?
Active Directory Federation Services (AD FS)
There are 3 options to resolve this issue.
1- Upgrade to PCNS 3.0 for Windows Server 2008
2– Created a local user APC and added the user to the local admin group. Log in as APC and install the software.
3 – Edit install.vbs and replace the subroutine IsRootUser() – lines 253 to 288 – with the updated code below.
Sub IsRootUser ()
Dim strUserName, strComputerName, strUserDomain, strAdminPath, strAdminPath2, objAdminInfo
Dim objNetwork, objAdminGroup, objAdminGroup2
Set objNetwork = CreateObject("Wscript.Network")
strUserName = objNetwork.UserName
strComputerName = objNetwork.ComputerName
strUserDomain = objNetwork.UserDomain
strAdminPath = "WinNT://" & strComputerName & "/Administrators,group"
bResult = False
If (strComputerName = strUserDomain) Then
Set objAdminGroup = GetObject(strAdminPath)
If objAdminGroup.PropertyCount > 0 Then
For Each strMem In objAdminGroup.Members
If ( LCase(strMem.Name) = LCase(strUserName) ) Then
bResult = True
WScript.StdOut.WriteLine "[Error]: Connecting to the local Administrators group on " & strComputerName & " failed."
strAdminPath2 = "WinNT://" & strUserDomain & "/Domain Admins,group"
Set objAdminGroup2 = GetObject(strAdminPath2)
If objAdminGroup2.PropertyCount > 0 Then
For Each strMem2 In objAdminGroup2.Members
If ( LCase(strMem2.Name) = LCase(strUserName) ) Then
bResult = True
WScript.StdOut.WriteLine "[Error]: Connecting to the Administrators group on Domain " & strUserDomain & " failed."
If (bResult <> True) Then
WScript.StdOut.WriteLine "[Error]: " & WScript.ScriptName & " must be run with administrator privileges!"
Set objNetwork = Nothing
Set objAdminGroup = Nothing
Note: APC does not accept any responsibility for problems that arise after manually updating the script. We strongly recommend making a copy of the install script before editing.