1. 首页

excel连接sql数据库连接字符串

excel连接sql数据库

excel连接sql数据库

excel连接sql数据库

1. 在excel中怎么连接mysql数据库

①MySqlforExcel——mysql的Excel插件

MySql数据库专门为Excel准备了一个数据操作插件,可以方便地对数据进行导入导出扩展和编辑。本插件安装后,在Excel的“数据”菜单会出现一个如下所示的菜单项,第一次点击它需要对mysql数据库访问用户名、密码及数据库名称等做一个设定,以后就可以随时读取和操作数据库中的数据了。如果安装完后没有出现在Excel菜单,则可能需要到com加载项中去勾选一下。这种方法也是最简单的一种连接方法,近乎于傻瓜式链接。

②MSQuery链接

MSQuery链接需要先安装mysqlODBC驱动。驱动安装完成后,先要到windows控制面板—管理工具——“ODBC数据源”中进行用户或系统数据源(DSN)设置。

点击“添加”,在弹出的驱动列表中,选择MySqlODBC驱动,然后点击“完成”。

这时会弹出一个对话框,让你配置mysql数据源的一些参数:数据源名称——随便,描述——随便,TCP/IP服务器——如果在本机就是localhost:3306,如果不是则需正确输入你的mysql账户的IP地址及端口,下面就是用户名、密码以及你要访问的数据库名称。一切配置完毕后可以点击Test进行测试,测试连接成功后,你会看到mysql数据源已经添加到用户数据源列表。

接下来,我们打开MSQuery,这时新添加的数据源已经出现在了数据库列表中,我们只需选中mysql数据源,点击确定,就可以对数据库中表和字段进行查询操作了。

③PowerQuery链接

PowerQuery支持当今市场上所有主流数据库的直连,mysql当然也不在话下。由于前面已经设置过了数据源驱动,因此这里相对也就很简单。打开PowerQuery—获取外部数据—来自数据库—来自mysql数据库。

2. excel连接sql数据库的语句

With Sheet1.QueryTables("Query1")

.Connection = "ODBC;DRIVER=SQL Server;SERVER=local;UID=sa;PWD=sa;DATABASE=mydb;LANGUAGE=简体中文;"

.CommandText = "select * from table1"

.BackgroundQuery = False

.Refresh

End With

3. 如何在excel表格中读取sql数据库数据

1、打开企业管理器,打开要导入数据的数据库,在表上按右键,所有任务-->;导入数据,弹出DTS导入/导出向导,按 下一步 ,

2、选择数据源 Microsoft Excel 97-2000,文件名 选择要导入的xls文件,按 下一步 ,

3、选择目的 用于SQL Server 的Microsoft OLE DB提供程序,服务器选择本地(如果是本地数据库的话,如 VVV),使用SQL Server身份验证,用户名sa,密码为空,数据库选择要导入数据的数据库(如 client),按 下一步 ,

4、选择 用一条查询指定要传输的数据,按 下一步 ,

5、按 查询生成器,在源表列表中,有要导入的xls文件的列,将各列加入到右边的 选中的列 列表中,这一步一定要注意,加入列的顺序一定要与数据库中字段定义的顺序相同,否则将会出错,按 下一步 ,

6、选择要对数据进行排列的顺序,在这一步中选择的列就是在查询语句中 order by 后面所跟的列,按 下一步 ,

7、如果要全部导入,则选择 全部行,按 下一步,

8、则会看到根据前面的操作生成的查询语句,确认无误后,按 下一步,

9、会看到 表/工作表/Excel命名区域 列表,在 目的 列,选择要导入数据的那个表,按 下一步,

10、选择 立即运行,按 下一步,

11、会看到整个操作的摘要,按 完成 即可。

当然,在以上各个步骤中,有的步骤可以有多种选择,你可以根据自己的需要来选择相应的选项。例如,对编程有兴趣的朋友可以在第10步的时候选择保存DTS包,保存成Visual Basic文件,可以看看里面的代码,提高自己的编程水平

4. Excel VBA 连接SQL数据库后的操作

呵呵,以前就帮人家解决过这个,请看下面的代码,有注释的!

Private Sub CommandButton5_Click()

Dim Conn As New ADODB.Connection '定义ADODB连接对象

Dim ConnStr As String '定义连接字符串

Dim xiao As String

xiao = ComData.Text

'对于SQL 2008,如果以IP方式访问服务器,必须要启动SQL Server Browser服务,如果是Express版本,要以“IP(计算机名)\实例名”方式访问

ConnStr = txtData.Text

Dim Records As New ADODB.Recordset '定义ADODB对象的记录集

Dim Sheet As Worksheet '定义工作表

Set Sheet = ThisWorkbook.Worksheets("Sheet2") '给变量Sheet赋值,注意:是工作簿中索引为1的那个表(通常一个新的工作簿Sheet1的索引为1)

