в 15:30, 26 мая 2010

2010-05-26T15:30:47Z

Admin: 1 версия

2010-05-26T11:51:21Z

1 версия

Новая страница

==Application start action==



<source lang="csharp">
//File: global.asax

<script language="VB" runat="server">
Sub Application_OnStart()
Application("CompanyTelephone") = "555 4321"
End Sub
</script>

</source>

==Use Global.asax==



<source lang="csharp">
<%@ Page Language=VB Debug=true %>
<script runat=server>
Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
lblTitle.Text = Application("ApplicationName")
lblTaxRate.Text = "Tax Rate: " & Application("TaxRate")
lblSessionStarts.Text = "Session Starts: " _
& Application("SessionStarts")
lblSessionStops.Text = "Session Stops: " _
& Application("SessionStops")
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE><% Response.Write(Application("ApplicationName")) %></TITLE>
</HEAD>
<BODY TEXT="black" LINK="darkred" VLINK="darkred" ALINK="red" LEFTMARGIN="40" TOPMARGIN="60">
<form runat="server">
<Font Face="Tahoma" Size="+1">
<asp:Label
id="lblTitle"
BorderWidth="7px"
BorderStyle=9
Width="90%"
Font-Size="25pt"
Font-Name="Arial"
runat="server"
/>
<BR><BR>
<asp:Label
id="lblTaxRate"
runat="Server"
/>
<BR><BR>
<asp:Label
id="lblSessionStarts"
runat="Server"
/>
<BR><BR>
<asp:Label
id="lblSessionStops"
runat="Server"
/>
<BR>
</Font>
</Form>
</BODY>
</HTML>

<%-- Global.asax
<SCRIPT LANGUAGE="VB" RUNAT="Server">
Sub Application_OnStart
Application("TaxRate") = 0.5125
Application("ApplicationName") = "Sample Global.asax"
End Sub
Sub Application_OnEnd
"code that runs when application ends
End Sub
Sub Session_OnStart
Application("SessionStarts") = _
Application("SessionStarts") + 1
Session.TimeOut = 1
End Sub
Sub Session_OnEnd
Application("SessionStops") = _
Application("SessionStops") + 1
End Sub
</SCRIPT>

--%>

</source>

← Предыдущая	Версия 15:30, 26 мая 2010
(нет различий)

ASP.Net/Development/global.asax - История изменений

в 15:30, 26 мая 2010

Admin: 1 версия