Data Source name too long
I have used connection string as below in my VB macro. ConnectionString="Data Source=(DESCRIPTION = (ADDRESS=(PROTOCOL=TCP)(HOST=servername)(PORT=portno))(CONNECTDATA=(SERVICENAME=servicename))));uid=username;pwd=password;"