PHP高手麻烦你帮我把下面这段代码转成PHP?

Response.Buffer=TrueResponse.ExpiresAbsolute=Now()-1Response.Expires=0Response.CacheC... Response.Buffer = True
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = "no-cache"
response.Charset="gb2312"
Set CmsDjMusic = New CmsDj_Com_Dj
Set CmsDjPublic = New CmsDj_Com_Public
dim Menu,SqlWhere,NoDate
Menu=SafeRequest("menu","auto")
NoDate="暂无数据"
Select Case Menu
Case "现场串烧" : SqlWhere="and CD_ClassID=1 order by CD_ID desc"
Case "中文舞曲" : SqlWhere="and CD_ClassID=2 order by CD_ID desc"
Case "英文舞曲" : SqlWhere="and CD_ClassID=3 order by CD_ID desc"
Case "慢摇舞曲" : SqlWhere="and CD_ClassID=4 order by CD_ID desc"
Case "酒吧Club" : SqlWhere="and CD_ClassID=5 order by CD_ID desc"
Case "最新推荐" : SqlWhere="and CD_IsBest<>0 order by CD_ID desc"
Case "最新上传" : SqlWhere="order by CD_ID desc"
Case "大家在听" : SqlWhere="and now()-CD_LastHitTime<=60/1440 order by CD_LastHitTime desc"
Case "网友推荐" : SqlWhere="order by CD_uHits desc"
Case "今日排行" : SqlWhere="order by CD_DayHits desc"
Case "本周排行" : SqlWhere="order by CD_WeekHits desc"
Case "下载排行" : SqlWhere="order by CD_DownHits desc"
Case "收藏排行" : SqlWhere="order by CD_FavHits desc"
Case "舞曲排行" : SqlWhere="order by CD_Hits desc"
Case "我的收藏" : SqlWhere="favtrue"
Case else : SqlWhere="and CD_Name like '%" & menu & "%' order by CD_ID desc" : NoDate="没有任何记录!"
End Select
if SqlWhere="favtrue" then
if UserLogined<>True then
NoDate="请先登陆再操作!"
CmsDj_Com_UserID="Null"
else
NoDate="暂无音乐, 赶快去收藏吧! ^_^"
哪位兄弟帮下忙 啊
展开
 我来答
duanfeng3075
2010-11-11 · TA获得超过106个赞
知道小有建树答主
回答量:241
采纳率:0%
帮助的人:137万
展开全部
用switch case啊
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式