'第80到第94行代码用于生成首页。
Case "", "default.htm" '首页
wb.AddPageTitle("", "pageheader", "智能管理系统", "由二八科技有限公司开发")
With wb.AddGrid("", "g1")
.Add("c1", "销售开单", "./images/button.png").Attribute = ""
.Add("c2", "采购入库", "./images/cell.png", "AddNew.htm")
.Add("c15", "退出", "./images/exit.png", "exit.htm") '退出登录
End With
'第80到第94行代码用于生成首页。
End Select
e.WriteString(wb.Build) '生成网页
下面二句的网址这样写可以吗？
.Add("c2", "采购入库", "./images/cell.png", "AddNew.htm") 其中： AddNew.htm
.Add("c15", "退出", "./images/exit.png", "exit.htm") 其中： exit.htm
加好友 
发短信
Post By：2024/5/14 11:39:00 [只看该作者]
