设置分割自动导入到xlsx后不兼容

龙隆

  

a ＝ 分割文本 (编辑框1.内容, #换行符, )
一份数量 ＝ 到整数 (取数组成员数 (a) ÷ 到整数 (编辑框2.内容)) ＋ 1
重定义数组 (文本, 假, 到整数 (编辑框2.内容))
b ＝ b ＋ 1
循环判断首 ()
记录 ＝ 记录 ＋ 1
文本 [b] ＝ 文本 [b] ＋ a [1] ＋ #换行符
删除成员 (a, 1, )
如果真 (记录 ＝ 一份数量)
b ＝ b ＋ 1
记录 ＝ 0

循环判断尾 (取数组成员数 (a) ≠ 0)
调试输出 (文本)
计次循环首 (取数组成员数 (文本), n1)
创建目录 (“C:\Users\Administrator\Desktop\分割文本\”)
创建目录 (“C:\Users\Administrator\Desktop\分割文本\10\”)
写到文件 (“C:\Users\Administrator\Desktop\分割文本\10\” ＋ 到文本 (取日 (取现行时间 ())) ＋ “-” ＋ 到文本 (n1) ＋ “.xlsx”, 到字节集 (文本 [n1]))
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> a ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> 一份数量 ＝ 到整数 (取数组成员数 (a) ÷ 到整数 (编辑框2.内容)) ＋ 1<br /> 重定义数组 (文本, 假, 到整数 (编辑框2.内容))<br /> b ＝ b ＋ 1<br /> .循环判断首 ()<br />     记录 ＝ 记录 ＋ 1<br />     文本 <strong> ＝ 文本 <strong> ＋ a [1] ＋ #换行符<br />     删除成员 (a, 1, )<br />     .如果真 (记录 ＝ 一份数量)<br />         b ＝ b ＋ 1<br />         记录 ＝ 0<br />     .如果真结束<br /> <br /> .循环判断尾 (取数组成员数 (a) ≠ 0)<br /> 调试输出 (文本)<br /> .计次循环首 (取数组成员数 (文本), n1)<br />     创建目录 (“C:\Users\Administrator\Desktop\分割文本\”)<br />     创建目录 (“C:\Users\Administrator\Desktop\分割文本\10\”)<br />     写到文件 (“C:\Users\Administrator\Desktop\分割文本\10\” ＋ 到文本 (取日 (取现行时间 ())) ＋ “-” ＋ 到文本 (n1) ＋ “.xlsx”, 到字节集 (文本 [n1]))<br /> .计次循环尾 ()

龙隆

请无视图片 点错了 上个帖子图片自己上去了

走一回

这样直接改个文件名后缀为xlsx，好像不会成功的吧，xlsx有自己的文件头格式的。论坛里有过此类模块，支持xls、xlsx两种格式的模块
如果您是使用 ODBC 连接到 Microsoft Office Excel
数据的应用程序开发人员，请将连接字符串设置为“Driver={Microsoft Excel Driver (*.xls,*.xlsx, *.xlsm, *.xlsb)};DBQ=path to xls/xlsx/xlsm/xlsb file”
如果用了这个代码还不能连接成功，需要安装【2007 Office system 驱动程序：数据连接组件】，直接搜一下，到微软官网即可下载，约为25M大小！
或是直接搜索AccessDatabaseEngine_X64(Access2010数据库引擎安装包_含xlsx).exe。
高版本的xlsx连接系统不是自带的，需要另外安装。。。。
好像论坛里的模块，可以脱离这个插件。

b0y

xlxs不是文本文件 不能这样直接写