Where To Write The Connection String

[chandru8]

Hi everybody

Can anyone suggest me where to write the connection string
because am writing the connection string in each form load closing it in form_unload

the problem is when i want to change the path mean i need to change the in change

is there any alternative

thanks in advance

[debasisdas]

write that in a module or can use the load event of MDI form for the purpose.

[chandru8]

I Have Written The Connection Open In The Module
For Executing The Query I Used Set Module1.rs = Connection.execute(string )

Is It Correct

NOW I TRIED WRITTING INT THE MDI FORM
BUT THE QUERY WHICH I WROTE IN THE FORM IS NOT WORKING
------------------------MDI FORM
DIM objCon As New ADODB.Connection
DIM rs As New ADODB.Recordset
DIM strSql As String

Private Sub MDIForm_Load()
objCon.ConnectionString = "Provider = Microsoft.jet.oledb.4.0;Data source = C:\Crd.mdb"
objCon.Open
End Sub

Private Sub MDIForm_Unload(Cancel As Integer)
objCon.Close
Set objCon = Nothing
End Sub
------------------------FORM
strSql = "SELECT * FROM Login INNER JOIN MappingStatus ON Login.UserName = MappingStatus.Username WHERE (((Login.UserName)='" & txtUserName.Text & "'));"
Set rs = objCon.Execute(strSql)

[debasisdas]

declare the connection in module.

open /close in form.

remove the semicolon from SQL statement.