[求助][讨论]网页上日期引用 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

共有14586人关注过本帖树形打印复制链接主题：[求助][讨论]网页上日期引用

nths

小大 1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：319 积分：4159 威望：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

加好友

发短信

等级：小狐帖子：319 积分：4159 威望：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

加好友

发短信

等级：小狐帖子：319 积分：4159 威望：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

加好友

发短信

等级：小狐帖子：319 积分：4159 威望：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

加好友

发短信

等级：小狐帖子：319 积分：4159 威望：0 精华：0 注册：2017/3/25 15:34:00

Post By：2020/2/29 21:21:00 [显示全部帖子]

完整代码

nths

小大 6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：319 积分：4159 威望：0 精华：0 注册：2017/3/25 15:34:00

Post By：2020/2/29 21:21:00 [显示全部帖子]

完整代码

下载信息 [文件大小：下载次数： ]
点击浏览该文件:99.rar

nths

小大 7楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：319 积分：4159 威望：0 精华：0 注册：2017/3/25 15:34:00

Post By：2020/3/6 9:40:00 [显示全部帖子]

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

nths

小大 8楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：319 积分：4159 威望：0 精华：0 注册：2017/3/25 15:34:00

Post By：2020/3/6 9:41:00 [显示全部帖子]

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

下载信息 [文件大小：下载次数： ]
点击浏览该文件:函数.rar

nths

小大 9楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：319 积分：4159 威望：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

加好友

发短信

等级：小狐帖子：319 积分：4159 威望：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 下一页

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