'Sheet.Name = "Data" '把Sheet名称改为Data

Sheet.Cells.Clear '清空表中原有的数据

'连接状态是打开就不在进行Open操作

Conn.Open ConnStr

Dim SQLStr As String '要执行的SQL语句

SQLStr = "select * from Shift_Code where Club='" + xiao + "'" '可以执行更复杂的SQL语句

Records.Open SQLStr, Conn, adOpenStatic, adLockBatchOptimistic '读取SQL查询结果到Records记录集

'Records.Open

Dim i, j, TotalRows, TotalColumns As Integer

j = 0

TotalRows = Records.RecordCount

TotalColumns = Records.Fields.Count

'下面的循环把表头(即列名)写到Excel表的第一行

For i = 0 To TotalColumns - 1

Sheet2.Cells(1, i + 1) = Records.Fields(i).Name

Next

'下面的循环把查询结果写到Excel表中

Do While Not Records.EOF

For i = 0 To TotalColumns - 1

Sheet2.Cells(j + 2, i + 1) = Records.Fields(i).Value

Next

Records.MoveNext

j = j + 1

Loop

Records.Close '关闭记录集

Conn.Close '关闭连接

Set Records = Nothing '清空对象

Set Conn = Nothing '清空对象

End Sub

有什么不懂的话Hi我!

5. 请问:用Excel如何连接SQL数据库

将Excel中的数据导入到Access中,前提是在Access中的表已经建好。

dim conn

dim conn2

set conn=CreateObject("ADODB.Connection")

conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database PassWord=;Data Source=c:\book1.mdb"

set conn2=CreateObject("ADODB.Connection")

conn2.Open "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=;Extended properties=Excel 5.0;Data Source=c:\book1.xls"

sql = "SELECT * FROM [Sheet1$]"

set rs = conn2.execute(sql)

while not rs.eof

sql = "insert into xxx([a],[b],[c],[d]) values('"& fixsql(rs(0)) &"','"& fixsql(rs(1)) &"','"& fixsql(rs(2)) &"','"& fixsql(rs(3)) &"')"

conn.execute(sql)

rs.movenext

wend

conn.close

set conn = nothing

conn2.close

set conn2 = nothing

function fixsql(str)

dim newstr

newstr = str

if isnull(newstr) then

newstr = ""

else

newstr = replace(newstr,"'","''")

end if

fixsql = newstr

end function

导入到Sql Server数据库中时,如果Excel文件和数据库不在同一台服务器上时,请参考上面的代码。在同一机器上可以参考下面代码(不需要先把表建表,程序会自己动建表,用Excel中的第一行数据做为表的字段名):

dim conn

set conn=CreateObject("ADODB.Connection")

conn.Open ("driver={SQL Server};server=localhost;uid=sa;pwd=sa;database=hwtemp;")

sql = "SELECT * into newtable FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0','Data Source=""c:\book1.xls"";User ID=Admin;Password=;Extended properties=Excel 5.0')。[Sheet1$] "

conn.execute(sql)

conn.close

set conn = nothing

6. Excel表中连接sql并使用sql语句引用excel单元格数据作为查询条件

select count(*) as expr1

from sql表

where (DLY='ABC') and (rq >= ?) and (rq

1、将两个日期的地方改为 ? ,然后exel会提示你输入参数的值,

2、在 Microsoft Qyery中,点视图--参数,给两个参数命名。

3、返回到Excel,在表格区域点右键--表格--参数,弹出查询参数对话框。

4、给每个参数指定单元格,根据需要勾选 单元格值更改时自动刷新。

7. 怎样将EXCEL数据表导入到SQL中

在Excel中录入好数据以后,可能会有导入数据库的需求,这个时候就需要利用一些技巧导入。

如何将excel表导入数据库的方法:

1、对于把大量数据存放到数据库中,最好是用图形化数据库管理工具,可是如果没有了工具,只能执行命令的话这会是很费时间的事。那只能对数据进行组合,把数据组成insert语句然后在命令行中批量直行即可。

2、对下面数据进行组合,这用到excel中的一个功能。

在excel中有个fx的输入框,在这里把组好的字符串填上去就好了。

注:字符串1 & A2 &字符串2 & 。

A2可以直接输入,也可以用鼠标点对应的单元格。

3、每个字符串之间用 & 符号进行连接。下面是第一条连接字符串

="insert into tavern values('"&A2&"','"&B2&"','"&C2&"','"&D2&"');"

写好后按回车键Enter就能组合出对应的字符串了。

insert into tavern values('jw_agi','曙光','0','1');

4、组好第一行的字符串后,把鼠标放到单元格右下方,出现加粗的十字,单击按下(别松开),一直往下拉,直到最后一行再放开就行了。

5、这样就把insert语句都整理好了,接下来就是把这些语句批量执行就可以了。

本文来自投稿,不代表本站立场,如若转载,请注明出处。