I coded the following statement into my vb6 program using DAO. I do not get any error message syntax wise; however, the table value is not being updated for recurringJournalID. But as you can see in the example below, the statement yield a value of the recordId=9 which is correct.
Code:db.Execute "UPDATE glSysVar SET dosGLupd=" & chkUpdateDOS.Value & _ ",glPath1='" & txtPath & "',retainedEarningsAcct=" & _ Val(chkAcct.Tag) & ",recurringJournalID=" & Val(chkRecurringJournal.Tag) & " WHERE coNum=" & comp, dbFailOnError
When I view the Immediate Window, here is what I see:
Code:UPDATE glSysVar SET dosGLupd=0,glPath1='',retainedEarningsAcct=76,recurringJournalID=9 WHERE coNum=1 128
Perhaps the "128" is an error. Can someone help? Thanks.


Reply With Quote