shopzu.asp

本源代码为大学生购物网的源代码,欢迎大家的下载,学习与交流

<%
Function shopzu(str)
  Select Case str
    Case "1"
	  Response.write "电脑配件"
    Case "2"
	  Response.write "时尚用品"
    Case "3"
	  Response.write "电子产品"
    Case "4"
	  Response.write "卡类票类"
    Case "5"
	  Response.write "手机通讯"
	Case "6"
	  Response.write "生活用品"
  Case "7"
	  Response.write "房屋租赁"
  Case "8"
	  Response.write "各类图书"
  End Select
End Function
%>