发一篇怎样将Access和Excel导进到Mysql中之三
能够以较低的成本向客户提供IT所有权，当节约成本成为客户最高优先级时，解决方案提供商可以向更多的客户同时提供服务。虽然有许多来自RDBMS固有的局限性。二。导库的VB程序这个工程要利用一些工具库，在数据库会见方面，决意利用ADO（ActiveXDataObjects），关于利用过asp的人，这个名字应当十分熟习了，实践上，它在VB中的使用也是几近一样的，因为要操纵Excel，还要援用一个扩大的工具库。点菜单中的“工程”---“援用”，选择“MicrosoftActiveXDataObjects2.6Library”和“MicrosoftExcel9.0ObjectLibrary”，在援用列表中，可援用工具库的版本也许有所分歧，选择相似的最新版本就能够了。要利用对话框和进度条，还要援用一些部件，点菜单中的“工程”--“部件”，选择“MicrosoftCommonDialogControl6.0（SP3）”和“MicrosoftWindowsCommonControls6.0（SP3）”。
界面如图一所示
</IMG>
图中各数字暗示的控件分离是：
1-3：3个均为TextBox控件，名字分离为mdbfilename，mdbpassWord，xlsfilename，mdbfilename用来唆使导进access文件的路径和文件名，mdbpassword用来输出Access文件的暗码，xlsfilename用来唆使导进Excel文件的路径和文件名；
4：称号为select_mdbfile，CommandButton控件，用来选择要导进的Access文件；
5：称号为importMDB，CommandButton控件，选择好文件后，用该按钮导进MDB文件
6:称号为CommonDialog1，CommonDialog控件
7:称号为select_xlsfile，CommandButton控件，用来选择要导进的Excel文件；
8:称号为importXLS，CommandButton控件，选择好文件后，用该按钮导进XLS文件；
9:称号为CommonDialog2，CommonDialog控件
10:称号为PRgBar1，进度条（ProgressBar），当要导进良多纪录时，利用进度条能够唆使以后的导进进度
11:称号为StatusBar1，形态条（StatusBar），唆使导进的停顿形态，包含“正在导进”，“导进完成”等。
要将Style设置为“1-sbrSimple”
在程序的头部作以下声明
OptionExplicit
DimCnAsNewADODB.Connection
DimCnMySQLAsNewADODB.Connection
DimRsAsNewADODB.Recordset
DimRsmysqlAsNewADODB.Recordset
Functionreplace_str(srcstrAsString)
srcstr=Replace(srcstr,"","")
replace_str=Replace(srcstr,"","")
EndFunction
双击form，在装载form时输出以下的代码
PrivateSubForm_Load()
将进度条设置为不成见
prgBar1.Visible=False
毗连mysql数据库,pwd为数据库的暗码，uid为用户名，dsn为数据源的称号
Cnmysql.ConnectionString="uid=root;pwd=;dsn=build"
Cnmysql.Open
EndSub
珍贵的资金可以用于其他业务的启动，诸如市场、广告或调研和开发等。 以前的DTS轻盈简单。但是现在的SSIS虽然功能强大了很多，但是总是让人感觉太麻烦。看看论坛中询问SSIS的贴子就知道。做的功能太强大了，往往会有很多用户不会用了 需要注意的一点，也是我使用过程中发现的一个问题。在建立function->schema->table后，如果在现有的分区表上建立没有显式声明的聚集索引时，分区表会自动变为非分区表。这一点很让我纳闷。 SQLServer的异构移植功能个人感觉最好了。（如果对比过SQLServer的链接服务器和Oracle的透明网关的朋友会发现SQLServer的sp_addlinkedserver(openquery)异构数据库系列比Oracle真是强太多了。） 外键的级联更能扩展可能大部分的同行在设计OLTP系统的时候都不愿意建立外键，都是通过程序来控制父子数据的完整性。 总感觉自己还是不会SQL SP4是一个累积性的ServicePack，包含自以前的ServicePack发布以来所有的修补程序（包括MS03-031安全公告）。 其中最有名的应该是row_number了。这个终于解决了用临时表生成序列号的历史，而且SQLServer2005的row_number比Oracle的更先进。因为它把Orderby集成到了一起，不用像Oracle那样还要用子查询进行封装。 备份方面可能还是一个老大难的问题。不能单独备份几个表总是感觉不爽。灵活备份的问题不知道什么时候才能解决。 以前的DTS轻盈简单。但是现在的SSIS虽然功能强大了很多，但是总是让人感觉太麻烦。看看论坛中询问SSIS的贴子就知道。做的功能太强大了，往往会有很多用户不会用了
页:
[1]