Application certificate invalid error from quickbooks with VBA

See more:

MS-Access

VBA

Quickbooks

We are running QuickBooks Enterprise 7 (I know it is old and not supported). I have MS Access applications that are using the SDK (via VBA) to send transactions to QB. Nothing to my knowledge has changed, but all of a sudden we are getting an error that the certificate for the application is invalid. We never had certificates before. It also did not pop up the window that lets me say I want it to run regardless of the certificate.

Anyone have any ideas what causes this? I have tried deleteing the application from QB and created a new one just to see what would happen but it still gives me the error.

My code looks like this:

QB = CreateObject("QBFC7.QBSessionManager")    
strDatabase = DLookup("Default_Company", "Configuration_table")
'get the qb file information
QB.OpenConnection "", "Upload Payroll"
QB.BeginSession strDatabase, omMultiUser
dblCredit = 0
Set JournalAddSet = QB.CreateMsgSetRequest("US", 5, 0)

really need help with this! Our company is dead in the water until I can get this going!

What I have tried:

I have tried uninstalling and reinstalling Quickbooks on both a client and the server, but that hasn't helped. I also tried removing the old applications in the Quickbooks list but I get the error when it goes to add it again.