мы можем объявить публичную переменную в asp, используя vb

Question

У меня установлено соединение с моей базой данных, используя

adoCon.Open "Driver = {SQL Server}; Сервер =" & host_name & "; База данных =" & db_name & "; Uid =" & user_name & "; Pwd =" & пароль

Теперь я хочу использовать это соединение на всех страницах моего сайта. Как это сделать? Есть ли в любом случае сделать переменную adoCon общедоступной, чтобы она была доступна со всех страниц.

Спасибо

Answer 1

Это классический ASP, о котором вы говорите?

Используйте файл global.asa для создания объекта приложения, например:

Sub Application_OnStart
Application("some name") = "Your connection string"
End Sub

Затем вы можете использовать его во всехваши страницы, такие как:

Dim rsObj,cnObj, sSQL

Set cnObj = Server.CreateObject ("ADODB.Connection")
cnObj.Open Application("some name")
Set rsObj=Server.CreateObject("adodb.recordset")
sSQL="your sql string"
With rsObj
.Open sSQL, cnObj
If Not( .BOF or.EOF ) Then
[do some stuff]                         
End If
.Close
End With