Foxtable(狐表)用户栏目专家坐堂 → [求助][讨论]网页上日期引用


  共有13667人关注过本帖树形打印复制链接

主题:[求助][讨论]网页上日期引用

帅哥哟,离线,有人找我吗?
nths
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:4046 威望:0 精华:0 注册:2017/3/25 15:34:00
[求助][讨论]网页上日期引用  发帖心情 Post By:2020/2/28 11:51:00 [显示全部帖子]

老师:你好!写了以下代码 ,想实现输入开始日期和结束日期 点确定能生成各账户的余额,但统计表1中没有数据  是不是引用“开始日期”和“结束日期”代码错误?正确代码应该怎样写?谢谢
Dim wb As New WeUI

Select Case e.Path

    Case "filter.htm"       

        wb.AddForm("","form1","list.htm")

        With wb.AddInputGroup("form1","ipg1","现金银行余额")

            .AddInput("startdate","开始日期","date")

            .AddInput("enddate","结束时间","date")

        End With     

      


 回到顶部
帅哥哟,离线,有人找我吗?
nths
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:4046 威望:0 精华:0 注册:2017/3/25 15:34:00
  发帖心情 Post By:2020/2/28 11:54:00 [显示全部帖子]


       代码 b.Filter = "日期 < '"& e.PostValues("startdate") & "'"


 回到顶部
帅哥哟,离线,有人找我吗?
nths
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:4046 威望:0 精华:0 注册:2017/3/25 15:34:00
  发帖心情 Post By:2020/2/28 11:55:00 [显示全部帖子]

   代码 b.Filter = "日期 < '"& e.PostValues("startdate") & "'"  引用不了

 回到顶部
帅哥哟,离线,有人找我吗?
nths
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:4046 威望:0 精华:0 注册:2017/3/25 15:34:00
  发帖心情 Post By:2020/2/29 21:12:00 [显示全部帖子]

Dim wb As New WeUI
Select Case e.Path
    Case "filter.htm"        
        wb.AddForm("","form1","list.htm")
        With wb.AddInputGroup("form1","ipg1","现金银行余额")
            .AddInput("startdate","开始日期","date")
            .AddInput("enddate","结束时间","date")
        End With     
       
       

 回到顶部
帅哥哟,离线,有人找我吗?
nths
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:4046 威望:0 精华:0 注册:2017/3/25 15:34:00
  发帖心情 Post By:2020/2/29 21:21:00 [显示全部帖子]

完整代码

 回到顶部
帅哥哟,离线,有人找我吗?
nths
  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:4046 威望:0 精华:0 注册:2017/3/25 15:34:00
  发帖心情 Post By:2020/2/29 21:21:00 [显示全部帖子]

完整代码
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:99.rar


 回到顶部
帅哥哟,离线,有人找我吗?
nths
  7楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:4046 威望:0 精华:0 注册:2017/3/25 15:34:00
  发帖心情 Post By:2020/3/6 9:40:00 [显示全部帖子]

老师:你好!我按照帮助文件中使用关联表做了简单的材料入库录入 代码如附件,不知哪里错了,入库明显示不了,麻烦老师给予指导,谢谢

 回到顶部
帅哥哟,离线,有人找我吗?
nths
  8楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:4046 威望:0 精华:0 注册:2017/3/25 15:34:00
  发帖心情 Post By:2020/3/6 9:41:00 [显示全部帖子]


老师:你好!我按照帮助文件中使用关联表做了简单的材料入库录入 代码如附件,不知哪里错了,入库明显示不了,麻烦老师给予指导,谢谢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:函数.rar


 回到顶部
帅哥哟,离线,有人找我吗?
nths
  9楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:4046 威望:0 精华:0 注册:2017/3/25 15:34:00
  发帖心情 Post By:2020/5/9 17:09:00 [显示全部帖子]

老师:你好!我做了一个扫码录入
With .AddInputCell("ic1") '通过InputCell增加输入框
                .AddLabel("lsj","物料编号",0) '增加标签,0显示在左边
                .AddInput("物料编号","text",1).Attribute = "" '调用js函数'增加输入框,1表示显示在中间               
                
                .AddImage("pim","./images/扫一扫.png",2).Attribute = " & path & "/plus/barcode_scan.html',true,true);"""
            End With      
            .AddInput("物料名称","物料名称","")            
            .AddInput("规格型号","规格型号","")
            .AddInput("单位","单位","")            
            .AddInput("数量","数量","number").Step= "0.01"
            .AddInput("单价","单价","number").Step= "0.01"
            .AddInput("金额","金额","number").Step= "0.01"
           wb.InsertHTML("<script>function scaned( t, r, f ) {document.getElementById('物料编号').value=r;}</script>")  
手工录入物料编号后能自动根据输入框中的物料编号生成物料名称、规格型号 ,手机扫描后物料编号也能输入框中显示,但不会根据输入框中的物料编号生成物料名称、规格型号、单位,请教一下怎样才能实现?

 回到顶部
帅哥哟,离线,有人找我吗?
nths
  10楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:4046 威望:0 精华:0 注册:2017/3/25 15:34:00
  发帖心情 Post By:2020/5/9 17:32:00 [显示全部帖子]

谢谢,老师指点   怎么调用?是不是把   .AddInput("物料编号","text",1).Attribute = "" '调用js函数'增加输入框,1表示显示在中间 在 wb.InsertHTML("<script>function scaned( t, r, f ) {document.getElementById('物料编号').value=r;}</script>")  再写一次


 回到顶部
总数 84 1 2 3 4 5 6 7 8 9 下一页