Практическая функция ASP для подключения к базе данных

Осторожные разработчики иногда думают, что когда мы включаем код типа

<!-- #include file="conn.asp" -->

, на самом деле, когда вы не выполняете никакого чтения или запись Во время операций с базой данных соединение с базой данных все еще открыто и по-прежнему потребляет ресурсы сервера.

Итак, есть ли способ сделать соединение с базой данных открытым только тогда, когда базу данных необходимо прочитать, и не будет никаких действий, когда она не читается? Эта идея представлена ​​ниже, чтобы вдохновить других.

Идея состоит в том, чтобы инкапсулировать код подключения к базе данных в функцию и вызывать эту функцию, когда необходимо чтение.

Ниже приведен код подключения SQL:

Функция Open_conn().
дим Конн,Стрконн
set Conn=server.createobject("adodb.connection")
Strconn = "Поставщик = Sqloledb; Идентификатор пользователя = учетная запись для входа в базу данных; Пароль = пароль для входа в базу данных; Начальный каталог = имя базы данных; Источник данных = (локальный);"
Conn.open Strconn
установите Open_conn=Conn
Если Ошибка Тогда
Ошиб.Очистить
Conn.close:set Conn=ничего
Ответ.Напишите «Извините, ошибка подключения к базе данных».
Ответ.Конец
Конец, если

функции завершения

:
Измените исходный

rs.open sql, conn

на

rs.open sql, Open_conn().

Ниже приведен код подключения ACCESS:

Функция Open_conn().
дим Дбпат, Коннектикут
Dbpath=server.MapPath("путь к базе данных")
set Conn=server.createObject("ADODB.connection")
Conn.open "data source="&dbpath&";provider=microsoft.Jet.OLEDB.4.0;"
установите Open_conn=Conn
Если Ошибка Тогда
Ошиб.Очистить
Conn.close:set Conn=ничего
Ответ.Напишите «Извините, ошибка подключения к базе данных».
Ответ.Конец
Конец, если

функции завершения

:
заменить оригинал
rs.open sql, conn

изменен на
rs.open sql, Open_conn()

, кстати, предоставляет старый код, который может совместно использовать базу данных ACCESS между сайтами на одном сервере. Возможно, некоторые друзья смогут его использовать:

иногда у нас много доменных имен второго уровня, и они могут нам понадобиться. Чтобы разрешить этим доменным именам второго уровня вызывать определенную базу данных ACCESS. Если вы не хотите использовать базу данных SQL, для подключения к базе данных можно использовать следующие методы. (Особое примечание: если ваш сервер имеет разрешения безопасности FSO, вам необходимо настроить этот каталог базы данных, чтобы разрешить пользователям IIS каждой станции, к которой вам нужно позвонить, иметь доступ и вносить изменения.)

Следующий физический путь к базе данных аналогичен E: КаталогКаталогимя базы данных

dim Conn, Strconn
Set Conn = Server.CreateObject("ADODB.Connection")
Strconn="Поставщик = Microsoft.Jet.OLEDB.4.0; "
Strconn=Strconn & «Источник данных=физический путь к базе данных»
Conn.Open Strconn
Если Ошибка Тогда
Ошиб.Очистить
Conn.close:set Conn=ничего
Ответ.Напишите «Извините, ошибка подключения к базе данных».
Ответ.Конец
Конец, если