以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  输入密码打开网页  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=178767)
--  作者：qazlinle6
--  发布时间：2022/7/19 19:28:00
--  输入密码打开网页
                        a主页2 = "<li ><a href=\'销进退账目.htm\' target=\'iframe\'><i style=\' font-size:15px;\'class=""fab fa-sketch"" ></i> &nbsp;&nbsp;收银台余额 </a></li>"

网页上可不可以用下面输入密码打开href=\'销进退账目.htm\'

Dim Val As String ="868686"
Dim s As String
If InputValue(s,"密码!","请输入密码:") Then
    If s = Val Then        
Forms("收银台余额营业款").Open()
    Else
        MessageBox.Show("你输入的密码不对!")
    End If
End If
--  作者：有点蓝
--  发布时间：2022/7/19 20:18:00
--  
没有办法使用。可以自己设计一个Dialog，在Dialog里放一个文本框输入密码
--  作者：qazlinle6
--  发布时间：2022/7/19 20:46:00
--  
With wb.AddDialog("","dlg1", "提示","<input  type=\'password\' name=\'password\' id=\'password\'> </input>")
          Dim Val As String ="868686"
  If ？？？？？ = Val Then     
  .AddButton("btnOK","确定","网页.htm")
End If
        End With

这样？？？？？？
--  作者：有点蓝
--  发布时间：2022/7/19 21:06:00
--  
网页要使用js判断。到Dialog确定按钮里调用js函数
[此贴子已经被作者于2022/7/19 21:06:15编辑过]
--  作者：qazlinle6
--  发布时间：2022/7/19 21:18:00
--  
If ？？？？？ = Val Then 


什么得的到密码name=\'password\'
--  作者：有点蓝
--  发布时间：2022/7/19 21:57:00
--  
https://www.baidu.com/s?wd=js%20%E8%8E%B7%E5%8F%96%E5%85%83%E7%B4%A0%E5%80%BC
--  作者：qazlinle6
--  发布时间：2022/7/19 22:42:00
--  
可以帮大概弄一下代码不
--  作者：有点蓝
--  发布时间：2022/7/19 23:00:00
--  
既然要使用原生的html做，就要学会自己看文档，自食其力
--  作者：qazlinle6
--  发布时间：2022/7/20 10:05:00
--  
function check() {
var text2 = document.getElementById(\'密码\').value;
var text3 = 868686;
 if(text2  == text3 ){
         location="销进退账目.htm";   target=\'iframe\' 这个什么加这里面
    }
    else{
        alert(\'密码错误\');
    }
}
--  作者：有点蓝
--  发布时间：2022/7/20 10:14:00
--  
没用过iframe这种东西，自己百度吧：https://www.baidu.com/baidu?ie=UTF-8&word=location%20target%3D%27iframe%27