Короче помогите....
При выполнении выдаёт ошибку что нет такого DSN и не определён драйвер по умолчанию....
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
SUB Session_OnStart
Session("DBConnectionString")="DATABASE=имя_базы;UID=пользователь;PWD=пароль;DSN=имя_дсн;APP=ASP Script"
END SUB
</SCRIPT>
<%@ Language=VBScript %>
<HTML>
<HEAD>
</HEAD>
<BODY>
<%
' Создаём подключение
Set Conn = Server.CreateObject("ADODB.Connection")
'Строка подключения использует наши данные введённые в global.asp
Conn.Open Session("DBConnectionString")
'Подключились теперь можно выполнить маленький запрос
Set RS = Conn.Execute("select * from org")
%>
<%' Начинаем вывод результата
Do While Not RS.EOF
%>
<%=RS("c_name") %>
<% 'тут как я заметил можно делать выборку как "select что-то"
</br>
<%
' Следующий сказал заведующий :)
RS.MoveNext
'Конец цыкла
Loop
' Обратного пути нет - все мосты сожжены
RS.Close
Conn.Close
%>
</BODY>
</HTML>
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2