以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  引用外部文件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=183656)

--  作者:swindy
--  发布时间:2022/11/11 13:30:00
--  引用外部文件
按照“高级开发指南”》“引用外部文件” 
实际金额没有自动计算出来。请问哪里出问题?已把mark.css 和 calc.js 放在lib文档内。
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2022/11/11 13:33:00
--  
代码?http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=150626
--  作者:swindy
--  发布时间:2022/11/11 13:44:00
--  
Select Case e.Path
    Case "addnew.htm"
        Dim wb As New weui
        wb.AppendHTML("<link rel=\'stylesheet\' href=\'./lib/mark.css\'/>",True
\'
引入样式文件,参数True表示添加到head区
        wb.AddForm("","form1","addnew.htm")
        With wb.AddInputGroup("form1","ipg1",
"
新增订单")
            .AddInput("cp",
"
产品","text")
            .AddInput("gy",
"
雇员","text")
            .AddInput("kh",
"
客户","text")
            .AddInput("dj",
"
单价","number").Attribute = "step=\'0.1\' " \'事件调用
            .AddInput("zk",
"
折扣","number").Attribute = "step=\'0.01\' "
            .AddInput("sl",
"
数量","number").Attribute = ""
            .AddInput("je",
"
金额","number")
            .AddInput("rq",
"
日期","date")
        End With
        With wb.AddButtonGroup("form1","btg1",True)
            .Add("btnok",
"
确定")
        End With
        wb.AppendHTML("<script src=\'./lib/calc.js\'></script>")
\'
引入脚本文件
        e.WriteString(wb.Build)

End
Select
--  作者:有点蓝
--  发布时间:2022/11/11 13:45:00
--  
文件路径不对:http://www.foxtable.com/mobilehelp/topics/0044.htm

 href=\'./weui/lib/mark.css\'
 href=\'./weui/lib/calc.js\'

--  作者:swindy
--  发布时间:2022/11/11 13:58:00
--  
谢谢 解决了。。 麻烦您了