Modules & VBA :: Creating And Populating Temporary Table From String

I'm trying to create a temp table, which is populated by a string, (taken from a recordset).

My problem is incorporating the String into the SQL statment, and making it work,

What I'm trying to do is to create a temp table, and populate it with the first record of the recordset, (which is an e-mail address).

(The recordset and the strings work fine). It's the SQL statement which doesn't work.

Here's the code I have :

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~~~~~~~~~~~
Set DBS = CurrentDb
Set RST = DBS.OpenRecordset("SELECT Contact FROM Contacts_to_be_Mailed")
Dim My_Count As Long
Dim ContactString As String

RST.MoveFirst
ContactString = RST(0)

Dim strTable As String
strTable = "TempContact"
DoCmd.RunSQL "INSERT * INTO " & strTable & " FROM ContactString "