How to Link Oracle database in MS Access Programmatically

Question

We had an application written in MS Access and has using Oracle database as back-end. Tables are linked manually using the ODBC link. Everytime we run the MS Access form it will always prompt for ODBC connection window that asks for username and password.
Is there any way to programmatically (code) do it so as it wont prompt anymore for ODBC username and password?
Thanks.

Answer 1

'You will probebly need to change some things but this is a good start
Dim db As DATABASE
Dim rs As Recordset
Dim retval As Variant
Dim DSNName As String, DSNUser As String, DSNPassword As String
retval = SysCmd(1, "Connection Oracle...", 16)
DSNName = "" 'fill those 3 next lines
DSNUser = ""
DSNPassword = ""
On Error GoTo Event_Err
retval = SysCmd(2, 4)
DoCmd.TransferDatabase acLink, "ODBC", "ODBC;DSN=" & DSNName & ";UID=" & DSNUser & ";PWD=" & DSNPassword & ";DBQ=edr1;DBA=W;APA=T;FEN=T;QTO=T;FRC=10;FDL=10;LOB=T;RST=T;FRL=F;MTS=T;CSR=F;PFC=10;TLO=0;;TABLE=CRJDACTDATA.TBL_EXPORT", acTable, "CRJDACTDATA.TBL_EXPORT", "Test1", False
DoCmd.DeleteObject acTable, "Test1"
retval = SysCmd(2, 16)
retval = SysCmd(3)
Event_Exit:
Exit Function
Event_Err:
MsgCritical "Vous ne pouvez accéder au suivi du dossier d'action que si DDA est installé sur cet ordinateur."