K
KBDB
Hi,
I'm trying to add a record to my table that has an attachment field.
I can't figure out where do go from here or even if what I have is correct.
Here is my code:
Private Sub SaveTheRecordClick()
Dim dbs As Database
Dim rst As DAO.Recordset
Dim rstComplex As DAO.Recordset2
Set rst = dbs.OpenRecordset("Current Issues", dbOpenDynaset)
Set rstComplex = Me.Recordset!Attach1.Value
With rst
On Error GoTo Errorhandle2
If rst.EOF Then
If rst.Updatable = True Then
rst.AddNew
rst!Title = Me.Title
rst!Attach1 = ????????????
Can anyone point me in the right direction?
Any help would be great!
Thanks,
Kathleen
I'm trying to add a record to my table that has an attachment field.
I can't figure out where do go from here or even if what I have is correct.
Here is my code:
Private Sub SaveTheRecordClick()
Dim dbs As Database
Dim rst As DAO.Recordset
Dim rstComplex As DAO.Recordset2
Set rst = dbs.OpenRecordset("Current Issues", dbOpenDynaset)
Set rstComplex = Me.Recordset!Attach1.Value
With rst
On Error GoTo Errorhandle2
If rst.EOF Then
If rst.Updatable = True Then
rst.AddNew
rst!Title = Me.Title
rst!Attach1 = ????????????
Can anyone point me in the right direction?
Any help would be great!
Thanks,
Kathleen