Sorry, For my late i was studing in the university
This is my save code guys
-----------------------------------------------------
If MsgBoxEx2.Result = mbYes Then
Adodc1.Recordset.Update
Adodc1.Refresh
ARButton10.Enabled = False
ARButton7.Enabled = False
ARButton9.Enabled = True
ARButton5.Enabled = True
ARButton8.Enabled = True
c(2).Caption = Adodc1.Recordset.RecordCount
MsgBoxEx3.Show
Call Command3_Click
End If
------------------------------------------------