问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

如何将ADO数据控件安装到电脑上?

发布网友 发布时间:2022-05-10 19:46

我来回答

3个回答

热心网友 时间:2023-10-25 19:26

最好的办法就是装一个版本很高的OFFICE,并包含Access。或者从网上直接下载 ado 2.8的安装包。在微软的网站上就有,免费的组件。

热心网友 时间:2023-10-25 19:26

1、装一个版本很高的OFFICE,并包含Access;
2、从网上直接下载 ado 2.8的安装包;
3、在微软的网站上就有,免费的组件。

热心网友 时间:2023-10-25 19:27

由于ADO对象不直接支持MySQL,所以必须先安装MyODBC, 后者也是一个免费产品,在 www.mysql.org上有下载,安装好了MyODBC, 就可以在ODBC数据源管理中配置一个数据源名称,把它指向你想连接的MySQL数据库。代码如下:Sub connectMySQL() '通过MyODBC去连接MySQL数据库,并将Microsoft SQL Server 7 '的数据转进mysql中 Dim sConnect As String, sSql As String, i As Long Dim cnMSSQL As New ADODB.Connection Dim cnMySQL As New ADODB.Connection '声明并创建对象 连接 Dim rs As New ADODB.Recordset '声明并创建对象 记录集 Dim cm As New ADODB.Command '声明并创建对象 命令 sConnect = "dsn=mysql1" '指定MySQL的数据源名称 cnMySQL.Open sConnect '连接到 mysql sConnect="Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;pwd=123456;Initial Catalog=softdown;Data Source=ntserver" '连接到 ms sql server 7 cnMSSQL.Open sConnect 'sSql = "create table softinfo (softNum smallint,softname varchar(70),softdesc blob," & _ "softpath varchar(30),softleng varchar(10),softclass varchar(10),softsugest tinyint(1)," & _ "softdown smallint(4))" '创建新的MySQL数据表语句 sSql = "select * from softinfo order by softnum" rs.Open sSql, cnMSSQL, 1, 1 While Not rs.EOF sSql = "insert into softinfo values (" & Trim(rs(0).Value) & ",'" & Trim(rs(1).Value) & _ "','" & Trim(rs(2).Value) & "','" & Trim(rs(3).Value) & "','" & Trim(rs(4).Value) & _ "','" & Trim(rs(5).Value) & "'," & Trim(rs(6).Value) & "," & Trim(rs(7).Value) & ")" cm.ActiveConnection = cnMySQL cm.CommandType = adCmdText cm.CommandText = sSql cm.Execute rs.MoveNext Wend rs.Close Set rs = Nothing cnMySQL.Close Set cnMySQL = Nothing cnMSSQL.Close Set cnMSSQL = Nothing End Sub
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
蚂蚁泡酒适合哪些人喝 蚂蚁酒的功效与禁忌蚂蚁酒的功效与作用 热血无赖卡怎么办 了解这两方面内容 益生菌孕妇 孕妇能喝益生菌吗 羽毛球双打底线是内线还是外线 为什么泰国两位尊者有不死之身 秦始皇活了多少岁?当了几年皇帝? DELL电脑D630.PP18L2手机。才用了4个多月。多少钱我可以买呢,麻烦谁说... dellpp18l现在买多少钱 2k22罗斯几个徽章 vc6.0中没有ADO控件,怎么添加? 如何将磁带中的声音高清晰地录制到电脑里去? 2k22mc徽章点不够用 VB中ADO控件怎么用日期进行查询啊? 2k22mc如何获得训练狂徽章 求解,算24点,7 10 10 10,怎么算出24? 2k22徽章可以买吗 VB中ADO控件怎么设置相对路径 哪个软件录的视频最清晰 2k22徽章有的球员不能用 VB6.0中没有ADO控件该如何办??? 高清录播系统的发展优势有哪些? 轿车可以在外地年审吗 ADO对象与ADO控件是什么关系? ADO对象模型主要包括哪些对象? VB中使用ADO控件,引用数据库中的不同表,怎么写? 怎样录视频最清晰? 25710算24点怎么算式 vb 中ado控件如何使用 2k22徽章点不动 VB ACCESS 如何设置ADO控件? NB2K22为什么只能升级两个终结徽章 ADO控件怎么在VB界面中添加 vb2010如何在工具箱中添加ado控件 新车有异味怎么去除? VB6.0的部件中没有ADO控件,有会的么?告诉我怎么回事 新车里的异味怎么清除? Visual C++6.0在添加ADO控件时出现Microsoft ADO Data Control,version 6.0(OLEDB)不支持此接口是怎么回事 石榴的别称 石榴又叫什么? 石榴有什么别称 在古代称石榴什么??? 土豆丝的炒法,第几步干什么。 百度新产品度秘 度秘是什么能做什么 度秘的度秘将无处不在 百度度秘在两会过后还能即时看新闻资讯吗 胃胀打嗝 怎么解决 度秘app,为什么我已经登陆了?度秘,为什么却提示没有登陆? 我怎么和度秘聊天呢? 欧兰特电子晾衣架怎么和它对话