message box

[diepblauw]

I wrote a procedure to copy records from table A to table B. I run this procedure in Access 97. When one row is inserted into table B, a message box is always showed to ask me if I want to save the change. There are thousands of records. It is terrible if I have to click Yes each time. How to remove this message box and let access save the new records automatically?

 

[CajunCenturion]

Have you tried setting ShowWarnings to False?

Good Luck
--------------
As a circle of light increases so does the circumference of darkness around it. - Albert Einstein

 

[diepblauw]

No. How can I set ShowWarning to False? I tried to search such an option in Access Menu: Tools -> Options...
But I got nothing. Isn't it there?

 

[Bullsandbears123]

I am not sure how you are coping records, but I doubt your using an insert SQL command try this
If both tables are the same structure then this will work otherwise try making a query to adust them to the same

Set db = CurrentDb()
dim sql

SQL=Insert into TableB([field1],[field2],etc) from TableA
db.Execute sql

 

[CajunCenturion]

DoCmd.SetWarnings False
DoCmd.SetWarnings True

Good Luck
--------------
As a circle of light increases so does the circumference of darkness around it. - Albert Einstein