我对此有疑问。它找不到installSAMS,我已经在x86中更改了目标cpu init script
Dim con_excel As New System.Data.OleDb.OleDbConnection(" Provider=Microsoft.ACE.OLEDB.12.0;Data Source='" & TextBox1.Text & "'; Extend Poroperties="" Excel 16.0;HDR=No"" ")
con_excel.Open()
Dim qry_excel As String = "Select * from [Sheet1$]"
并且我已经为此安装了AccessDatabaseEngine
和即时通讯使用excel 2016 我应该使用
Extend Poroperties="" Excel 16.0;HDR=Yes""
or
Extend Poroperties="" Excel 12.0;HDR=Yes""
答案 0 :(得分:0)
您的连接字符串中有一个令人讨厌的语法错误:
(2000, 4800)
W.T
"'; Extend Poroperties="" Excel 16.0;HDR=No"" ")
这应该是(将Extend => Extended
设置为所需的值。为安全起见,请保留Poroperties => Properties
):
HDR
在以下位置进行更改:
IMEX=1
或:
";Extended Properties=""Excel 12.0 Xml;HDR=YES;IMEX=1;"""
请注意,Dim ConnectionString As String =
"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & TextBox1.Text &
";Extended Properties=""Excel 12.0 Xml;HDR=YES;IMEX=1"""
必须提供Excel文件的完整路径。
下载并安装所需的数据库引擎(32位或64位)。
Microsoft Access Database Engine 2010 Redistributable
Microsoft Access Database Engine 2016 Redistributable
关于Dim ConnectionString As String =
"Provider=Microsoft.ACE.OLEDB.16.0;Data Source=" & TextBox1.Text &
";Extended Properties=""Excel 16.0 Xml;HDR=YES;IMEX=1"""
Dim con_excel As New OleDbConnection(ConnectionString)
模式:
设置TextBox1.Text
设置VS Compile