Const i Global.asa

[Kalinka]

Hejsan! kan man deklarera konstanter i global.asa?

[Martin Persson]

Jag ska koppla min global.asa till ytterligare en databas (en helt annan sak.

 

Jag ska ha sökvägen

<SCRIPT LANGUAGE=VBScript RUNAT=Server>

Sub Session_OnStart

Session("dbasepath") = "driver={Microsoft Access Driver(*.mdb)};dbq=c:\inetpub\data\forum.mdb"

End Sub

</SCRIPT>

<SCRIPT LANGUAGE=VBScript RUNAT=Server>

Sub Session_OnEnd

End Sub

</SCRIPT>

<SCRIPT LANGUAGE=VBScript RUNAT=Server>

Sub Application_OnStart

End Sub

</SCRIPT>

<SCRIPT LANGUAGE=VBScript RUNAT=Server>

Sub Application_OnEnd

End Sub

</SCRIPT>

 

samt den gamla som ser ut så här:

 

<SCRIPT LANGUAGE=VBScript RUNAT=Server>

Sub Session_OnStart

 

Set Connection = Server.CreateObject("ADODB.Connection")

Connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=d:\clients\costodia\scripts\news.mdb"

SQLStmt = "SELECT Namn, Url FROM links"

Set RS = Connection.Execute(SQLStmt)

Session("MyArray") = RS.GetRows()

RS.Close

Connection.Close

 

 

End Sub

</SCRIPT>

 

<SCRIPT LANGUAGE=VBScript RUNAT=Server>

Sub Session_OnEnd

End Sub

</SCRIPT>

 

<SCRIPT LANGUAGE=VBScript RUNAT=Server>

Sub Application_OnStart

Application("NewsDatabasePath")= "driver={Microsoft Access Driver (*.mdb)};dbq=d:\clients\costodia\scripts\news.mdb"

End Sub

</SCRIPT>

 

 

 

<SCRIPT LANGUAGE=VBScript RUNAT=Server>

Sub Application_OnEnd

End Sub

</SCRIPT>

 

ska jag bara lägga de ovan på verann eller kan någon visa?

 

Tack på förhand,

Martin Persson

 

 

[Magnus Gladh]

<SCRIPT LANGUAGE=VBScript RUNAT=Server>

Sub Session_OnStart

Set Connection = Server.CreateObject("ADODB.Connection")

Connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=d:\clients\costodia\scripts\news.mdb"

SQLStmt = "SELECT Namn, Url FROM links"

Set RS = Connection.Execute(SQLStmt)

Session("MyArray") = RS.GetRows()

RS.Close

Connection.Close

Set Connection = nothing

End Sub

 

Sub Application_OnStart

Application("NewsDatabasePath")= "driver={Microsoft Access Driver (*.mdb)};dbq=d:\clients\costodia\scripts\news.mdb"

Application("dbasepath") = "driver={Microsoft Access Driver(*.mdb)};dbq=c:\inetpub\data\forum.mdb"

End Sub

</SCRIPT>

 

Så skulle du kunna göra... fast jag tycker inte du skall lägga dina sökägar i sessionsvariabler utan istället lägga de i en textfil som en konstant och sedan inkludera den textfilen på alla sidor som behöver en databaskoppling...

 

Samt att du inte skall lägga stora arrayer i ett sessions objekt, vet inte riktigt vad du skall ha den till, och hur stor den är, men tänk på att varje personen som kommer in på sidan kommer att ta upp så mycket minne som arrayn är stor, om det kommer in massor med folk så blir det en del minne...

 

- Magnus

[inlägget ändrat 2000-08-07 11:34:21 av magnus gladh]