Also, I am using AP_VendorElectronicPayment_bus.

Set oScript = CreateObject("Providex.Script")
oScript.Init("\\server\Sage 100 Advanced ERP\MAS90\Home")
Set oSS = oScript.NewObject("SY_Session")

retVal = oSS.nlogon()
retVal = oSS.nSetCompany(MAS_SCR_CMP)
retVal = oSS.nSetDate("A/P", MAS_SCR_DTE)
retVal = oSS.nSetModule("A/P")
TaskID = 0

TaskID = oSS.nLookupTask("AP_VendorElectronicPayment_ui")

oSS.nSetProgram(TaskID)

Set epay = oScript.NewObject("AP_VendorElectronicPayment_bus", oSS) 'It fails on this line.

Thanks for your input, Kent. ACH is turned on. I have been doing this manually in the company. I am using my account, which has rights to everything. This is a vbscript that is attached to a button. I am wondering how I even get the last error message, because the script throws an exception and doesn't allow you to continue. I am getting the same error in a test C# script, so I will do a try catch and see if I can get the last error out of oSS on the catch.

EDIT: I just caught the oSS last error message.  It is saying that I am not authorized to use this program.  I can do it with the same user account in MAS UI.  I am very confused!