Foxtable(狐表)用户栏目专家坐堂 → [求助]SQL如何快速导入Access数据库?


  共有1370人关注过本帖树形打印复制链接

主题:[求助]SQL如何快速导入Access数据库?

帅哥哟,离线,有人找我吗?
新福星
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1955 积分:15466 威望:0 精华:0 注册:2011/7/16 20:59:00
[求助]SQL如何快速导入Access数据库?  发帖心情 Post By:2017/12/15 9:46:00 [只看该作者]

需要将一个SQL Server数据库导入到Access数据,表结构相同。有快速方法么?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/12/15 9:57:00 [只看该作者]

在sql里面直接导出数据

 

https://www.baidu.com/baidu?wd=sqlserver+%E8%BD%AC+access

 


 回到顶部
帅哥哟,离线,有人找我吗?
新福星
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1955 积分:15466 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By:2017/12/15 9:59:00 [只看该作者]

不是了!是在应用程序要编个程序,将云服务器上的SQL数据导入到本地Access数据库。有什么快速方法?

 回到顶部
帅哥哟,离线,有人找我吗?
新福星
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1955 积分:15466 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By:2017/12/15 10:01:00 [只看该作者]

Access数据库可以使用SQL语句批处理么?

 回到顶部
帅哥哟,离线,有人找我吗?
新福星
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1955 积分:15466 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By:2017/12/15 10:02:00 [只看该作者]

For Each ra As Row In Tables(bm1).Rows
    pb1.Value=pb1.Value+1
    dxjs=dxjs+1
    sql2 = Nothing
    For Each c As Col In Tables("基础数据A").Cols
        
        '   For Each c As String In ycs  'Tables(bm1).Cols
        
        If c.IsNumeric Then   sql2 + = ra(c.name) & ","
        If c.IsString Then    sql2 + = "'" & ra(c.name) & "',"
        If c.IsDate Then    sql2 + = 日期符1 & ra(c.name) & 日期符1 & ","
        If c.IsBoolean Then
            
            If ra(c.name) = True Then
                sql2 + = 1 & ","
            Else
                sql2 + = 0 & ","
            End If
            
        End If
    Next
    
    cmd1.CommandText + = "InSert Into 基础数据 (" & sql1.Trim(",") & ") Values (" & sql2.Trim(",") & ");"
    
    If  pb1.Value Mod 2000 =0 Then
        cmd1.CommandText = cmd1.CommandText.Trim(";")
        cmd1.ExecuteNonQuery
        cmd1.CommandText=Nothing
        sql2=Nothing
        dxjs=0
        sjjg=Date.now-cssj
        PopMessage("已经上传" & pb1.Value & "条数据!  " &  sjjg.TotalSeconds & "秒" ,"提示",PopIconEnum.Infomation,5)

类似这个?
       


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/12/15 10:17:00 [只看该作者]

必须编写代码。

 

1、select查询sqlserver数据库的数据;

 

2、循环每一行,合成sql语句,然后一起执行,使用事务即可。


 回到顶部