global.asa

来自「本文描述了用ASP技术实现动态网上书店的开发概述、技术特征、应用原理及方法」· ASA 代码 · 共 23 行

<SCRIPT LANGUAGE=VBScript RUNAT=Server>

Sub Session_OnStart
dim sItemNums(0), nItemQtys(0)
  sItemNums(0) = ""
  nItemQtys(0) = 0

  session("CartItemNumArray") = sItemNums
  session("CartItemQtyArray") = nItemQtys
 
  session("shipbasecharge") = 4.50
  session("shipitemcharge") = 1.25
End Sub

</SCRIPT>

<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Application_OnStart

End Sub

</SCRIPT>