KB122250 - ACC2: How to Trap SQL ODBC Login Cancel Error

MORE INFORMATION

The following sample function demonstrates how to trap the error described in the "Summary" section above. To use this function, first create it in a module, and then type "?TryLogin()" (without quotation marks) in the Immediate window.

NOTE: In the following sample code, an underscore (_) at the end of a line is used as a line-continuation character. Remove the underscore from the end of the line when re-creating this code in Access Basic.

   '*********************
   ' Declarations section
   '*********************
   Option Explicit

   '***************************
   ' Sample function TryLogin()
   '***************************
   Function TryLogin ()
      On Error GoTo LoginError
      DoCmd TransferDatabase A_ATTACH, "<SQL Database>", "ODBC;", _
       a_table, "dbo.authors", "dbo_authors"
      MsgBox "Successful Attachment!"
   Exit Function

   LoginError:
      If Err = 3059 Then
         MsgBox "You canceled the login."
      Else
         MsgBox Error$
      End If
      Exit Function
   End Function

ACC2: How to Trap SQL ODBC Login Cancel Error

SUMMARY

MORE INFORMATION

REFERENCES