Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Westi on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Append Query clips Memo Field 2

Status
Not open for further replies.

perrymans

IS-IT--Management
Nov 27, 2001
1,340
US
The source is a Memo field, the destination is a Memo field, but the Append query truncates the field information.

How do I get around this?

Thanks. Sean.
 
How are ya perrymans . . .

Here's the basic idea:
Code:
[blue]   Dim db As DAO.Database, rst As DAO.Recordset
   
   Set db = CurrentDb
   Set rst = db.OpenRecordset("[purple][B][I]TableName[/I][/B][/purple]", dbOpenDynaset)
   
   With rst
      .AddNew
      ![purple][B][I]MemoFieldName[/I][/B][/purple] = Me![purple][B][I]MemoFieldName[/I][/B][/purple]
      .Update
   End With
      
   Set rst = Nothing
   Set db = Nothing[/blue]
[blue]Your Thoughts? . . .[/blue]

See Ya! . . . . . .

Be sure to see thread181-473997 [blue]Worthy Reading![/blue] [thumbsup2]
Also faq181-2886 [blue]Worthy Reading![/blue] [thumbsup2]
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top