Verdiğim şekilde kendi yapınıza uygun hale getirerek deneyebilir misiniz?

Set cnn = Server.CreateObject("ADODB.Connection")
cnn.open "PROVIDER=SQLOLEDB;DATA SOURCE=sqlservername;UID=username;PWD=password;DAT ABASE=mydatabase "

Emre Aydın