devilsphere
New member
- Local time
- Today, 18:08
- Joined
- Oct 23, 2008
- Messages
- 4
I have an Access 2003 database and I would to automate it to copy a file that was dragged into an OLEBound frame to a specific folder. I already have it creating a folder based upon the name input into another field. My code is below:
Private Sub Command33_Click()
Dim X As String
X = JobNumber
If Len(Dir("\\192.168.1.50\share\Jobs\" + X, vbDirectory)) = 0 Then MkDir ("\\192.168.1.50\share\Jobs\" + X)
On Error GoTo Err_Command33_Click
DoCmd.GoToRecord , , acNext
Exit_Command33_Click:
Exit Sub
Err_Command33_Click:
MsgBox Err.Description
Resume Exit_Command33_Click
End Sub
The name of the OLEBound frame is OLEBound27
I've looked around and I am having difficulty figuring this out.
Thanks in advance for any help.