以前运行一直没问题的程序,用新版本发布后,发现网页跳转变成了404,这个怎么处理?
Select Case e.Path
Case "home.htm",""
Dim wb As New WeUI
wb.AddPageTitle("","ph1","万捷电子","万捷电子内网服务")
wb.InsertHTML("<h3 align='center' style='margin-top:5px'>IT还在学习中,没有开始做哪!</h3>")
With wb.AddPageFooter("","pf1","Copyright © 慈溪市万捷电子有限公司")
.AddLink("工业和信息化部备案管理系统 浙ICP备17038935号-1","http://beian.miit.gov.cn/")
End With
e.WriteString(wb.Build)
Case "k3.htm"
e.Redirect("http://122.227.133.146:8091")
Case "zzjm.htm"
Functions.Execute("zzjm网页授权",e)
Case Else
e.Redirect("home.htm")
End Select
此主题相关图片如下:1.png