I put the code when I load the form, is that ok?

Private Sub Form_Load()
Dim adoConn As New ADODB.Connection
Dim adoRS As New ADODB.Recordset

strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
strConn = strConn & "E:\EasyHID\Xk1 v2\USBProject\VisualBASIC\Modified code\NR2003.mdb"
adoConn.ConnectionString = strConn
adoConn.Open
End Sub

Or should I make another subroutine for this?

Robert