Вот пример кода для подключения к MS SQL без использования ODBC:
ConnectionString="Provider=SQLOLEDB.1; Network
Library=dbmssocn;Password=<здесь должен быть ваш пароль>;User ID=<здесь
должен быть ваш логин>;Initial Catalog=<здесь должно быть название вашей
базы данных>;Data Source=<здесь должен быть адрес вашего сервера MS SQL>;"
Set rsADO=Server.CreateObject("ADODB.Recordset")
sql2="SELECT DISTINCT TOP 5 filename,name,category_id,(select top 1
parent_id from category where girl.category_id=category.girl_id) AS parent,
(select top 1 parent_id from category where id in (select top 1 parent_id
from category where girl.category_id=category.girl_id)) as city from girl
WHERE girl.active=1 ORDER BY girl.category_id DESC"
rsADO.Open sql2, ConnectionString
do while not rsADO.EOF
Response.Write rsADO("filename")
loop
set rsADO=Nothing
| 
