请问:我能不能在后台中不显示商城日常操作功能?(3)_动易Cms教程

编辑Tag赚U币
教程Tag:暂无Tag,欢迎添加,赚取U币!

Response.Write " <tr & vbCrLf
Response.Write " <td><a href='Admin_Deliver.asp' target='main'>发退货记录</a></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
End If
If AdminPurview = 1 Or arrPurview(18) = True Then
Response.Write " <tr & vbCrLf
Response.Write " <td><a href='Admin_Transfer.asp' target='main'>订单过户记录</a></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
End If
If AdminPurview = 1 Or arrPurview(24) = True Then
Response.Write " <tr & vbCrLf
Response.Write " <td><a href='Admin_ShoppingCart.asp' target='main'>购物车治理</a></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
End If
If AdminPurview = 1 Or arrPurview(19) = True Then
Response.Write " <tr>" & vbCrLf
Response.Write " <td href='Admin_PresentProject.asp' target='main'>促销方案治理</a></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
End If
If AdminPurview = 1 Or arrPurview(20) = True Then
Response.Write " <tr>" & vbCrLf
Response.Write " <td href='Admin_PaymentType.asp' target='main'>付款方式治理</a></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
End If
If AdminPurview = 1 Or arrPurview(21) = True Then
Response.Write " <tr>" & vbCrLf
Response.Write " <td href='Admin_DeliverType.asp' target='main'>送货方式治理</a></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
End If
End If
If AdminPurview = 1 Or arrPurview(22) = True Then
Response.Write " <tr>" & vbCrLf
Response.Write " <td href='Admin_Bank.asp' target='main'>银行帐户治理</a></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
End If
Response.Write " </table>" & vbCrLf
Response.Write " </div>" & vbCrLf
Response.Write " <div style='width:167'>" & vbCrLf
Response.Write " <table cellpadding=0 cellspacing=0 align=center & vbCrLf
Response.Write " <tr>" & vbCrLf
Response.Write " <td & vbCrLf
Response.Write " </tr>" & vbCrLf
Response.Write " </table>" & vbCrLf
Response.Write " </div></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
Response.Write "</table>" & vbCrLf

查看更多 动易Cms教程  动易Cms模板

来源:模板无忧//所属分类:动易Cms教程/更新时间:2007-09-17
相关动易Cms教程