我谢了如下访问excel的语句:Dim MyCnn As New OleDb.OleDbConnection
Dim MyCmm As New OleDb.OleDbCommand
Dim MyAdp As New OleDb.OleDbDataAdapter
Dim MyDts As New Data.DataSet
Dim sheetload As Object = New Object MyCnn.ConnectionString = "Provider=Microsoft.jet.oledb.4.0;data source=原辅料新物料编码(修正稿).xls;Extended Properties='Excel 8.0;HDR=Yes;IMEX=1;'"
MyCnn.Open()
MyCmm.Connection = MyCnn
MyCmm.CommandText = "select * from [{201紧固件}$]"
MyAdp.SelectCommand = MyCmm
MyAdp.Fill(MyDts, "biao")
DataGridView1.DataSource = MyDts
DataGridView1.DataMember = "biao"结果在MyCmm.CommandText = "select * from [{201紧固件}$]"处提示错误:'{201紧固件}$' 不是一个有效名称。请确认它不包含无效的字符或标点,且名称不太长。请大家指点啊,谢谢了
Dim MyCmm As New OleDb.OleDbCommand
Dim MyAdp As New OleDb.OleDbDataAdapter
Dim MyDts As New Data.DataSet
Dim sheetload As Object = New Object MyCnn.ConnectionString = "Provider=Microsoft.jet.oledb.4.0;data source=原辅料新物料编码(修正稿).xls;Extended Properties='Excel 8.0;HDR=Yes;IMEX=1;'"
MyCnn.Open()
MyCmm.Connection = MyCnn
MyCmm.CommandText = "select * from [{201紧固件}$]"
MyAdp.SelectCommand = MyCmm
MyAdp.Fill(MyDts, "biao")
DataGridView1.DataSource = MyDts
DataGridView1.DataMember = "biao"结果在MyCmm.CommandText = "select * from [{201紧固件}$]"处提示错误:'{201紧固件}$' 不是一个有效名称。请确认它不包含无效的字符或标点,且名称不太长。请大家指点啊,谢谢了
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货