⑴ 如何把Excel数据转化成sql语句
前者是数据,后者是程序,如果将数据都写进程序,效率太低了。
你的本意估计是需要将excel数据导入sql数据库
1、在excel中编写代码,循环将数据写入sql数据库
2、从sql数据库中,编写代码将excel数据导入数据库
3、借助第三方软件,将excel数据写入sql数据库
⑵ 如何把Excel资料转化成SQL语句
如何把Excel资料转化成SQL语句
1、开启企业管理器,开启缓毕纤要汇入资料的资料库,在表上按右键,所有任务-->汇入资料,弹出DTS汇入/汇出向导,按 下一步 , 2、选择资料来源 Microsoft Excel 97-2000,档名 选择要汇入的xls档案,按 下一步 , 3、选择目的 用于SQL Server 的Micro...
前者是资料,后者是程式,如果将资料都写程序序,效率太低了。
你的本意估计是需要将excel资料汇入sql资料库
1、在excel中编写程式码,回圈将资料写入sql资料库
2、从sql资料库中,编写程式码将excel资料汇入资料库
3、借助第三方软体,将excel资料写入sql资料库
:jingyan../article/cdddd41c92924d53cb00e189.
1、在你的excel表格中增加一列
2、在第一行的D列,就是D1中输入公式: =CONCATENATE("INSERT INTO PERSONS_SERIAL_NUMBER(PERSONS_NO, PERSONS_NAME,ID_NUMBER) VALUES('" & B1 & "', '" & C1 & "', '" & E1 & "');")
3、此时D1已经生成了如下的sql语句: INSERT INTO PERSONS_SERIAL_NUMBER(PERSONS_NO, PERSONS_NAME,ID_NUMBER) VALUES('xxxxx', 'xxxx, 'xxxxxxxxxx');
4、将D1的公式复制到所有行的D列,方法是:把资料放在单元格最右下角,当鼠标变成十字形时,往下拖到最后一行放开就会自动复制,动态改变values里面的引数
5、此时D列已经生成了所有的sql语句
6、把D列复制到一个纯文字档案中,推荐使用UltraEdit进行处理。
如何把mysql某些资料转化成sql
SQL SERVER有一个自带的汇入汇出工具,你可以用它来把SQL SERVER的资数搜料汇入到MYSQL。
如果无法执行的话,可以自己编写程式,将SQL SERVER的资料按照MYSQL中你建设的表的栏位标准来汇出,然后再汇入到MYSQL。
如何把SQL资料档案转化成ACCESS资料
sql企业管理器里面有一个数据汇入汇出
你可以把表直接汇出excel档案的
如何把word做的一些资料转化成EXCEL
直接复制就自动分好单元格了。 直接扰仿复制啊。 我楼下的朋友(zjgwenqi - 助理 二级)方法可行,我的方法删掉了。 ,lCXXtZ
如何将一张资料库表中的资料汇出或转化成sql语句
sql
方法/步骤
很多时候我们在生产资料库上面只能进行简单的查询,是不能增删查改的。但是又想使用真实的资料。
如果用plsql develop是可以实现将资料汇出成insert语句的。但是汇出之后是全部的列都会出现在insert语句里面。
3
遇到一些空值,日期之类的还要处理一下才行,而且有很多列是自己不需要的。
4
这个时候就需要用sql来构造insert语句了。他是比较自由和灵活的,可控制性比较强。
如何把shibor 日资料转化成月资料
请在日期后插入一列,如C列,在C1输入公式: =TEXT(A1,"yyyy-mm") 将日期转换为年月的文字,下拉复制; 再进行资料透视表按这年月作透视,将气温汇总除以气温计数即可得出平均值。 或请你将原表作附件上传,帮你做一下
如何将SQLite DB档案转化成带插入的sql语句
找到由SQLServer转换的SQLite DB档案(可参考我的以前的经验:SQLServer资料库表汇出SQLite DB档案方法),
下载动软程式码生成工具并安装,按照成功后到所有程式可以检视到
执行动软程式码生成工具进入到主接口。
点选左上角的新增服务器注册,弹出资料库型别窗体。选择SQLLite,点选下一步。如下图:
接下来会弹出选择SQLite资料库窗体,在资料库档案文字框输入本地SQLite db档案路径,点选确定(。系统会提示关闭软体从新开启。
重新开启动软程式码生成工具后,到左边服务器可以看见那你的SQLite资料库
选择一张表,右键选择生成资料脚步(。会弹出一个提示:“如果该表资料量较大…”,直接选择“是”(,点选“是”后右边出现生成的sql语句,包含新增语句和插入资料的语句。储存档案即可。
⑶ 在Excel里用宏实现自动生成sql语句的问题
分类: 电脑/网络猜悔 >> 程序设计 >>毁核 其他编程语言
问题描述:
请看我的Bolg里有图片描述,一目了然.blog.sina/u/***********即点击按钮生成5条insert语句,用分号阁开.
知道思路的说下思路,知纤兆掘道细节的最好说详细点啦,先谢谢!
解析:
Const MAX_NUM_ROW = 5000
Const PATH_OUTPUT_ROW = 1
Const PATH_OUTPUT_COL = 2
Const FILE_OUTPUT_ROW = 2
Const FILE_OUTPUT_COL = 2
'Template Info
Const ENTRP_CDE_COL = 1
Const RPT_TMPLT_ID_COL = 2
Const RPT_FMT_TYP_COL = 3
Const FNCTN_ID_COL = 4
Const TMPLT_PATH_COL = 5
Const BNDL_PATH_COL = 6
Const RPT_NAM_GEN_CLASS_COL = 7
Const RPT_DATASOURCE_CLASS_COL = 8
Const ACK_RPT_TMPLT_ID_COL = 9
Const REC_VER_NUM_COL = 10
Const INIT_TIME_COL = 11
Const LAST_UPD_TIME_COL = 12
Const LAST_UPD_BY_COL = 13
Const START_ROW = 5
Private Type Tmplt
ENTRP_CDE As String
RPT_TMPLT_ID As String
RPT_FMT_TYP As String
FNCTN_ID As String
TMPLT_PATH As String
BNDL_PATH As String
RPT_NAM_GEN_CLASS As String
RPT_DATASOURCE_CLASS As String
ACK_RPT_TMPLT_ID As String
REC_VER_NUM As String
INIT_TIME As String
LAST_UPD_TIME As String
LAST_UPD_BY As String
End Type
Dim noOfTmplts As Integer
Dim TmpltArray(MAX_NUM_ROW) As Tmplt
Private Sub CommandButton1_Click()
generateSQL
End Sub
Private Sub generateSQL()
makedir
initData
writeToFile
End Sub
Private Sub makedir()
On Error Resume Next
'Make Directory
MkDir Sheet18.Cells(PATH_OUTPUT_ROW, PATH_OUTPUT_COL)
End Sub
Private Sub initData()
Erase TmpltArray
'Erase TmpltRoleArray
'noOfUserRoles = 0
noOfTmplts = 0
Dim j As Integer
'Lookup all fields
For j = START_ROW To MAX_NUM_ROW
If Sheet18.Cells(j, RPT_TMPLT_ID_COL) = "" Then
Exit For
End If
'Set Template
TmpltArray(noOfTmplts).ENTRP_CDE = Sheet18.Cells(j, ENTRP_CDE_COL)
TmpltArray(noOfTmplts).RPT_TMPLT_ID = Sheet18.Cells(j, RPT_TMPLT_ID_COL)
TmpltArray(noOfTmplts).RPT_FMT_TYP = Sheet18.Cells(j, RPT_FMT_TYP_COL)
TmpltArray(noOfTmplts).FNCTN_ID = Sheet18.Cells(j, FNCTN_ID_COL)
TmpltArray(noOfTmplts).TMPLT_PATH = Sheet18.Cells(j, TMPLT_PATH_COL)
TmpltArray(noOfTmplts).BNDL_PATH = Sheet18.Cells(j, BNDL_PATH_COL)
TmpltArray(noOfTmplts).RPT_NAM_GEN_CLASS = Sheet18.Cells(j, RPT_NAM_GEN_CLASS_COL)
TmpltArray(noOfTmplts).RPT_DATASOURCE_CLASS = Sheet18.Cells(j, RPT_DATASOURCE_CLASS_COL)
TmpltArray(noOfTmplts).ACK_RPT_TMPLT_ID = Sheet18.Cells(j, ACK_RPT_TMPLT_ID_COL)
TmpltArray(noOfTmplts).REC_VER_NUM = Sheet18.Cells(j, REC_VER_NUM_COL)
TmpltArray(noOfTmplts).INIT_TIME = Sheet18.Cells(j, INIT_TIME_COL)
TmpltArray(noOfTmplts).LAST_UPD_TIME = Sheet18.Cells(j, LAST_UPD_TIME_COL)
TmpltArray(noOfTmplts).LAST_UPD_BY = Sheet18.Cells(j, LAST_UPD_BY_COL)
noOfTmplts = noOfTmplts + 1
Next
End Sub
Private Sub writeToFile()
Dim lvOutputPath As String
lvOutputPath = Sheet18.Cells(PATH_OUTPUT_ROW, PATH_OUTPUT_COL) & "\" & Sheet18.Cells(FILE_OUTPUT_ROW, FILE_OUTPUT_COL)
If lvOutputPath = "" Then
MsgBox "File Output Path Missing!"
Exit Sub
End If
fileNum = FreeFile
' Open Output Path
Open lvOutputPath For Output As fileNum
Dim lvUserSql As String
For j = 0 To noOfTmplts - 1
lvUserSql = "INSERT INTO RS_RPT_TMPLT(ENTRP_CDE,RPT_TMPLT_ID,RPT_FMT_TYP,FNCTN_ID,TMPLT_PATH,BNDL_PATH,RPT_NAM_GEN_CLASS,RPT_DATASOURCE_CLASS,ACK_RPT_TMPLT_ID,REC_VER_NUM,INIT_TIME,LAST_UPD_TIME,LAST_UPD_BY) " & _
"values('TF','" & TmpltArray(j).RPT_TMPLT_ID & "','" & TmpltArray(j).RPT_FMT_TYP & "','" & TmpltArray(j).FNCTN_ID & "','" & TmpltArray(j).TMPLT_PATH & "','" & TmpltArray(j).BNDL_PATH & "','" & _
TmpltArray(j).RPT_NAM_GEN_CLASS & "','" & TmpltArray(j).RPT_DATASOURCE_CLASS & "','" & TmpltArray(j).ACK_RPT_TMPLT_ID & "'," & TmpltArray(j).REC_VER_NUM & "," & TmpltArray(j).INIT_TIME & "," & TmpltArray(j).LAST_UPD_TIME & ",'" & TmpltArray(j).LAST_UPD_BY & "');"
Print #fileNum, lvUserSql
Next
Close fileNum
MsgBox "Finished"
Exit Sub
Err_Open_File:
Close lvFileNum
If Err.Number = 76 Then
'Path Not Found
MsgBox Err.Description
Exit Sub
Else
MsgBox Err.Description
Exit Sub
End If
End Sub
⑷ Excel转换为SQL语句 问题
1、例如我想把图1的数据给添加到图2的数据库中;
⑸ excel2010怎样生成sql语句
自己写吧,很简单的
Set conn = CreateObject("adodb.connection")
conn.Open "provider=microsoft.jet.oledb.4.0;extended properties=excel 8.0;data source=" & ThisWorkbook.FullName
Sql = "select top 3 * from [sheet1$A2:D]"
[H3].CopyFromRecordset conn.Execute(Sql)
conn.Close: Set conn = Nothing
⑹ 在excel里sql语句怎么写
OPENROWSET('Microsoft.Jet.OLEDB.4.0','Excel 8.0;HDR=YES;DataBase="+Path +"';'':'','select * from [Sheet1$]')";
string sql = " SELECT * FROM OPENROWSET('Microsoft.Jet.OLEDB.4.0','Excel 8.0;HDR=YES;DataBase=" + Path + "',Sheet1$)";
⑺ 如何将Excel数据转换为SQL脚本
1、把乎绝Excel通过DTS包导入到数据库中,再通过软件生成Sql脚本型腊(另存为sql)。
2、通过Excel中的公式来生成Sql语句。
可以借助很多卜顷滑其它工具,数据库查询工具,UE等。
⑻ 如何把Excel数据转化成SQL语句
1、例如我想把图1的数据给添加到图2的数据库中;
⑼ EXCEL转换SQL语句
insert into T_GF_ORG
(GID,是否确认,是否拼团,是否秒杀,缩略图,商品编号,商品货号,条形码,库存,售价,重量,运费,销量,浏览量,评论量,添加时间,更新时间,状态,推荐,排序,所属栏目)
values ('1','','0',0,外径*粗细为
5*1.9的优质NBR丁青黑色O型圈z,/ow-content/uploads/nbrorings.jpg',S0000001',S0000001',',1000000',.03',0
kg',固定',0',2',0',43928.6042708333',43936.4357407407',',',1',丁晴O型圈);
同时可以利用excel公式直接写出来:
=CONCATENATE("insert into T_GF_ORG (GID,是否确认,是否拼团,是否秒杀,缩略图,商品编号,商品货号,条形码,库存,售价,重量,运费,销量,浏览量,评论量,添加时间,更新时间,状态,推荐,排序,所属栏目)
values ('",A2,"','",B2,"','",C2,"',",D2,",",E2,",",F2,"',",G2,"',",H2,"',",I2,"',",J2,"',",K2,"',",L2,"',",M2,"',",N2,"',",2,"',",P2,"',",Q2,"',",R2,"',",S2,"',",T2,"',",U2,"',",V2,");")