Архив форумов ЦИТФорума

Rosmarin · Гость

Всем привет! У меня есть сайт на ASP, на страницах которого используется вовод информации из БД MSSQL 2000 и БД Access. Страница работала идеально, вся информация выводилась. После того, как я сделала обычное добавление в БД Access, все изменилось. Страница стала грузиться через раз. Первый раз - все грузит, после обновления выдает ошибку:

Provider error '80004005'
Unspecified error
/is/include/common.asp, line 15

Не могу понять, откуда такая проблема появилаь, вроде бы ничего не меняла.
Вот код страницы Global.asa

<script language="VBScript" runat="server">
Sub Session_OnStart
Session("cn")="Provider=SQLOLEDB.1;Persist Security Info=True;Password=XXX;User ID=XXX;Initial Catalog=XXX;Data Source=XXX"
End Sub
</script>

Вот главная страница:
<%Option Explicit%>

<html>
<head>
...
</head>
<body>
...


...
</body>
</html>

common.asp:

<%
Response.Expires=0
Response.AddHeader "Pragma","no-cache"
Response.AddHeader "cache-control", "no-store"
Response.ExpiresAbsolute=now()-1
Response.CharSet="windows-1251"

Dim conn, ConnDBF, rs
Set conn = server.CreateObject ("ADODB.Connection")
Set ConnDBF = server.CreateObject ("ADODB.Connection")
conn.CursorLocation=3
set rs=server.CreateObject ("ADODB.recordset")

conn.Open session("cn")
ConnDBF.Open "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/.../journale.mdb")
%>

newsarticle.asp:
<%
Dim LevelRS
Set RS = Conn.Execute ("SELECT * FROM ...")
%>
... вывод статей из БД SQL...
<%RS.Close%>
<%Set RS = Nothing%>

newsjournal.asp
<%
Dim test, sql_order
set test=server.createObject("adodb.recordset")
sql_order = "SELECT * FROM Subscribe"
test.open sql_order,ConnDBF
%>
... вывод журналов из БД Access ...
<%test.close%>
<%set test = nothing%>

Возможно, у меня неправильно сделано подключение, помогите, плиз Smile

	Список форумов Архив форумов ЦИТФорума -> Базы данных	Часовой пояс: GMT + 3
Страница 1 из 1