ssi i global.asa

ehm.
användningsbart till?

------------------
-------------------
Andreas Lännerberg
Jag hör till dom som betalar mina räkningar med glädje, men dom vill hellre ha betalt i pengar.

Testa vet ja... ;)

användningsbart till?

Om det fungerar så kan inkludera kod, vad annars?... :)

------------------
Vide rox = new Vide();
rox.learn("C#");
webeye.nu

men jag menar..
global.asa e väl inte en sån fil man sitter å ändrar i sådär jättemycket annars? känns bara som en prestandaförlust..

------------------
-------------------
Andreas Lännerberg
Jag hör till dom som betalar mina räkningar med glädje, men dom vill hellre ha betalt i pengar.

Det borde man inte kunna göra, eftersom all kod i global.asa måste ligga mellan SCRIPT- eller OBJECT-taggar

En prestandaförlust hade det inte blivit, eftersom global.asa bara interpreteras en gång.

Jag blev lite irriterad eftersom jag inte visste svaret, så jag testade att inkluder en fil med ett script. Det fungerade bra.

Jag inkluderade filen ovanför scriptblocket. Det jag inkluderade var en fil med en variabeltilldelning mellan script-taggar, och skrev sedan ut denna variabel i "SubSession_OnStart". På första sidan jag kom till så skrevs variabeln ut.

Så att inkludera kod som skall användas i någon av subbarna fungerar alldeles utmärkt... :)

------------------
Vide rox = new Vide();
rox.learn("C#");
webeye.nu

Öööhhh..?? Kan man inte fylla sessioner med getrows inne i global.asa? Är det inte så man gör? Då blir det inte så mycket databashanterande under sjäva surfandet. Är det inte så alla gör?

OK, nu postar vi om varandra men det låter ju guld!

Active Server Pages error 'ASP 0137'

Invalid Global Script

/admin/open.asp, line 1

Script blocks must be one of the allowed Global.asa procedures. Script directives within <% ... %> are not allowed within the Global.asa file. The allowed procedure names are Application_OnStart, Application_OnEnd, Session_OnStart, or Session_OnEnd.

använd

<SCRIPT LANGUAGE=VBScript RUNAT=Server>
...
</SCRIPT>

------------------
"It's not where ya from it's where ya at"

det går alldeles utmärkt att lägga en array i application-objekt i application_onstart.

det är himla najsigt. då är den fylld jämt och ständigt, och du ändrar den när du behöver. :)

------------------
mördar-anders, det är jag.

Så att inkludera kod som skall användas i någon av subbarna fungerar alldeles utmärkt...

Så trevligt! :)

------------------
/emission
If you see someone without a smiley, give them your colon.

Betyder det att man kan redigera application i verktyget och sen låta alla besökarna använda samma application?

Om så är fallet kan man stillsamt undra varför alla säger att Access är så långsamt och dåligt. Möjligheterna med Access verkar rejält underdimmensionerade tycker jag det verkar som.

Microsoft VBScript runtime  error '800a01a8'

Object required: 'Conn'

/admin/inc_global.asp, line 14

<SCRIPT LANGUAGE="VBscript" RUNAT="server">

'## OPEN THE DATABASE
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\Data\webadmin.mdb")

FUNCTION addVisitorToDatabase()
	cnt = 1 
	FOR EACH varre in Request.ServerVariables 
		tmp = tmp &  cnt & ". " & varre & " : " & Request.ServerVariables(varre) & vbCRLF 
		cnt = cnt + 1 
	NEXT
	SQL = "INSERT INTO [visitors](x_date, x_http_info) VALUES (#" & now() & "#, '" & tmp & "')"
[b]14.[/b] Conn.Execute(SQL)
END FUNCTION

'## CLOSE THE DATABASE
Conn.Close
Set Conn = Nothing

</SCRIPT>

OK det var i ngen som uppfattade min fråga.

Alltså, är dt en omöjlighet att läsa till/från en databas i global.asa?

Med ovanstående kod får man nästan det intrycket.

nej, det är ingen omöjlighet. det funkar bra.

när ska koden köras? jag tycker du borde köra den i session_onstart.

sub session_onstart
'## OPEN THE DATABASE
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\Data\webadmin.mdb")

FOR EACH varre in Request.ServerVariables 
tmp = tmp & cnt & ". " & varre & " : " & Request.ServerVariables(varre) & vbCRLF 
NEXT
SQL = "INSERT INTO [visitors](x_date, x_http_info) VALUES (#" & now() & "#, '" & tmp & "')"
Conn.Execute(SQL)

'## CLOSE THE DATABASE
Conn.Close
Set Conn = Nothing
end sub

tog bort din räknare, för jag tyckte den var onödig. dessutom slängde jag bort function.

mvh,

------------------
mördar-anders, det är jag.