论坛 › 已解决问题区 › 关于字符串UTF8 和 asic 之间转换的问题【已解决】

fenhanxue 发表于 2018-5-21 22:02:51

回复 15# kk_lee69


    如你帖子里写的，不安装EXCEL的环境下
不要借助 Excel.au3

kk_lee69 发表于 2018-5-21 22:49:02

回复 16# fenhanxue

#include <array.au3>

$Excelconn= ObjCreate("ADODB.Connection")
$ExcelRS= ObjCreate("ADODB.Recordset")
$Excelconn.Open ("Provider=Microsoft.ACE.OLEDB.12.0;Data Source="&@ScriptDir&"\5.xlsx"&";Extended Properties='Excel 12.0'")
$ExcelRS.ActiveConnection = $Excelconn
$eExcelArray=$Excelconn.Execute ("SELECT * FROM ").GetRows

_ArrayDisplay($eExcelArray)

fenhanxue 发表于 2018-5-21 23:26:28

回复 17# kk_lee69


代码运行起来了，再次感谢KK的帮助

更新下备注，给后来者可以看到：
代码需要在32位下运行，64位系统，需要加一行
#AutoIt3Wrapper_UseX64=n

即：#AutoIt3Wrapper_UseX64=n
#include <array.au3>

$Excelconn= ObjCreate("ADODB.Connection")
$ExcelRS= ObjCreate("ADODB.Recordset")
$Excelconn.Open ("Provider=Microsoft.ACE.OLEDB.12.0;Data Source="&@ScriptDir&"\555.xlsx"&";Extended Properties='Excel 12.0'")
$ExcelRS.ActiveConnection = $Excelconn
$eExcelArray=$Excelconn.Execute ("SELECT * FROM ").GetRows

_ArrayDisplay($eExcelArray)

afan 发表于 2018-5-23 17:12:26

跑题很严重……既然可改变发送方式，还费这劲

fenhanxue 发表于 2018-5-24 21:47:05

回复 19# afan


    被A大见鄙视了。。。

查看完整版本: 关于字符串UTF8 和 asic 之间转换的问题【已解决】