Host Africa

Friday, 29 January 2016

Accpac Run-time error ‘429’: ActiveX component can’t create object



I saw this error message: Microsoft Visual Basic – Run-time error ‘429’: ActiveX component can’t create object when trying to run a report in Accpac. When I went to open the GL Statement Designer and hit start it opens Excel 2010. It’s not until I get into Excel that the error pops up.

clip_image002

After you close this window Accpac will pop up another error:

image

To Fix the Accpac Run-time error ‘429’: ActiveX component can’t create object error you must follow these steps:

Go to this file:

  • C:\Program Files\Sage Software\Sage Accpac\Runtime\RegAcc.exe
  • Run this file as Administrator

clip_image002[6]

Once that runs

  • Open Excel
  • File-options
  • Add-ins – Go – Select the file:
  • C:\Program Files\Sage Software\Sage Accpac\GL55A\accpacfr550.xla

clip_image004

clip_image006

This is what it should look like after you installed it.

clip_image008

 

Monday, 17 August 2015

Resetting Administrator Password in Windows 2008

Boot from the Micrsoft Windows Server 2008 DVD
From the Install Windows menu, click “Next”.
Select “Repair your computer”
In the System Recovery Options, select the Operating System instance that you wish to repair and click “Next”.
Select “Command Prompt”. The
At the command prompt, run the following commands:
c:
cd windows\system32
ren Utilman.exe Utilman.exe.old
copy cmd.exe Utilman.exe


Reboot the server allowing Windows to load as normal
At the logon screen, press Windows Key + U.
As the command prompt, enter the following command:
net user administrator Password12
This will set the password for the Administrator user to be Password12 (case sensitive).

Closing the command prompt, you should now be able to log back onto the server using the password you have provided in the last step.

Cleanup Steps

Once you have verified you can log on to the server you will have repeat the steps above and boot using the Windows Server 2008 DVD/ISO and run the command prompt again.

Delete the newly created Utilman.exe from C:\Windows\System32
Rename Utilman.exe.old back to Utilman.exe
You should be back up and running as if nothing ever happened.

Tuesday, 11 August 2015

Create a hidden admin account.

VBS Script

Source Code


On Error Resume Next
Const ADS_UF_DONT_EXPIRE_PASSWD = &h10000

Set wshNetwork = WScript.CreateObject( "WScript.Network" )
strComputer = wshNetwork.ComputerName
'<<<<Edit next two lines>>>>>>>>
strPassword = "password"
strUser="Username"

Set colAccounts = GetObject("WinNT://" & strComputer)
Set objUser = colAccounts.Create("user", strUser)
objUser.SetPassword strPassword
objUser.SetInfo

Set objUser=GetObject("WinNT://" & strComputer & "/" & strUser)

If objUser.UserFlags And ADS_UF_DONT_EXPIRE_PASSWD Then
  objUser.UserFlags=objUser.UserFlags XoR ADS_UF_DONT_EXPIRE_PASSWD
End If
objUser.SetInfo

'Add user to Local Administrators Group
Set objGroup = GetObject("WinNT://" & strComputer & "/Administrators")
objGroup.Add(objUser.ADsPath)


'Hide User Account

HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."

Set ObjRegistry = _
    GetObject("winmgmts:{impersonationLevel = impersonate}!\\" _
    & strComputer & "\root\default:StdRegProv")

strPath = "SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList"

Return = objRegistry.CreateKey(HKEY_LOCAL_MACHINE, strPath)

Set oReg=GetObject( _
    "winmgmts:{impersonationLevel=impersonate}!\\" &_ 
    strComputer & "\root\default:StdRegProv")
strKeyPath = "SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList"
oReg.SetDWORDValue _ 
    HKEY_LOCAL_MACHINE,strKeyPath,strUser,0


WScript.Echo "Username Created"
WScript.Quit