IN THE SPOTLIGHT: MDE to MDB Conversion Service
(also supports: ACCDE to ACCDB, ADE to ADP, etc)
IN THE SPOTLIGHT: vbWatchdog
VBA error handling just got easier...
" vbWatchdog is off the chart. It solves a long standing problem of how to consolidate error handling into one global location and avoid repetitious code within applications. "
- Joe Anderson,
Microsoft Access MVP
Meet Shady, the vbWatchdog mascot watching over your VBA code →
(courtesy of Crystal Long, Microsoft Access MVP)
IN THE SPOTLIGHT: vbMAPI
An Outlook / MAPI code library for VBA, .NET and C# projects
Get emails out to your customers reliably, and without hassle, every single time.
Use vbMAPI alongside Microsoft Outlook to add professional emailing capabilities to your projects.
In the Declarations section of a module, incude (all on one line):
Declare Function abFileCopy Lib "MSAU200.DLL" Alias "#4" (ByVal strSource As String, ByVal strTarget As String) As Long
And then the procedure:
Sub MyFileCopy (strSource As String, strTarget As String) 'strSource is the source file name. strTarget is the target file name. 'A disk and path may be included, but you cannot omit the name of the file. Dim lngResult As Long, strMsg As String lngResult = abFileCopy(strSource, strTarget) Select Case lngResult Case 0 strMsg = "File copied" Case -101 strMsg = strSource & " not available" Case -102 strMsg = "Cannot open the destination. Did you specify the full name? Does a read-only file with that name exist?" Case -103 strMsg = "Error reading " & strSource Case -104 strMsg = "Error writing " & strTarget Case -105 strMsg = "Insufficient memory" Case -106 strMsg = "Invalid file name" Case Else strMsg = "An unknown error occured" End Select MsgBox strMsg End Sub
Have your say - comment on this article.
What did you think of 'Copying a file in Access v2'?
No comments yet.
Why not be the first to comment on this article?!
Have your say...