首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

Excel文件导入的Access文件时版本的有关问题

2012-12-23 
Excel文件导入的Access文件时版本的问题Dim db As New ADODB.ConnectionDim sPath As Stringdb.Open Prov

Excel文件导入的Access文件时版本的问题
Dim db As New ADODB.Connection
  Dim sPath As String
    
  db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Text2.Text & ";Persist Security Info=False"
  sPath = Text1.Text
  Call db.Execute("INSERT into 成品交库 SELECT * From [Sheet1$] In '" & sPath & "' 'excel 8.0;'")
   MsgBox "导出成功", vbOKOnly, "提示"
  db.Close
  Set db = Nothing
这段代码适用2003版本,请问2007版本的如何改
[解决办法]
安装一下Office文件格式转换器:FileFormatConverters.exe
[解决办法]
谢谢,我已解决了
db.Open "Provider=Microsoft.ace.OLEDB.12.0;Data Source=" & App.Path & "\storage.accdb" & ";Persist Security Info=False"

热点排行