How to run a parameterized action (append) query with MEMO parameter via VBA? 1

[sudakov]

Hello,
I have a table with a MEMO field.
I want to add records into the table by executing a parameterized action (append) query via VBA.
Does anybody know how to run a parameterized action (append) query with MEMO parameter via VBA?

Thank you.
sudakov.

 

[dhookom]

I would just build an SQL statement and execute it in VBA. Is there a reason why you need to use a query? What is the SQL view of the query?

Duane
Hook'D on Access
MS Access MVP

 

[sudakov]

Hi Duane,
Thank you.
Your recommendation works!

The reason for using a query is that I can re-use the code every time I need to execute an action query that has a Memo parameter.

The following is the SQL view of the query:

PARAMETERS [prmMem] LongText;
INSERT INTO tblLog ( Message )
SELECT [prmMem] AS Expr1;

Sudakov.

 

[dhookom]

I'm not sure if Access supports an append query without using a FROM clause.

I would use something like:

Dim strSQL as String
strSQL = "INSERT INTO tblLog( Message) " & _
  "Values( """ & Me.txtMyLogMessage & """ )"
Currentdb.Execute strSQL, dbFailOnError

Duane
Hook'D on Access
MS Access MVP

 

[sudakov]

Hi Duane,
Thank you.
It works!

Sudakov.