Syntaks Fejl

Du kan kun definere Session_OnEnd og lignende metoder i
global.asa ikke generelle sub-er - de skal smækkes i en
include fil.

For lige at uddybe, så betyder "og lignende metoder" at du er begrænset til disse metoder i global.asa :-)

Session_OnStart
Session_OnEnd
Application_OnStart
Application_OnEnd

>> erikjacobsen: Man kan godt definere sub og functions i global.asa og anvende dem - men kun i global.asa.

Fejlen i ovenstående er fordi function add(int1, int2) er en nestet function.
Global.asa skal se således ud:

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">
Sub Application_OnStart
  Application("Visitors") = Application("Visitors") + 1
End Sub

Sub Session_OnStart
  Session("ID") = Session("ID") + 1
  Session("CurrentUsers") = Session("CurrentUsers") + 1
End Sub

Function Add(int1, int2)
  Add = int1 + int2
End Function

Function Times(int1, int2)
  Times = int1 * int2
End Function

Sub Session_OnEnd
  Session("CurrentUsers") = Session("CurrentUsers") - 1
End Sub

Sub Application_OnEnd
End Sub
</SCRIPT>

Det virker stadigvæk ikke i det script jeg kører, som ser sådan her ud:<% LANGUAGE="VBScript" %>
<HTML>
<HEAD>
<TITLE>Add/Times test</TITLE>
</HEAD>
<BODY>
<%
intParm1 = Rnd*12
intParm2 = Rnd*140
vadd = Add(intParm1, intParm2)
Response.Write intParm1 & " + " & intParm2 & " = "
Response.Write xadd & "<BR>"
vTimes = Times(intParm1, intParm2)
Response.Write intParm1 & " * " & intParm2 & " = "
Response.Write xTimes & "<BR>"
Response.Write Session_ID
%>

Jeg får fejlen:
Typerne passer ikke sammen: 'Add'

Næh, nu virker det coltau. Tak skal du have.