Foxtable(狐表)用户栏目专家坐堂 → 页面恢复初始状态


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

主题:页面恢复初始状态

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


加好友 发短信
等级:幼狐 帖子:137 积分:1682 威望:0 精华:0 注册:2018/8/30 20:55:00
页面恢复初始状态  发帖心情 Post By:2021/8/6 13:45:00 [只看该作者]

老师,帮助文件中使用TopTips示例,我想在登录页面出现提示错误内容后,能够把页面恢复初始状态,即:把填写的用户名和密码清空,该怎么操作??
Select Case e.Path
Case "logon.htm"
If e.PostValues.Count = 0 Then
Dim wb As New WeUI
wb.AddTopTips("","toptip1",
"
请输入姓名和密码!")
wb.AddForm("","form1","logon.htm").Attribute = ""
'
调用函数
With wb.AddInputGroup("form1","ipg1","
用户登录")
.AddInput("xm",
"
户名","text")
.AddInput("pw",
"
密码","password")
End With
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1",
"
确定", "submit")
End With
wb.AppendHTML("<script src='./lib/valid.js'></script>")
'
引入脚本文件
e.WriteString(wb.Build)
Else
Dim sb As New StringBuilder
sb.AppendLine("<meta name='viewport' c>")
For Each key As String In e.PostValues.Keys
sb.AppendLine(key & ":" & e.PostValues(key) & "</br>")
Next
e.WriteString(sb.ToString)
End If
End
Select

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


加好友 发短信
等级:超级版主 帖子:106884 积分:543633 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/6 13:47:00 [只看该作者]

1、在"d:\web\lib"新建一个文本文件,文件名为"valid.js",文件内容为:

function valid(){
   var v1 = document.getElementById("xm").value;
   var v2 = document.getElementById("pw").value;
   if (v1 && v2){return true}
   show("toptip1",2000);

document.getElementById("xm").value = "";

document.getElementById("pw").value = "";
   return false;
}


 回到顶部