吾爱破解 - LCG - LSG |安卓破解|病毒分析|www.52pojie.cn

 找回密码
 注册[Register]

QQ登录

只需一步,快速开始

查看: 1326|回复: 7
收起左侧

[求助] 如何把系统数据调入excel?

  [复制链接]
帅气的卡卡西 发表于 2022-6-8 21:15
25吾爱币
本帖最后由 帅气的卡卡西 于 2022-6-8 21:17 编辑

公司的销售管理系统是用java写的,我看其他同时在导出数据时会弹出一个浏览器页面,然后就自动打开了excel并导入到里面,而我的电脑只是弹出了一个页面,并没有打开excel,弹出的页面源代码是这样的,希望有大佬帮我看一下,通过http://39.108.93.80:8085/xe/FQ-Query2.service?SESSIONIDSTR=969DD8714238CC298B4EE2799556B9E9&ViewID=0可以打开我需要的数据,但无法导入excel里,希望有大佬帮我看一下,


<html>
<script language="VBScript">
window.resizeTo 0,0
set Excel = CreateObject("Excel.Application")
Excel.Visible = true
Excel.WorkBooks.Add("http://39.108.93.80:8085/xe/templates/default.xlt")



version = CDbl(Excel.Version)

With Excel.ActiveSheet.QueryTables.Add("TEXT;http://39.108.93.80:8085/xe/FQ-Query2.service?SESSIONIDSTR=969DD8714238CC298B4EE2799556B9E9&ViewID=0", Excel.ActiveSheet.Cells(1,1))
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .RefreshStyle = 1
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .TextFilePromptOnRefresh = False        
        If Version<10 then
          .TextFilePlatform = 2
        else
          .TextFilePlatform = 936
        end if
        .TextFileStartRow = 1
        .TextFileParseType = 1
        .TextFileTextQualifier = 1
        .TextFileConsecutiveDelimiter = False
        .TextFileTabDelimiter = True
        .TextFileSemicolonDelimiter = False
        .TextFileCommaDelimiter = False
        .TextFileSpaceDelimiter = False        
        .TextFileColumnDataTypes = Array(2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2)
        .Refresh
End With
With Excel.ActiveSheet
.Range("A1:AJ2").Style = "TableCell"


End With
window.close


</script>
</html>

最佳答案

查看完整内容

只有ie支持 用ie 打开html即可 或者8L的手导 最简单是的是 右键另存为 后缀名改为.xls

发帖前要善用论坛搜索功能,那里可能会有你要找的答案或者已经有人发布过相同内容了,请勿重复发帖。

pzx521521 发表于 2022-6-8 21:15
本帖最后由 pzx521521 于 2022-6-9 15:24 编辑

只有ie支持  
<html>
<script language="VBScript">
用ie 打开html即可

或者8L的手导

最简单是的是
右键另存为  后缀名改为.xls  
QQ截图20220609152347.png
cutthesoul 发表于 2022-6-8 23:07
有个chrome扩展 可以把网页的表格数据导出成xls格式的 ,可以用excel打开
 楼主| 帅气的卡卡西 发表于 2022-6-8 23:07
cutthesoul 发表于 2022-6-8 23:07
有个chrome扩展  可以把网页的数据导出成xls格式的话 excel可以打开

请问是什么拓展
cutthesoul 发表于 2022-6-8 23:11

网页表格导出为 Excel 表格

上面是扩展名字,chrome商店里就可以搜到 不过你得用梯子
cutthesoul 发表于 2022-6-8 23:11

网页表格导出为 Excel 表格
上面是扩展名字,chrome商店里就可以搜到
greatfisher 发表于 2022-6-9 07:36
谢谢分享
cxx313120919 发表于 2022-6-9 11:45
本帖最后由 cxx313120919 于 2022-6-9 11:47 编辑

不写代码 可以直接 把数据保存到 txt
然后 企业微信截图_16547462649784.png
然后 编码 选择 无
企业微信截图_16547463572656.png
您需要登录后才可以回帖 登录 | 注册[Register]

本版积分规则 警告:本版块禁止回复与主题无关非技术内容,违者重罚!

快速回复 收藏帖子 返回列表 搜索

RSS订阅|小黑屋|处罚记录|联系我们|吾爱破解 - LCG - LSG ( 京ICP备16042023号 | 京公网安备 11010502030087号 )

GMT+8, 2024-5-10 18:45

Powered by Discuz!

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表