'需引用Microsoft ActiveX Data Objects 2.7 Library
Dim Export_Str As String
Dim conn As New ADODB.Connection
conn.Open \"PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=C:\temp1.mdb;\"
Export_Str = \"select * into [Excel 8.0;database=C:\Book1.xls].[sheet1] from tempA\"
conn.Execute Export_Str
站长排行
学院
新闻
专栏
盈利
如果你有站长界人事变动、重组并购、变革技术出现,以及产品投诉等重要新闻线索,请告诉我们,我们会给予特别关注。
0631-3653338
站长中国编辑部
站长中国24小时新闻热线: 13156089008