Problem adding attachments in Access 2007

[VoodooFrog]

I am trying to run the following code as a simple test of adding an attachment through access 2007:

    Dim rsJob As DAO.Recordset2
    Dim rsChild As DAO.Recordset2
    Dim field As Field2
 
    Set rsJob = Me.Recordset
    Set rsChild = rsJob.Fields("attachments").Value
    Set field = rsChild.Fields("filedata")
 
      rsJob.Edit
      rsChild.AddNew
        field.LoadFromFile ("c:\temp\1.bmp")
      rsChild.Update
      rsJob.Close
 
    Set fld = Nothing
    Set rsChild = Nothing
    Set rsJob = Nothing

I simply want to add an attachment to the currently open form's record.

When it gets to the line field.LoadFromF ile ("c:\temp\1.bmp ") I get an invalid argument error. Can anyone see what I am doing wrong here?

[MMcCarthy]

What is the data type of the field 'filedata'? Is it an ole object?

Mary

[VoodooFrog]

the "filedata" field is a built in field to manage attachments in Access 2007.

[nico5038]

Did you try:

field.LoadFromF ile "c:\temp\1. bmp"
or
rsChild.Fields( "filedata").Loa dFromFile "c:\temp\1. bmp"

This is the code from the helpfile:

' Instantiate the parent recordset.
Set rsEmployees = db.OpenRecordse t("Employees" )

… Code to move to desired employee

' Activate edit mode.
rsEmployees.Edi t

' Instantiate the child recordset.
Set rsPictures = rsEmployees.Fie lds("Pictures") .Value

' Add a new attachment.
rsPictures.AddN ew
rsPictures.Fiel ds("FileData"). LoadFromFile "EmpPhoto39392. jpg"
rsPictures.Upda te

' Update the parent record
rsEmployees.Upd ate

Nic;o)

[NeoPa]

As Nico says, you need to lose the parentheses () from the procedure call

        field.LoadFromFile "c:\temp\1.bmp"