|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
人们常说“成功孕育成功”,这种说法明显非常适合MySQL的情况。MySQL学习教程这个开源数据库号称在全世界有超过110万份的完全安装。Microsoft SQL Server 7.0 的数据迁徙到MySQL上的办法
Zhbforce
想必人人都很喜好用Word打字,用Excel停止盘算和计划,用Powerpoint作幻灯片停止展现…,然而这只用到了Office系列产物的很少的一局部功效。据查询拜访,绝大局部用户只用到了Office产物的20%的功效,很少有人注重到Visual Basic for application。实践上,熟习把握VBA的功效可使你的任务事半功倍,特别对管帐、金融等专业来讲,作出一套好的宏,几近可以作到与日俱增!比来,AutoCAD中也到场了VBA的功效,这不克不及不说这是一个趋向!
VBA的功效决不只是让病毒制作者用来制作费事的,VBA能被用来制作病毒的同时也正申明了其功效的壮大与易用!使用ADO对象,可以很便利的停止数据库操作!上面就是一个复杂的数据互换的例子:
因为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
好了,想必人人对VBA有所懂得了,一样,假如要在任务表中援用MySQL中的数据也是一样的复杂,一旦宏作好了,想生成报表的话,用户要作的任务只是点一下鼠标就好了,使用Excel停止二次开辟,效力可以超越任何用户自行开辟的报表体系,由于咱们站在Microsoft这个伟人的肩膀上!
这些过程被存储和运行在数据库服务器上,以减少在客户端的处理过程,从而最大限度地提高了处理能力,因为通常情况下数据库服务器会运行地更快。存储过程并不是MySQL独有的功能,但是这个最近新增加的功能使得这个数据库比以前更具吸引力了。 |
|