| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 641 人关注过本帖
标题:OpenRowSet Excel 数据批量插入 SQL server 问题
只看楼主 加入收藏
reverie2008
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2013-7-11
结帖率:0
收藏
已结贴  问题点数:20 回复次数:1 
OpenRowSet Excel 数据批量插入 SQL server 问题
Public Sub insertToDb()
'----------------------------
'   插入到数据库
'   owen
'   2008/03/18
'----------------------------
Dim conn As New ADODB.Connection
Dim cmd As New
Dim strConn As String
Dim strCmdSql As String
conn.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=db_YDSH;Data Source=192.168.30.150;password=qaz123edc456tgb"
strCmdSql = "insert into tb_CodeTemp SELECT * FROM OpenRowSet('Microsoft.Jet.OLEDB.4.0'," & _
        "'Excel 8.0;HDR=Yes;database=f:\YDSH\test.xls;'," & _
        "'select * from [ACAD0001$]')"

cmd.ActiveConnection = conn
= strCmdSql
cmd.Execute
conn.Close
MsgBox "ok,数据已导入"
End Sub

以上是我的代码,但是text.xls数据库必须放到服务器的电脑里,怎么能将text.xls改到本地电脑里,请高手帮忙。
搜索更多相关主题的帖子: password server insert 数据库 Excel 
2014-08-01 18:11
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4947
专家分:30084
注 册:2008-10-15
收藏
得分:20 
有两种方法:
1、通过 WINSOCK ,把这个 XLS 上传到 服务器上再执行。 或者开 FTP 上传也行。
2、自己读这个 XLS ,然后生成每一条 SQL 命令,传到 服务器上 进行执行。
3、把XLS 的内容,复制成文本,传给服务器端,然后再生成具体的SQL 执行。

实现起来,速度最快的是 第1种,其次是第3种,最慢的是第二种。第二种慢的读 XLS 文件上面。
实现起来,代码最简单的,是第1种,使用FTP上传。其次是 第3种传文本。

授人于鱼,不如授人于渔
早已停用QQ了
2014-08-02 11:28
快速回复:OpenRowSet Excel 数据批量插入 SQL server 问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.039572 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved