| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1435 人关注过本帖
标题:求助:关于跨数据库拷贝表
只看楼主 加入收藏
hyhhd
Rank: 2
等 级:论坛游民
威 望:1
帖 子:502
专家分:44
注 册:2006-5-12
收藏
 问题点数:0 回复次数:4 
求助:关于跨数据库拷贝表
我在网上找到
“/*************导出到Access********************/
insert into openrowset('Microsoft.Jet.OLEDB.4.0',
   'x:\A.mdb';'admin';'',A表) select * from 数据库名..B表

/*************导入Access********************/
insert into B表 selet * from openrowset('Microsoft.Jet.OLEDB.4.0',
   'x:\A.mdb';'admin';'',A表)”
然后,我就开始试验:
SQL = "insert into openrowset('Microsoft.Jet.OLEDB.4.0','e:\hyh.mdb';'admin';'',Y2Motorh) select * from  Y2系列交流异步电机"
Cnn.Execute SQL
但老提示“insert into”语法错误,请高手指点,这是为何?我都快疯了!!!

[[italic] 本帖最后由 hyhhd 于 2007-12-9 18:23 编辑 [/italic]]
搜索更多相关主题的帖子: 数据库 拷贝 
2007-12-09 18:20
hyhhd
Rank: 2
等 级:论坛游民
威 望:1
帖 子:502
专家分:44
注 册:2006-5-12
收藏
得分:0 
其中“Y2系列交流异步电机”为源表,目标数据库“'e:\hyh.mdb'”,目标表“2Motorh”。请大侠指点!

2007-12-09 18:25
hyhhd
Rank: 2
等 级:论坛游民
威 望:1
帖 子:502
专家分:44
注 册:2006-5-12
收藏
得分:0 
这是我在类模块中做的函数:
''''''''导出指定表到指定的数据库的表中''''''''''''

Public Function ExportTable(SourceDataBaseName As String, SourceTableName As String, DesignationDataBaseName As String, DesignationTableName As String) As Boolean
   
On Error GoTo ProcError
   
    ExportTable = False
   
    If Cnn.State = adStateClosed Then
        Cnn.CursorLocation = adUseClient
        Cnn.Mode = adModeReadWrite
        Cnn.ConnectionString = Me.LinkString
        Cnn.Open Cnn.ConnectionString, Me.UserName, Me.PassWord
        
    End If
   
'    SQL = "insert into openrowset('Microsoft.Jet.OLEDB.4.0','e:\hyh.mdb';'admin';'',Y2Motorh) select * from  Y2系列交流异步电机"
'    Cnn.Execute SQL
   
    SQL = "insert into openrowset('Microsoft.Jet.OLEDB.4.0','" & DesignationDataBaseName & "';'" & Me.UserName & "';'" & Me.PassWord & "'," & DesignationTableName & ")" & _
    "select * from " & SourceTableName
   
    MsgBox SQL
   
    Cnn.Execute SQL   
    ExportTable = True
   
ProcExit:
    Exit Function
   
ProcError:
    MsgBox "错误号:" & Err.Number & vbCrLf & "描  述:" & Err.Description, 48, "导出指定表到指定的数据库的表中"
    Resume ProcExit

End Function

2007-12-09 18:27
hyhhd
Rank: 2
等 级:论坛游民
威 望:1
帖 子:502
专家分:44
注 册:2006-5-12
收藏
得分:0 
编写这个功能,是为了在vb中实现备份。可能备份整个表还有其他语句,但通过这个“insert into”也应该能实现。我是用的是access。

2007-12-09 18:53
zero_first
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2008-4-9
收藏
得分:0 
以前只做过查询,好像 是不能写入什么的
2008-04-09 11:13
快速回复:求助:关于跨数据库拷贝表
数据加载中...
 
   



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

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