Dim sqlConnect As String
Dim sqlConnection As ADODB.Connection

	sqlConnect = "Provider = SQLOLEDB.1;Data Source=[%1%];Initial Catalog=[%2%];User ID=[%3%];Password=[%4%];"
	'%1% = the name of the requested SQL server instance
	'%2% = the name of the requested database
	'%3% = a valid username who has access to the requested database
	'%4% = relevenat password of valid user
	
    Set sqlConnection = New ADODB.Connection
    sqlConnection.ConnectionString = sqlConnect
    sqlConnection.Open