school.asp

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

<%
Function school(str)
Select Case str
Case"28"
response.write"中山大学"
Case"29"
response.write"暨南大学"
Case"30"
response.write"广东工业大学"
Case"31"
response.write"广州中医药大学"
Case"32"
response.write"广东外语外贸大学"
Case"33"
response.write"广州大学"
Case"34"
response.write"广州金融学院"
Case"35"
response.write"广州体育学院"
Case"36"
response.write"广州美术学院"
Case"37"
response.write"星海音乐学院"
Case"38"
response.write"广东技术师范学院"
Case"39"
response.write"私立华联学院"
Case"40"
response.write"广州民航职业技术学院"
Case"41"
response.write"广东轻工职业技术学院"
Case"42"
response.write"广东交通职业技术学院"
Case"43"
response.write"广东白云职业技术学院"
Case"44"
response.write"广东农工商职业技术学院"
Case"45"
response.write"广东水利电力职业技术学院"
Case"46"
response.write"广州体育职业技术学院"
Case"47"
response.write"广东司法警官职业学院"
Case"48"
response.write"广东岭南职业技术学院"
Case"49"
response.write"广东机电职业技术学院"
Case"50"
response.write"广东建设职业技术学院"
Case"51"
response.write"华南理工大学"
Case"52"
response.write"华南师范大学"
Case"53"
response.write"华南农业大学"
Case"54"
response.write"仲恺农业技术学院"
Case"55"
response.write"广东药学院"
Case"56"
response.write"广东警官学院"
Case"57"
response.write"广东商学院"
Case"58"
response.write"广州航海高等专科学校"
Case"59"
response.write"广州工程技术职业学院"
Case"60"
response.write"第一军医大学"
end select
end function
%>