Foxtable(狐表)用户栏目专家坐堂 → 单独提交字段,返回文件怎么操作


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

主题:单独提交字段,返回文件怎么操作

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


加好友 发短信
等级:童狐 帖子:227 积分:2006 威望:0 精华:0 注册:2020/5/4 17:14:00
单独提交字段,返回文件怎么操作  发帖心情 Post By: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

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


加好友 发短信
等级:超级版主 帖子:105495 积分:536466 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/3/19 19:49:00 [只看该作者]

想解决问题的麻烦发完整点的代码。

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


加好友 发短信
等级:童狐 帖子:227 积分:2006 威望:0 精华:0 注册:2020/5/4 17:14:00
  发帖心情 Post By:2023/3/20 9:29:00 [只看该作者]

老师好,代码如下:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:代码.txt


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


加好友 发短信
等级:超级版主 帖子:105495 积分:536466 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/3/20 9:35:00 [只看该作者]

下载按钮所在事件的完整代码

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


加好友 发短信
等级:童狐 帖子:227 积分:2006 威望:0 精华:0 注册:2020/5/4 17:14:00
  发帖心情 Post By: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)

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


加好友 发短信
等级:超级版主 帖子:105495 积分:536466 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/3/20 9:46:00 [只看该作者]

引用的js文件路径不对,或者js文件里没有这个函数download

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


加好友 发短信
等级:童狐 帖子:227 积分:2006 威望:0 精华:0 注册:2020/5/4 17:14:00
  发帖心情 Post By: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);
}

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


加好友 发短信
等级:超级版主 帖子:105495 积分:536466 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/3/20 10:23:00 [只看该作者]

应该是文件的存放路径不对,不在web目录里:http://www.foxtable.com/mobilehelp/topics/0044.htm

 回到顶部