global.asa

一个在线销售读书的简单网站 可以用来学习一下 功能不是很健全

<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>