7,763
社区成员
发帖
与我相关
我的任务
分享
' 设置连接SQL 数据库的连接字符串
strtemp = " [odbc;Driver= {SQL Server} ;Server=(local);Database=sbgl]"
' 设置Excel 数据连接
strconn = " Provider =Microsoft.Jet.OLEDB.4.0;Data Source=数据列表.xls ; Extended Properties=Excel ;HDR=No;IMEX=1"
cn.Open strconn
strsql = "insert into 设备总表1 select * from [设备列表.xls]"
cn.Execute strsql