Convert Access append query to VBA Code

[clarencemo]

Hello all,

I have a append query that works great if I just run the query via Access. I
need to convert that query into VBA code. Here is the SQL View of the query
I'm trying to convert:

INSERT INTO TblInitiator IN 'X:\Archive\Tes tFinal\080107\T S3000v101_be.md b'
SELECT tblAddInitiator .*
FROM tblAddInitiator ;

What the query does is append the table called tblInitiator located in a
network location from values in a table called tblAddInitiator . There is only
one field in each of the tables both called fldInitiator

I tried this VBA statement (all on 1 line)

AppendDB = "INSERT INTO 'TblInitiator' IN [I:\Archive\Test Final\080107\
TS3000v101_be.m db] SELECT 'tblAddInitiato r.*' FROM 'tblAddInitiato r';"

I get the message:
Syntax error in query. Incomplete query clause

What am I missing from the statement? Help!!

Thanks in advance,

Clarence

[FishVal]

Hello all,

I have a append query that works great if I just run the query via Access. I
need to convert that query into VBA code. Here is the SQL View of the query
I'm trying to convert:

INSERT INTO TblInitiator IN 'X:\Archive\Tes tFinal\080107\T S3000v101_be.md b'
SELECT tblAddInitiator .*
FROM tblAddInitiator ;

What the query does is append the table called tblInitiator located in a
network location from values in a table called tblAddInitiator . There is only
one field in each of the tables both called fldInitiator

I tried this VBA statement (all on 1 line)

AppendDB = "INSERT INTO 'TblInitiator' IN [I:\Archive\Test Final\080107\
TS3000v101_be.m db] SELECT 'tblAddInitiato r.*' FROM 'tblAddInitiato r';"

I get the message:
Syntax error in query. Incomplete query clause

What am I missing from the statement? Help!!

Thanks in advance,

Clarence

Hi, Clarence.

Try the following.

Docmd.RunSQL "<SQL statement exactly as it appears in query builder>"
 

[clarencemo]

Does it all have to be on one line??

[clarencemo]

Does it all have to be on one line??

Fish,

I got it to work...thanks for your help today

Clarence