httprequest事件
Select Case e.Path
Case "qqhealth"
e.AsDataServer("qqhealth")
Case "qqin"
e.AsDataServer("qqin")
Case "User"
e.AsDataServer("User")
Case "claim"
e.AsDataServer("claim")
Case else
Functions.Execute("11楼文件中登录验证代码所在的函数名称",e)
End Select
上面缺少的代码移动到函数里
……
Case "bxjg.htm"
Functions.Execute("bxjg",e)
return
Case "tjorder.htm"
Functions.Execute("tjorder",e)
return
Case "ypaddnew.htm"
Functions.Execute("ypaddnew",e)
return
Case "logon.htm" '登录页面
……
Case "exit.htm" '退出登录
……
Case "", "default.htm" '首页
……
End Select
e.WriteString(wb.Build) '生成网页
不要动不动就说是完全复制帮助的代码，其实已经被改的完全是另外一回事了。
代码使用是看场景（上下文）的，换个地方使用用法可能就不一样了，甚至可能有相反的结果。
加好友 
发短信
Post By：2019/4/19 20:56:00 [显示全部帖子]
