SQL Server:
SELECT name FROM sysobjects WHERE type='U'
Access:
SELECT MSysObjects.Name FROM MSysObjects WHERE ((MSysObjects.Flags=0) AND (MSysObjects.Type=1))
Mehr dazu:
http://www.aspheute.com/artikel/20010511.htm
http://www.xtremevbtalk.com/showthread.php?s=&threadid=18084