资源描述:
《如何在delphi中将excel中的数据导入到sql数据库》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、var s1:string;begin screen.Cursor:=crSQLWait; s1:='insertintotable_bus'+ '(BS_NO,BS_TYPE,bs_whos,bs_mode,bs_seat,bs_soalseat,bs_drseat,bs_oiltype,bs_buycard,bs_unit,BS_BDATE,bs_edate)'+ 'SELECT车号,dbo.uf_GetFullNameCode(车型名称),dbo.uf_GetFullNameCode(所属单位),dbo.uf_GetFullName
2、Code(厂牌型号),核定座位,售票座位,驾驶室前排座位,dbo.uf_GetFullNameCode(燃料名称),购置证号,本外单位,启用日期,dbo.uf_ConvertNullDate(终止时间)'+ 'FROMOpenDataSource(''Microsoft.Jet.OLEDB.4.0'',''DataSource="'+trim(LabeledEdit1.text)+'";ExtendedProperties=Excel8.0;PersistSecurityInfo=False'')...[Sheet1$]'+ 'where
3、车号notin(selectbs_nofromtable_bus)'; try DataModule1.ADOConnection1.Execute(s1); finally screen.Cursor:=crArrow; end;end; EXCEL是可以当成一种数据源来处理的。 Str:='Provider=Microsoft.Jet.OLEDB.4.0;DataSource='+文件路径+ ';ExtendedProperties=Excel8.0;PersistSecurityInfo=False';然后每列相当于一字段 熟悉SQL
4、SERVER2000的数据库管理员都知道,其DTS可以进行数据的导入导出,其实,我们也可以使用Transact-SQL语句进行导入导出操作。在Transact-SQL语句中,我们主要使用OpenDataSource函数、OPENROWSET函数,关于函数的详细说明,请参考SQL联机帮助。利用下述方法,可以十分容易地实现SQLSERVER、ACCESS、EXCEL数据转换,详细说明如下:一、SQLSERVER和ACCESS的数据导入导出常规的数据导入导出:使用DTS向导迁移你的Access数据到SQLServer,你可以使用这些步骤: ○1在SQ
5、LSERVER企业管理器中的Tools(工具)菜单上,选择DataTransformation ○2Services(数据转换服务),然后选择czdImportData(导入数据)。 ○3在ChooseaDataSource(选择数据源)对话框中选择MicrosoftAccessastheSource,然后键入你的.mdb数据库(.mdb文件扩展名)的文件名或通过浏览寻找该文件。 ○4在ChooseaDestination(选择目标)对话框中,选择MicrosoftOLE DBProviderforSQL Server,选择数据库服务器,然
6、后单击必要的验证方式。 ○5在SpecifyTableCopy(指定表格复制)或Query(查询)对话框中,单击Copytables(复制表格)。○6在SelectSourceTables(选择源表格)对话框中,单击SelectAll(全部选定)。下一步,完成。Transact-SQL语句进行导入导出:1.在SQLSERVER里查询access数据:SELECT*FROMOpenDataSource('Microsoft.Jet.OLEDB.4.0','DataSource="c:DB.mdb";UserID=Admin;Password='
7、)...表名2.将access导入SQLserver在SQLSERVER里运行:SELECT*INTOnewtableFROMOPENDATASOURCE('Microsoft.Jet.OLEDB.4.0','DataSource="c:DB.mdb";UserID=Admin;Password=')...表名3.将SQLSERVER表里的数据插入到Access表中在SQLSERVER里运行:insertintoOpenDataSource('Microsoft.Jet.OLEDB.4.0','DataSource="c:DB.mdb";Us
8、erID=Admin;Password=')...表名(列名1,列名2)select列名1,列名2fromsql表实例:insertin