| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- PostValues(key) 中没有按键的值btn1呢 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=145691) |
| -- 作者：刘林 -- 发布时间：2020/2/4 20:44:00 -- PostValues(key) 中没有按键的值btn1呢 If e.PostValues.Count=0 sb.AppendLine("<div style=\'position: fixed;top:150px;width:100%;height:300px;border:1px solid white;\'>") sb.AppendLine("<div class=\'mui-input-row\'style=\'margin-top:20px;\'> <label>用户名:</label><input id=\'yfm\' name=\'yfm\' Type=\'number\' class=\'mui-input-clear\' placeholder=\'必须本人身份证号\'></div>") sb.AppendLine("<div class=\'mui-input-row\'><label>姓    名:</label><input id=\'xm\' name=\'xm\' Type=\'text\' class=\'mui-input-clear\' placeholder=\'请输入验证手机号\'></div>") sb.AppendLine("<div class=\'mui-input-row\'><label>手机号:</label><input id = \'sjh\' name=\'sjh\'Type=\'number\' class=\'mui-input-clear\' placeholder=\'请输入验证手机号\'></div>") sb.AppendLine("<div class=\'mui-input-row\'><label>验证码:</label><input id= \'yzm\' name= \'yzm\' Type=\'number\' class=\'mui-input-clear\' placeholder=\'请输入手机验证码\'></div>") sb.AppendLine("<div class=\'mui-input-row\'><label>密    码:</label><input id=\'mm\' name=\'mm\'Type=\'password\' class=\'mui-input-password\' placeholder=\'请设置6位帐号密码\'></div>") sb.AppendLine("<div class=\'mui-button-row\'><button type=\'submit\' name=\'btn1\' id=\'btn1\'class=\'mui-btn \'>获取验证</button><button Type=\'button\' id=\'btn2\' name=\'btn2\' class=\'mui-btn\'>确定注册</button></div>") sb.AppendLine("</div>") Else Dim str As String="" For Each key As String In e.PostValues.Keys str=str & key & ":" & e.PostValues(key) & vbcrlf Next messagebox.show(str) End If 老师，请问str中返回键值，我为了区分不同的键，例子中是可以返回，但为我不冲突，我试着了mui来做,这是什么原因？
|
| -- 作者：刘林 -- 发布时间：2020/2/4 20:45:00 -- 哦，看到了，要加个value,谢谢 |
| -- 作者：刘林 -- 发布时间：2020/2/4 20:59:00 -- If e.PostValues.Count=0 sb.AppendLine("<div style=\'position: fixed;top:150px;width:100%;height:300px;border:1px solid white;\'>") sb.AppendLine("<div class=\'mui-input-row\'style=\'margin-top:20px;\'> <label>用户名:</label><input id=\'yfm\' name=\'yfm\' Type=\'number\' class=\'mui-input-clear\' placeholder=\'必须本人身份证号\'></div>") sb.AppendLine("<div class=\'mui-input-row\'><label>手机号:</label><input id = \'sjh\' name=\'sjh\'Type=\'number\' class=\'mui-input-clear\' placeholder=\'请输入验证手机号\'></div>") sb.AppendLine("<div class=\'mui-input-row\'><label>验证码:</label><input id= \'yzm\' name= \'yzm\' Type=\'number\' class=\'mui-input-clear\' placeholder=\'请输入手机验证码\'></div>") sb.AppendLine("<div class=\'mui-input-row\'><label>密    码:</label><input id=\'mm\' name=\'mm\'Type=\'password\' class=\'mui-input-password\' placeholder=\'请设置6位帐号密码\'></div>") sb.AppendLine("<div class=\'mui-button-row\'><button type=\'submit\' name=\'btn1\' id=\'btn1\' value=\'btn1\' class=\'mui-btn \'>获取验证</button><button Type=\'button\' id=\'btn2\' name=\'btn2\' class=\'mui-btn\'>确定注册</button></div>") sb.AppendLine("</div>") Else If e.PostValues.ContainsKey("btn1") If e.PostValues.ContainsKey("yfm")=False Or e.PostValues.ContainsKey("sjh")=False 这里加个提示框怎么写 End If End If End If 请问老师，这个怎么写,谢谢
|
| -- 作者：有点蓝 -- 发布时间：2020/2/4 21:09:00 -- mui框架应该也有提示框的吧。第三方框架的用法，建议学学这里easyui的方法：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=141055 很多都要靠前端js处理的。这种只能自力更生了，我没有时间去学习这个框架，并给对方做技术支持
|
| -- 作者：刘林 -- 发布时间：2020/2/4 21:37:00 -- 看了mui,这里逻辑判断后不晓得如何调出，例子中只看到点了某个键后的提示 |
| -- 作者：有点蓝 -- 发布时间：2020/2/4 21:42:00 -- 这种情况估计都要使用ajax处理的。先学会在静态文件调通了在考虑搬到foxtable里使用 |
| -- 作者：刘林 -- 发布时间：2020/2/4 21:53:00 -- If e.PostValues.ContainsKey("btn1") Dim msg="你选按了第一个键" e.WriteString(msg) End If 我看了写的零基础功略，msg返到页面上去了，但我是要个提示框，这怎么可以让他用警告框显示出来，谢谢
|