- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- js多了个函数，按钮就不正常了。 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=157818)
-- 发布时间：2020/10/30 8:09:00
-- js多了个函数，按钮就不正常了。
scan.js多了个函数
function export(){
var result= submitAjaxFileds(\'export\',\'\',\'rq\',\'cp\',false);
document.getElementById("p1").innerHTML = result;
// history.go(-1);
}
打开127.0.1.1，点查询没有反应。如果没有上述函数，点查询网页正常。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.rar |
-- 发布时间：2020/10/30 9:10:00
--
export是js的关键字，不要用来做变量，函数名称
-- 发布时间：2020/10/30 9:42:00
--
需要点一下导出，把电子表以文件形式
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目1.rar |
下载到客户端电脑。
-- 发布时间：2020/10/30 9:48:00
--
Dim Book As New XLS.Book(ProjectPath & "Attachments\\导出表.xls")
book.AddDataTable("导出表","","Sel\\ect * from {表A} where 第一列 = \'" & e.postvalues("cp") & "\'")
e.WriteBook(book,"导出表.xls",False)
[此贴子已经被作者于2020/10/30 9:49:56编辑过]
-- 发布时间：2020/10/30 9:58:00
--
js文件没有改好，
function 请不要使用export这个名称，另外和后台代码里的调用函数名不一致(){
var result= submitAjaxFileds(\'export这里和后台的e.path对应不上\',\'\',\'rq\',\'cp\',false);
document.getElementById("p1").innerHTML = result;
// history.go(-1);
}
-- 发布时间：2020/10/30 10:22:00
--
把export1改成port1，还是导不出来。
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目1.rar |
-- 发布时间：2020/10/30 10:28:00
--
这种不能使用ajax，必须直接访问页面
function ort1(){
location="ort1?rq=" + document.getElementById("rq").value + "&cp=" + document.getElementById("cp").value ;
}
-- 发布时间：2020/10/30 10:42:00
--
function ort1(){
location="ort1?rq=" + document.getElementById("rq").value + "&cp=" + document.getElementById("cp").value ;
}
导出成功了，但需要修改文件名和格式，日程表.xls，代码如何改？
-- 发布时间：2020/10/30 10:45:00
--
你们平时看帮助都不知道在看啥：
e.WriteBook(book,"日程表.xls",False)
WriteBook
为彻底解决上述问题，我们为HttpRequest事件增加了一个WriteBook方法，此方法专门用于发送Excel报表，其语法为：
WriteBook(Book,FileName，InLine)
| Book | 要发送的Excel报表 |
| FileName | 客户端浏览器下载此报表时使用的文件名 |
| InLine | 可选参数，逻辑型，是否直接在浏览器显示报表，默认为True，设为False将下载报表。 实际上除了iOS设备，其他设备不管如何设置，都会下载报表。 |
-- 发布时间：2020/10/30 13:01:00
--
Dim Book As New XLS.Book(ProjectPath & "Attachments\\导出表.xls")
book.AddDataTable("导出表","","Sel\\ect * from {表A} where 第一列 = \'" & e.postvalues("cp") & "\'")
e.WriteBook(book,"导出表.xls",False)
这个代码导“出表.xls”有什么问题。
[此贴子已经被作者于2020/10/30 13:01:03编辑过]