Microsoft SQL Server 7.0 的数据迁移到MySQL上的一种方法(转)


t; & 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这个巨人的肩膀上!


 

    转载 奥索
Copyright © 2008 chengduxinxi.com All Rights Reserved PHP编程开发 由朝夕网络维护