以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 扫描网址是白板 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=120596) |
||||
-- 作者:lihe60 -- 发布时间:2018/6/20 11:00:00 -- 扫描网址是白板 打扫字符串是正常取值,但扫描网址是白板,是这个JS代码的问题吗? function scaned( t, r, f ) { if(r.indexOf("http") == 0 || r.indexOf("www") == 0) { location=r } else { document.getElementById(\'扫描结果\').value=r; } }
|
||||
-- 作者:lihe60 -- 发布时间:2018/6/20 11:09:00 -- function scaned( t, r, f ) { if(r.indexOf("http") == 0 || r.indexOf("www") == 0) { location=“www.sohu.com” } else { document.getElementById(\'扫描结果\').value=r; } } 手机屏幕也是白板。
|
||||
-- 作者:有点甜 -- 发布时间:2018/6/20 11:26:00 -- 弹出什么?
function scaned( t, r, f ) {
alert(r);
if(r.indexOf("http") == 0 || r.indexOf("www") == 0) {
alert(r);
location=r
}
else
{
document.getElementById(\'扫描结果\').value=r;
}
}
|
||||
-- 作者:lihe60 -- 发布时间:2018/6/20 12:14:00 -- 下面是代码,什么也不弹出。 Dim e As RequestEventArgs = args(0) Dim path = args(1) wb = new weui If e.PostValues("扫描结果")=Nothing wb.AppendHTML("<script type=\'text/javascript\' src=\'/" & path & "/js/common.js\'></script>", True) wb.AppendHTML("<link rel=\'stylesheet\' href=\'/" & path & "/css/common.css\' Type=\'text/css\' charset=\'utf-8\'/>", True) wb.AddForm("","form1","scan1") With wb.AddInputGroup("form1","ipg1","扫描") .AddInput("扫描结果","扫描结果","Text") End With With wb.AddButtonGroup("form1","btg1",False) .Add("btn1", "扫一扫", "button").Attribute = " & path & "/plus/barcode_scan.html\',true,true);""" .Add("btn2", "确定", "",e.PostValues("扫描结果")) End With \' wb.InsertHTML("<script>function scaned( t, r, f ) {document.getElementById(\'扫描结果\').value=r;}</script>") wb.InsertHTML("<script>function scaned( t, r, f ) {if(r.indexOf(\'http\') == 0 || r.indexOf(\'www\') == 0){location=r;}else{document.getElementById(\'扫描结果\').value=r;}}</script>") e.WriteString(wb.Build) Else Dim r As Row=Tables("扫描").addnew() r("扫描")=e.PostValues("扫描结果") Tables("扫描").save() With wb.AddTable("","Table1") \' .CreateFromDataTable(DataTables("扫描"),True) End With e.WriteString(wb.Build) End If 下面是JS //扫描 alert(1) function scaned( t, r, f ) { alert(r) if(r.indexOf("http") == 0 || r.indexOf("www") == 0) { alert(r) location=r } else { document.getElementById(\'扫描结果\').value=r; } } |
||||
-- 作者:有点甜 -- 发布时间:2018/6/20 12:23:00 -- js文件里面不要写代码。
修改下面代码,弹出什么?
wb.InsertHTML("<script>function scaned( t, r, f ) {alert(r);if(r.indexOf(\'http\') == 0 || r.indexOf(\'www\') == 0){alert(r);location=r;}else{document.getElementById(\'扫描结果\').value=r;}}</script>") |
||||
-- 作者:lihe60 -- 发布时间:2018/6/20 13:08:00 --
[此贴子已经被作者于2018/6/20 14:42:33编辑过]
|
||||
-- 作者:lihe60 -- 发布时间:2018/6/20 14:43:00 -- 有解吗? |
||||
-- 作者:有点甜 -- 发布时间:2018/6/20 14:50:00 -- 以下是引用lihe60在2018/6/20 13:08:00的发言:
[此贴子已经被作者于2018/6/20 14:42:33编辑过]
不可能,做一个具体项目发上来测试。 |
||||
-- 作者:lihe60 -- 发布时间:2018/6/20 15:01:00 --
|
||||
-- 作者:lihe60 -- 发布时间:2018/6/20 15:02:00 --
|