Recent content by tachyon1

I've been trying to this subroutine to work... with no avail. Public Sub TransferAttachments() Dim DB As Database Dim rstSource As DAO.Recordset2 Dim rstDestination As DAO.Recordset2 Const ChunkSize = 32768 Dim Offset As Long Dim TotalSize As Long Dim Chunk As Variant Dim Parameter As Variant...

Thanks. absolutely brilliant. the code was saving the files in the correct directories but putting them on the desktop rather than in the directory "New folder". just added the directory on the end of the SpecialFolderPath function and it works fantastically. because the directory "New folder"...

Thanks arnelgp. Used a public subroutine to call the "AttachmentToDisk" sub however the following error message appears: "Run-time error '-2147024893 (800700003) <Unknown Error-message>HRESULT: &H80070003" the error is indicating a problem with the "fld.SaveToFile strFileName" line. the...

I currently have a table ("Transfer Table") with records containing a numeric primary key and an attachments field. There are multiple files in the attachment field stored. i've been having difficulty trying to adapt microsoft's VBA code example and other people's coding to do the following...