Prompt User For Table Name

[vivek.vbansal]

Hi I am Using Microsoft Access 2003. I have a problem getting the name
of the Table. I want to prompt the user for the name of the table so
that i could run a append query. the syntax of the query is like as
following:
Insert into (Column_Names) Select (Column_Names) From
"Get_Table_Name_From_User". Could anyone please help me with this
query.

ThankYou

 

[Allen Browne]

Execute the action query statement in VBA code.
You can then include the table in the query string.

This kind of thing:
Dim strSql As String
Dim strTable As String

strTable = Trim$(InputBox("Table name?"))
If strTable <> vbNullString Then
strSql = "INSERT INTO ...
dbEngine(0)(0).Execute strSql, dbFailOnError
End If

 

[Punjabi!!!!!!!]

Execute the action query statement in VBA code.
You can then include the table in the query string.

This kind of thing:
Dim strSql As String
Dim strTable As String

strTable = Trim$(InputBox("Table name?"))
If strTable <> vbNullString Then
strSql = "INSERT INTO ...
dbEngine(0)(0).Execute strSql, dbFailOnError
End If

Thank You Very Much For Your Help Allen. It Worked.