欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  后端开发

小弟我想把这段asp代码改成PHP的,但是不知道如何写了

程序员文章站 2024-01-13 10:56:22
...
我想把这段asp代码改成PHP的,但是不知道怎么写了
本帖最后由 dandan0104 于 2014-06-12 12:15:28 编辑

Dim i,j
Dim TempStr,Menu_1,Menu_2

TempStr = "系统设置"
TempStr = TempStr & "@@系统基本设置"
TempStr = TempStr & "@@管理员添加"
TempStr = TempStr & "@@管理员管理"
TempStr = TempStr & "@@修改登录密码"
TempStr = TempStr & "@@短信接口配置"
TempStr = TempStr & "@@短信软件操作管理"

TempStr = TempStr & "||常见问题管理"
TempStr = TempStr & "@@添加常见问题"
TempStr = TempStr & "@@管理常见问题"
TempStr = TempStr & "@@敏感字符管理"

TempStr = TempStr & "||预约须知"
TempStr = TempStr & "@@预约须知"
TempStr = TempStr & "@@注册会员管理"
TempStr = TempStr & "@@短信群发"

TempStr = TempStr & "||预约门诊"
TempStr = TempStr & "@@门诊类型"
TempStr = TempStr & "@@科室添加"
TempStr = TempStr & "@@科室导入"
TempStr = TempStr & "@@科室管理"
TempStr = TempStr & "@@专家添加"
TempStr = TempStr & "@@专家管理"
TempStr = TempStr & "@@季节时间管理"

Menu_1 = Split(TempStr , "||")
For i = 0 To Ubound(Menu_1)
Menu_2 = Split(Menu_1(i) , "@@")

%>

Next
%>