- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 卡住 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=129476)
-- 发布时间：2018/12/29 10:05:00
-- 卡住
页面代码：
Dim e As RequestEventArgs = args(0)
Dim wb As New weui
wb.AppendHTML("<link rel=\'icon\' href=\'./favicon.ico\' Type=\'image/x-icon\' />") \'favicon.ico,已经放到web文件夹了
wb.AddForm("","form1","shengfen.htm")
wb.AddInputGroup("form1","ipg1","华东地区")
With wb.AddButtonGroup("form1","btg1", False)
.Add("btn1", "上海市","","/index.htm?chakshi=上海市").Kind = 1 \'.Add("btn1" & bianh, "查看TA的资料", "","/details.htm?bh=" & bianh)
.Add("btn2", "江苏省","","/cs_jiangsu.htm").Kind = 1
.Add("btn3", "浙江省","","/cs_zhejiang.htm").Kind = 1
End With
With wb.AddButtonGroup("form1","btg2", False)
.Add("btn4", "安徽省","","/cs_anhui.htm").Kind = 1
.Add("btn5", "福建省","","/cs_fujian.htm").Kind = 1
.Add("btn6", "江西省","","/cs_jiangxi.htm").Kind = 1
End With
With wb.AddButtonGroup("form1","btg3", False)
.Add("btn7", "山东省","","/cs_shandong.htm").Kind = 1 ’为了保证与上面按钮宽度一致，设置了下面2个空按钮，但是进入页面有时候卡住不动，这样用行么？
.Add("btn8", "").Kind = 1
.Add("btn9", "").Kind = 1
End With
e.WriteString(wb.Build) \'生成网页
这是反应特慢的截图：
此主题相关图片如下：qq图片201812291008244444444.png
这是正常的截图，.ico是灰色的
此主题相关图片如下：qq图片20181229101216666.png
这是服务器端.icoweb根目录文件夹截图：
此主题相关图片如下：未命名2.jpg
[此贴子已经被作者于2019/1/22 12:33:11编辑过]
-- 发布时间：2018/12/29 11:19:00
--
参考：http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=128312&replyID=859243&skin=1