Search results

If temp.State = adStateOpen Then temp.Close//here I get the error temp.Open "select * from Loanledger where staffno=" & dm.Fields("staffno") & " order by transdate desc", db, adOpenKeyset, adLockOptimistic, adCmdText If temp.RecordCount >= 1 Then ledger.AddNew ..... ledger.update I get the...

Hi all, Please let me know what is wrong in the above code. During dubug temp.close button is getting highlighted

Hi Pbaldy, I did the same as u said and in this way temp.close got highlighted(written bold in code) in below part of the code. Please let me know what is wrong with that?Thanks! Public Function Loansupdate() Dim i As Integer For i = 2 To fgrid.rows - 1 If temp.State = adStateOpen Then...

Hi bob, Error window does not disply any debug button. Only OK button is coming with error message.

My code...I am just pasting part of the code as it is too long Private Sub Listupdatebutton_Click() If fgrid.rows >= 4 Then If MsgBox("Are you sure...You want to Update '" & Format(Combo1.Text, "MMMM, YYYY") & "'" & " Data", vbCritical + vbYesNo + vbDefaultButton2, "User Message") = vbYes Then...

Hi All, I am new to VB programming. I am getting error while updating recodset. Database being used in the software is MS-Access. The complete error is "run-time error 3219. Operation not allowed in thos context". When we click on the OK button on error window then software will close...