- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 单独提交字段，返回文件怎么操作 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=185818)
-- 发布时间：2023/3/18 18:07:00
-- 单独提交字段，返回文件怎么操作
老师好，有个页面需要单独提交个字段到另一个页面，用来下载文件；
用的js函数是这个：
function download(){
submitAjaxFileds(\'download.html\',\'\',\'download_path\')
}
然后浏览器提示我这不是个函数；
然后返回文件的代码是：
If e.PostValues.ContainsKey("download_path") Then
e.WriteFile(e.PostValues("download_path"))
End If
现在有点蒙了，请老师指点下，这是浏览器的报错
mycus_query.html:86 Uncaught TypeError: download is not a function
at HTMLAnchorElement.onclick (mycus_query.html:86:129)
onclick @ mycus_query.html:86
-- 发布时间：2023/3/19 19:49:00
--
想解决问题的麻烦发完整点的代码。
-- 发布时间：2023/3/20 9:29:00
--
老师好，代码如下：
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:代码.txt |
-- 发布时间：2023/3/20 9:35:00
--
下载按钮所在事件的完整代码
-- 发布时间：2023/3/20 9:43:00
--
Dim e As RequestEventArgs = args(0)
Dim wb As new weui
wb.AddForm("","mycus","mycus_query.html")
With wb.AddInputGroup("mycus","ipg1","查询")
With .AddInputCell("ic5")
.AddLabel("pazh","账号: ",0)
.AddInput("pa_cas_acc_num","text",1)
.AddVcodeButton("pajm","-- -- -- 查 询 -- -- --",2).Attribute = ""
End With
.AddHidenValue("download_path","")
End With
With wb.AddDialog("","dialogok","","请检查账户是否正确,如有问题请联系管理员")
.AddButton("btnok","确定")
End With
With wb.AddDialog("","dialogerror","","")
.AddButton("btndownload","下载",).Attribute = ""
.AddButton("btnok","取消")
End With
With wb.AddPageFooter("","pf1","在这里您可以查看和编辑自己的账户")
.AddLink("返回上一级","./business_info.html")
End With
wb.AppendHTML("<script>initExWeUI();</script>") \'调用initExWeUI();初始化框架
wb.AppendHTML("<script src=\'./lib/mycusquery.js\'></script>")
wb.AppendHTML("<script src=\'./lib/mycus.js\'></script>")
\'wb.AppendHTML("<script>document.getElementById(\'download_path\').parentNode.parentNode.style.display = \'none\';</script>")
e.writestring(wb.Build)
-- 发布时间：2023/3/20 9:46:00
--
引用的js文件路径不对，或者js文件里没有这个函数download
-- 发布时间：2023/3/20 10:18:00
--
把函数的名字改成了 "xiazai" 然后不知道怎么的就好了，路径也能正常提交到后台，但是没有只弹框，没有下载内容
Case "download.html"
If e.PostValues.ContainsKey("download_path") Then
MessageBox.show(e.PostValues("download_path")) 这个messagebox是有的，而且文件也确实存在
e.WriteFile(e.PostValues("download_path"))
Else
MessageBox.show("未提交")
End If
这是那个 xiazai 的函数
function xiazai() {
submitAjaxFileds(\'download.html\',\'\',\'download_path\')
//alert(document.getElementById("download_path").value);
}
-- 发布时间：2023/3/20 10:23:00
--
应该是文件的存放路径不对，不在web目录里：http://www.foxtable.com/mobilehelp/topics/0044.htm