以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 关于web输入框自动填写的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=185591) |
-- 作者:ygg8310 -- 发布时间:2023/3/3 19:22:00 -- 关于web输入框自动填写的问题 Dim sb As New StringBuilder sb.AppendLine("<form enctype=\'multipart/form-data\' method=\'post\' id=\'form1\' name=\'form1\'>") sb.AppendLine("产品: < input name=\'cp\' id=\'cp\'><br/><br/>") sb.AppendLine("客户: < input name=\'kh\' id=\'kh\'><br/><br/>") sb.AppendLine("雇员: < input name=\'gy\' id=\'gy\'><br/><br/>") sb.AppendLine("单价: < input type=\'number\' name=\'dj\' id=\'dj\'><br/><br/>") sb.AppendLine("折扣: < input type=\'number\' name=\'zk\' id=\'zk\' min=\'0\' max=\'0.15\' step=\'0.01\'><br/><br/>") sb.AppendLine("数量: < input type=\'number\' name=\'sl\' id=\'sl\'><br/><br/>") sb.AppendLine("日期: < input type=\'date\' name=\'rq\' id=\'rq\'><br/><br/>") sb.AppendLine("<input Type=\'submit\' name=\'Sumbit\' id=\'Sumbit\' value=\'确定\'>") sb.AppendLine("</form>") e.WriteString(sb.ToString) 这个如何实现日期自动填写为今天?
|
-- 作者:有点蓝 -- 发布时间:2023/3/4 8:56:00 -- sb.AppendLine("日期: < input type=\'date\' name=\'rq\' id=\'rq\' value=\'" & format(date.today,"yyyy-MM-dd") & "\'><br/><br/>") |