- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 移动开发，怎么用按钮填写日期输入框里的内容？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=106431)
-- 发布时间：2017/9/8 13:55:00
-- 移动开发，怎么用按钮填写日期输入框里的内容？
此主题相关图片如下：微信图片_20170908135416.jpg
Dim wb As New WeUI
Select Case e.Path
Case "filter.htm"
wb.AddForm("","form1","list.htm")
With wb.AddInputGroup("form1","ipg1","数据筛选")
.Addinput("product","姓名或手机","text")
.AddInput("startdate","开始日期","date").Value = Format(Date.Today,"yyyy-MM-dd")
.AddInput("enddate","结束日期","date").Value = Format(Date.Today.AddDays(1),"yyyy-MM-dd")
End With
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1", "确定", "submit")
End With
\' Dim wb1 As New weui
\' wb1.AddForm("","form1","test.htm")
With wb.AddButtonGroup("form1","btg11",True) \'垂直排列
.Add("btn1", "昨天")
With .Add("btn13", "今天", "button") \' 点击后填入上面的日期输入框
？？？？代码
End With
.Add("btn5", "明天", "", "http://www.foxtable.com") \'单击这个按钮可以打开foxtable主页
End With
With wb.AddButtonGroup("form1","btg2", False) \'水平排列
.Add("btn6", "前一天")
.Add("btn7", "后一天").Kind = 2
End With
With wb.AddButtonGroup("form1","btg3", False)
.Add("btn8", "按钮").Kind = 0
.Add("btn9", "按钮").Kind = 1
End With
\' e.WriteString(wb1.Build) \'生成网页
[此贴子已经被作者于2017/9/8 13:58:36编辑过]
-- 发布时间：2017/9/8 14:20:00
--
With .Add("btn13", "今天", "button") \' 点击后填入上面的日期输入框
.Attribute = "onclick=""startdate.value=\'" & Date.today & "\'"""
End With
[此贴子已经被作者于2017/9/8 15:51:43编辑过]
-- 发布时间：2017/9/8 15:01:00
--
.AddInput("startdate","开始日期","date").Value
怎么用按钮代码，把 上面的指定的某个日期输入框里面 填写日期。
-- 发布时间：2017/9/8 15:52:00
--
With .Add("btn13", "今天", "button") \' 点击后填入上面的日期输入框
.Attribute = "onclick=""startdate.value=\'" & Date.today & "\'"""
End With
-- 发布时间：2017/9/9 9:33:00
--
With wb.AddButtonGroup("form1","btg3", False)
With .Add("btn6", "前一天","button") \'设置startdate为今天的日期
.Attribute = " & startdate.adddays(1) & "\'"""
End With
红色部分提示没有声明 名称 startdate
1、语法错在哪里？ 这些语法去哪部分学习？
2、设置完startdate 里面的值，之后 ，自动执行 下面这个筛选按钮， 应该怎么写代码？
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1", "筛选", "submit")
End With
[此贴子已经被作者于2017/9/9 9:36:55编辑过]
-- 发布时间：2017/9/9 9:56:00
--
1、js语法，参考：http://www.w3school.com.cn/js/js_obj_date.asp
-- 发布时间：2017/9/9 13:19:00
--
select * 表名 where shouji like \'*138*\'
我想在移动版里 筛选手机号码包括138的所有用户， 怎么筛选不出来呢？ 是不是语法上和非移动版的不同？
-- 发布时间：2017/9/9 13:28:00
--
把 * 换乘 % ， 就可以了