I've never had to set CurrentDB
It's always referenced for me in Access 95/97. So I would rewrite your snippet as simply:
Dim TempRS As Recordset
Set TempRS = CurrentDB.OpenRecordset("Table1")
If that helps. Doesn't fix Help, but hope it helps.
---------------------------------
A stupid despot may constrain his slaves with iron chains; but a true politician binds them even more strongly by the chain of their own ideas;...despair and time eat away the bonds of iron and steel, but they are powerless against the habitual union of ideas, they can only tighten it still more; and on the soft fibres of the brain is founded the unshakable base of the soundest of Empires."
Jacques Servan, 1767