Changing default file location when adding attachments

[Aspen77]

I created a form that allows a user to add an attachment. This is working fine however, the user is having to browse through many folders to get to a location where all the files are stored. Where can I change the default file location when adding an attachment?

 

[1DMF]

You don't give any indication of how you are doing this so have assumed you are using filedialog

so try this...

http://stackoverflow.com/questions/12537439/openfiledialog-vba-powerpoint-initial-directory

"In complete darkness we are all the same, it is only our knowledge and wisdom that separates us, don't let your eyes deceive you."

"If a shortcut was meant to be easy, it wouldn't be a shortcut, it would be the way!"
Free Electronic Dance Music

 

[MajP]

I assume the opposite and you are using an attachment control

http://office.microsoft.com/en-us/a...the-records-in-your-database-HA001213852.aspx

AFAIK the answer is no. You could roll your own attachment control through code.

Use a file browser to get the path of the file to add. Then pass that to this code

Public Sub loadAttachFromFile(strPath As String, rsAll As DAO.Recordset, attachmentFieldName As String)
  'An attachment field has a recordset of attachments stored behind the scenes
  Dim rsAtt As DAO.Recordset
  'Add a new record to the tables recordset
  Set rsAtt = rsAll.Fields(attachmentFieldName).Value
  rsAll.Edit
    rsAtt.AddNew
     'This is the confusing part.  The value property of an attachment field returns a recordset of attachments
     'All recordset of attachments has a field named filedata which holds the data.
     'The loadfromfile data loads an attachment from a path
     rsAtt.Fields("FileData").LoadFromFile (strPath)
    rsAtt.Update
  rsAll.Update
End Sub