I'm sitting here waiting for the usual horrible Dublin traffic grid-lock to
recede enough so that I can go home, so what the heck, I'll test it ...
Public Sub AddRecords()
Dim lngLoop As Long
For lngLoop = 1 To 1920
CurrentDb.Execute "INSERT INTO tblTest1(TestLong) VALUES(" & lngLoop
& ")", dbFailOnError
Debug.Print lngLoop
Next lngLoop
End Sub
Then I copy the table and paste it 7 times, then write the query ...
SELECT
FROM tblTest1, tblTest2, tblTest3, tblTest4, tblTest5, tblTest6, tblTest7,
tblTest8;
Right, here goes, if I'm never heard from again, you'll know that the PC
blew up when I ran this, OK ...
--
Brendan Reynolds (MVP)
http://brenreyn.blogspot.com
The spammers and script-kiddies have succeeded in making it impossible for
me to use a real e-mail address in public newsgroups. E-mail replies to
this post will be deleted without being read. Any e-mail claiming to be
from brenreyn at indigo dot ie that is not digitally signed by me with a
GlobalSign digital certificate is a forgery and should be deleted without
being read. Follow-up questions should in general be posted to the
newsgroup, but if you have a good reason to send me e-mail, you'll find
a useable e-mail address at the URL above.