有些网页我要在外面显示，不用登录也可以显示 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Select Case e.path

Case "员工查询.htm"

wb2.title ="周六福珠宝"

wb2.AddForm("","form1","员工查询.htm")

With wb2.AddArticle("form1","ar01")

.AddTitle("h1","<a href=""注册用户.htm""> <i style='float: left; font-size:30px;position: absolute; left: 11px; color: #FFFFFF;'class=""fa fa-chevron-circle-left fa-4x""></i> </a><span style='color:#FFFFFF;font-size:20px'>员工査询</span> ")

wb2.AppendHTML("<style>#ar01 {padding-top: 5px;padding-bottom: 0px;text-align: center;background-color:#00008B;position:sticky;top: 0px;z-index:500}</style>",True)

wb2.AppendHTML("<style>.weui_article h1{font-size:1px}</style>",True)

wb2.AppendHTML("<style>.weui_navbar_item{padding: 10px 0;}</style>",True)

End With

Case "员工注册.htm"

wb2.title ="周六福珠宝"

wb2.AddForm("","form1","员工注册.htm")

With wb2.AddArticle("form1","ar01")

.AddTitle("h1","<a href=""员工查询.htm""> <i style='float: left; font-size:30px;position: absolute; left: 11px; color: #FFFFFF;'class=""fa fa-chevron-circle-left fa-4x""></i> </a><span style='color:#FFFFFF;font-size:20px'>员工注册</span> ")

wb2.AppendHTML("<style>#ar01 {padding-top: 5px;padding-bottom: 0px;text-align: center;background-color:#00008B;position:sticky;top: 0px;z-index:500}</style>",True)

wb2.AppendHTML("<style>.weui_article h1{font-size:1px}</style>",True)

wb2.AppendHTML("<style>.weui_navbar_item{padding: 10px 0;}</style>",True)

End With

e.WriteString(wb2.Build)

End Select

里面只要有两个 Case “ ” 就要跑到登录页面

主题：有些网页我要在外面显示，不用登录也可以显示