Привет :)
Явно кода не е твой и няма смисъл да навлизаме в големи технически подробности...
Потърси си примери из Нета :)
Аз лично ти препоръчвам DNS-less conn, по-бърза и по-удобна за управление е; още повече че вече ще ползваш и remote db.

Conn stringa ще ти изглежда така:

Provider=SQLOLEDB; Data Source=server_name_or_address\instance_name; Initial Catalog=database_name; User ID=username; Password=password;
Инициирането на връзката предполагам ти е по-ясно. Създаваш си ADODB.Connection и си го отваряш с Open.

А за да не се чудиш какво е нередното при теб в момента, така като гледам проблема се дължи на това, че след като сменяш DB, не променяш DSN-a си и, естествено, връзката не може да се осъществи :)

И между другото, ако наистина ползваш за парола "12345" смени я ;))