说明 ：EXCEL VBA连接SQL数据库一般有以下3个步骤：

1.VBA连接数据库之前需要创建连接对象：可以采用以下方式
   `Dim CN As Object    
    Set CN = CreateObject("ADODB.Connection")

也可以通过添加引用的方式，具体为：工具-----引用-------找到Microsoft ActiveX Data Objets Library的最高版本打勾即引用成功，如下图所示：



然后一步到位：Dim CN as New ADODB.Connection

2.创建完对象之后就是最关键也是最主要的就是连接数据库的字符串的拼接了，连接数据库的字符串有两种方式，本地连接和远程IP连接；

本地连接的字符串为：strCn = "Provider=sqloledb;Server=本地数据库的名称;Database=数据库名;Integrated Security=SSPI;Persist Security Info=False;"其中Integrated Security=SSPI非常重要，不能缺少，具体含义可以自行百度；

远程IP连接的字符串为：strCn = "Provider=sqloledb;Data Source=远程数据库的IP地址;Initial Catalog=数据库名;User ID=登陆名;Password=密码;Persist Security Info=False;"相对来说比较简单，只要数据库的远程配置可以访问即可；

3.当数据库连接好之后就是读取数据了，将数据读取出来有两种方式，

一种是通过For循环的方式，一种是通过将记录集的内容copy到单元格中即Range("A2").CopyFromRecordset rs的方式 ，一般都比较固定。

整个代码如下：
Dim CN As Object    '定义数据链接对象 ，保存连接数据库信息
Dim rs As Object    '定义记录集对象，保存数据表

Set CN = CreateObject("ADODB.Connection")  '创建数据链接对象
Set rs = CreateObject("ADODB.RecordSet")  '创建记录集对象，用于接收数据查询获得的结果集

Dim strCn As String, strSQL As String '链接数据库的字符串变量
'定义本地数据库链接字符串
strCn = "Provider=sqloledb;Server=本地数据库的名称;Database=数据库名;Integrated Security=SSPI;Persist Security Info=False;"

'定义远程数据库链接字符串
strCn = "Provider=sqloledb;Data Source=远程数据库的IP地址;Initial Catalog=数据库名;User ID=登陆名;Password=密码;Persist Security Info=False;"

strSQL = "select * from TUTORIALS_TBL"    '设置SQL语句
CN.Open strCn '打开连接
rs.Open strSQL, CN                               '读取数据库中的数据

Dim i As Integer, sht As Worksheet  'i,j为整数变量；sht 为excel工作表对象变量，指向某一工作表
i = 1 
Set sht = ThisWorkbook.Worksheets("sheet1")
'循环读取数据并将数据显示到excel中
For j = 0 To rs.Fields.Count - 1
 sht.Cells(1, j + 1).Value = rs.Fields(j).Name
Next j
Range("A2").CopyFromRecordset rs
~~~
'Do While Not rs.EOF              '当数据指针未移到记录集末尾时，循环下列操作
'
'    sht.Cells(i, 1) = rs("A")    '把当前记录的字段1的值保存到sheet1工作表的第i行第1列
'
'    sht.Cells(i, 2) = rs("B")    '把当前字段2的值保存到sheet1工作表的第i行第2列
'
'    sht.Cells(i, 3) = rs("C")    '把当前字段2的值保存到sheet1工作表的第i行第2列
'
'    sht.Cells(i, 4) = rs("D")    '把当前字段2的值保存到sheet1工作表的第i行第2列
'
'    rs.MoveNext                  '把指针移向下一条记录
'
'    i = i + 1                    'i加1，准备把下一记录相关字段的值保存到工作表的下一行
'
'Loop                                 '循环
~~~
rs.Close   '关闭记录集，至此，程序将把某数据表的字段1和字段2保存在excel工作表sheet1的第1、2列，行数等于数据表的记录数

这样就完成了从打开数据库连接到读取数据到再关闭数据库的整个过程。

使用Delphi如何连接SQL数据库？
最好能说的详细点

------解决方案--------------------
使用ADO连接SQL Server 2000数据库
1．用ADO组件TADOQuery连接数据库
用TADOQuery组件连接数据库需要以下几个步骤：
（1）用TADOConnection组件连接数据源（在ConnectionString属性中连接数据库的字符串可以根据需要对其进行相应的省略）。
（2）用TADOQuery组件连接数据源，并在SQL属性中输入SQL语句。
（3）将TADOQuery组件的Active属性设为True。
在SQL属性中可以输入任何形式的SELECT语句，以及INSERT（添加）、UPDATE（修改）和DELETE（删除）语句。
下面利用TADOQuery组件来连接数据库“MR_SQL”，并显示“MR_SQL”数据库中“MR_ Student”表的数据，如图1所示。
操作步骤如下：
（1）运行Delphi，在窗体中添加TADOConnection、TADOQuery、TDataSource和TDBGrid组件。

图1 用ADO组件TADOQuery连接数据库
（2）主要程序代码如下：
将下面的代码写入窗体的OnShow（显示）事件中。
procedure TForm1.FormShow(Sender: TObject);
begin
ADOConnection1.ConnectionString := 'User ID=sa;Initial Catalog=MR_SQL;
Data Source=.;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;
Workstation ID=MRDEL'; //连接指定的数据库
ADOConnection1.LoginPrompt := False;
ADOConnection1.Connected := True;
ADOQuery1.Connection := ADOConnection1; //连接数据源
with ADOQuery1 do //用ADO组件连接数据表
begin
close;
SQL.Clear;
SQL.Add('Select * from MR_Student'); //使用SQL语句查询数据表中的内容
open;
end;
ADOQuery1.Active := True;
DataSource1.DataSet := ADOQuery1;
DBGrid1.DataSource := DataSource1;
end;
2．用ADO组件TADODataSet连接数据库
TADODataSet组件允许直接访问数据源、创建一组数据源记录以及查询结果记录集。TADODataSet组件可以从一个或多个表中取数据。如果只访问一个表，需要指定表的名称；如果要访问多个表，需要使用SQL语句。
TADODataSet组件与TADOQuery组件的最大区别在于可以使用TADODataSet组件上CommandText属性右边的 按钮，对指定数据库中的所有数据表进行可视化选择并创建SQL语句，如图2所示。

图2 CommandText属性的编辑器
注意：在使用CommandText属性的编辑器时，应先在ConnectionString属性中使用手动连接数据源。
下面利用TADODataSet组件来连接数据库“MR_SQL”，并显示“MR_SQL”数据库中“MR_Student”表的数据。
操作步骤如下：
（1）运行Delphi，在窗体中添加TTADODataSet、TDataSource和TDBGrid组件。
（2）主要程序代码如下：
将下面的代码写入窗体的OnShow（显示）事件中。
procedure TForm1.FormShow(Sender: TObject);
begin
ADODataSet1.ConnectionString := 'Provider=SQLOLEDB.1;Persist Security Info=False;
User ID=sa;Initial Catalog=MR_SQL;Data Source=.'; //连接数据源
ADODataSet1.CommandText := 'select * from MR_Student'; //用SQL语句查询数据表信息
ADODataSet1.Active := True; //运行该组件
end;
3．用ADO组件TADOTable连接数据库
TADOTable（也称为ADO数据表）组件是一个数据集组件，封装了一个可访问ADO的数据表，使用TADOTable组件可访问单个数据表中的数据，它可以直接访问数据表中的每条记录，也可以用Filter属性根据限定范围或条件对数据表中的信息进行过滤。
TADOTable组件也可以通过TableName属性对数据库中的数据表进行可视化选择。
注意：在用TableName属性进行可视化选择时，应先在ConnectionString属性中使用手动连接数据源。
下面是利用TADOTable组件来连接数据库“MR_SQL”，并显示“MR_SQL”数据库中“MR_Student”表的数据。
操作步骤如下：
（1）运行Delphi，在窗体中添加TADOTable、TDataSource和TDBGrid组件。
（2）主要程序代码如下：
将下面的代码写入窗体的OnShow（显示）事件中。
procedure TForm1.FormShow(Sender: TObject);
begin
ADOTable1.ConnectionString := 'Provider=SQLOLEDB.1;Persist Security Info=False;
User ID=sa;Initial Catalog=MR_SQL;Data Source=.';
ADOTable1.TableName := 'MR_Student';
ADOTable1.Filtered := True;
end;
4．用ADO组件TADOCommand连接数据库
TADOCommand组件主要用来对数据源执行指定的命令，比如SQL语句，表和存储过程的名称，对数据进行添加、修改、删除等操作。虽然其他ADO组体也能执行以上操作，但需要使用Command本身的属性和方法来控制数据源，使用TADOCommand组件就方便得多。
在用TADOCommand组件对数据进行编辑时，应在Parameters属性中创建变量，这些变量应与编辑字段的类型相一致，如果在SQL语句后面没有WHERE子句，则对整个表进行编辑。
下面利用TADOCommand组件来连接数据库“MR_SQL”，并对“MR_Student”表中的“数学”字段进行修改。
操作步骤如下：
（1）运行Delphi，在窗体中添加TADOTable、TEdit和TButton组件。
（2）主要程序代码如下：
在Button1按钮的单击事件中写入以下代码。
procedure TForm1.Button1Click(Sender: TObject);
begin
ADOCommand1.ConnectionString := 'Provider=SQLOLEDB.1;Persist Security Info=False;
User ID=sa;Initial Catalog=MR_SQL;Data Source=.'; //连接数据源
//用SQL语句UPDATE修改MR_Student表中第一条记录的“数学”字段信息
ADOCommand1.CommandText:='UPDATE MR_Student SET 数学 = 数学 + :aa where 编号=1';
//在TADOCommand组件中设置变量，并通过该变量获取修改值
ADOCommand1.Parameters.ParamByName('aa').Value := StrtOInt(edit1.Text);
ADOCommand1.Execute; //执行修改操作
end;

一：C# 连接SQL数据库
Data Source=myServerAddress;Initial Catalog=myDataBase;User Id=myUsername;Password=myPassword;

Data Source=190.190.200.100,1433;Network Library=DBMSSOCN;Initial Catalog=myDataBase;User ID=myUsername;Password=myPassword;

Server=myServerAddress;Database=myDataBase;User ID=myUsername;Password=myPassword;Trusted_Connection=False;

Server=myServerAddress;Database=myDataBase;Trusted_Connection=True;

Server=myServerName\theInstanceName;Database=myDataBase;Trusted_Connection=True;

Data Source=myServerAddress;Initial Catalog=myDataBase;Integrated Security=SSPI;


1：Integrated Security参数

当设置Integrated Security为 True 的时候，连接语句前面的 UserID, PW 是不起作用的，即采用windows身份验证模式。

只有设置为 False 或省略该项的时候，才按照 UserID, PW 来连接。

Integrated Security 还可以设置为：sspi ，相当于 True，建议用这个代替 True。

Data Source=myServerAddress;Initial Catalog=myDataBase;Integrated Security=SSPI;

Data Source=myServerAddress;Initial Catalog=myDataBase;Integrated Security=true;

Data Source=myServerAddress;Initial Catalog=myDataBase;;User ID=myUsername;Password=myPasswordIntegrated Security=false;


2：参数Trusted_Connection

Trusted_Connection=true，将使用当前的   Windows   帐户凭据进行身份验证

Trusted_Connection=false;将不采用信任连接方式(也即不采用Windows验证方式)，而改由SQL Server 2000验证方式

Server=myServerAddress;Database=myDataBase;User ID=myUsername;Password=myPassword;Trusted_Connection=false;

Server=myServerAddress;Database=myDataBase;Trusted_Connection=True;


3：Initial Catalog是你要连接的数据库的名字


4：WINCE连接

Data Source=myServerAddress;Initial Catalog=myDataBase;Integrated Security=SSPI;User ID=myDomain\myUsername;Password=myPassword;


二：可以利用SqlConnectionStringBuilder，这样不必去记住名称。

SqlConnectionStringBuilder scsb = new SqlConnectionStringBuilder();

scsb.DataSource = @"(local)\SQLExpress";

scsb.IntegratedSecurity = true;

scsb.InitialCatalog = “Northwind”;

SqlConnection myConnection = new SqlConnection(scsb.ConnectionString);
三：可以利用属性中的Setting来自动设置连接字符串

1：在type中选择 (connection string),
2：在DataSouce中选择数据源，然后再Server中输入服务器名，本地用(local)\SQLExpress
3：选择登陆验证方式，本次选Windows验证（即信任连接Integrated Security=True）
4：选择数据库名，确认即可

Data Source=(local)\SQLExpress;Initial Catalog=Northwind;Integrated Security=True

server = .\sqlexpress;integrated security = true;database = northwind

四：SQL2005远程服务器连接方法
如何打开sql server 2005 的1433端口：

配置工具->Sql Server Configuration Manager->MSSQLSERVER的协议看看TCP/IP协议是否启动,如果启动,右键菜单点"属性" ,在分页菜单中选"IP地址",把"IP1"和"IP2"中"TCP端口"为1433,“已启用"改为"是”

配置工具->Sql Server Configuration Manager->SQL Native Client 配置->客户端协议->TCP/IP选择TCP/IP右键菜单中"属性",确认"默认端口"是1433,“已启用"为"是”。
SQL Server 2005 远程连接配置TCP/IP属性：

Surface Area Configuration --> Database Engine --> Remote Connections —>Using TCP/IT SQL Server 外围应用配置器?服务和连接外围配置?database englie?远程连接?启用(远程连接的TCP/IP和named pipes)

SQL Server Configuration Manager?SQL2005网络配置?启用TCP/IP和named pipes
其他说明见下: sqlserver2005(Express版），为了便于管理，你还需要去下一个manage管理器：

安装好manage管理器后，在程序中连接sqlserver2005,下面几点是要注意的。

1.开启sql2005远程连接功能,开启办法如下, 配置工具->sql server外围应用配置器->服务和连接的外围应用配置器->打开MSSQLSERVER节点下的Database Engine 节点,先择"远程连接",接下建议选择"同时使用TCP/IP和named pipes",确定后,重启数据库服务就可以了.
2.登陆设置改为,Sql server and windows Authentication方式同时选中,具体设置如下: manage管理器->windows Authentication(第一次用windows方式进去),->对象资源管理器中选择你的数据服务器–右键>属性>security>Sql server and windows Authentication方式同时选中.
3:设置一个Sql server方式的用户名和密码,具体设置如下: manage管理器->windows Authentication>new query>sp_password null,‘sa123456’,‘sa’ 这样就设置了一个用户名为sa ,密码为:sa123456的用户,下次在登陆时,可以用Sql server方式, 用户名为sa ,密码为:sa123456的用户进数据库了.
4: 做完上面三步后,这样写连接字符串就可以顺利进入数据库了,

(server=.\sqlexpress;uid=sa;pwd=sa123456;database=master";

五：SQL2000远程服务器连接方法


1：看ping 服务器IP能否ping通。


2：在Dos或命令行下输入telnet 服务器IP 端口，看能否连通。 　　如telnet 202.114.100.100 1433 　　通常端口值是1433，因为1433是sql server 2000的对于Tcp/IP的默认侦听端口。如果有问题，通常这一步会出问题。通常的提示是“……无法打开连接,连接失败"。 　　

如果这一步有问题，应该检查以下选项。

1） 检查远程服务器是否启动了sql server 2000服务。如果没有，则启动。
2） 检查服务器端有没启用Tcp/IP协议，因为远程连接(通过因特网)需要靠这个协议。检查方法是，在服务器上打开 开始菜单-> 程序-> Microsoft SQL Server-> 服务器网络实用工具，看启用的协议里是否有tcp/ip协议，如果没有，则启用它。
3）检查服务器的tcp/ip端口是否配置为1433端口。仍然在服务器网络实用工具里查看启用协议里面的tcp/ip的属性，确保默认端口为1433，并且隐藏服务器复选框没有勾上。 　　事实上，如果默认端口被修改，也是可以的，但是在客户端做 telnet测试时，写服务器端口号时必须与服务器配置的端口号保持一致。如果隐藏服务器复选框被勾选，则意味着客户端无法通过枚举服务器来看到这台服务器，起到了保护的作用，但不影响连接，但是Tcp/ip协议的默认端口将被隐式修改为2433，在客户端连接时必须作相应的改变。
4）如果服务器端操作系统打过sp2补丁，则要对windows防火墙作一定的配置，要对它开放1433端口，通常在测试时可以直接关掉windows防火墙(其他的防火墙也关掉最好)。
5）检查服务器是否在1433端口侦听。如果服务器没有在tcp连接的1433端口侦听，则是连接不上的。检查方法是在服务器的dos或命令行下面输入　　netstat -a -n 或者是netstat -an，在结果列表里看是否有类似 tcp 127.0.0.1 1433 listening 的项。如果没有，则通常需要给sql server 2000打上至少sp3的补丁。其实在服务器端启动查询分析器，输入 select @@version 执行后可以看到版本号，版本号在8.0.2039以下的都需要打补丁。　　如果以上都没问题，这时你再做telnet 服务器ip 1433 测试，将会看到屏幕一闪之后光标在左上角不停闪动。恭喜你，你马上可以开始在企业管理器或查询分析器连接了。



3： 检查客户端设置　　程序-> Microsoft SQL Server -> 客户端网络使用工具。像在服务器网络实用工具里一样，确保客户端tcp/ip协议启用，并且默认端口为1433(或其他端口，与服务器端保持一致就行)。


4：在企业管理器里或查询那分析器连接测试 　　企业管理器-> 右键SQlserver组-> 新建sqlserver注册-> 下一步-> 写入远程IP-> 下一步-> 选Sqlserver登陆-> 下一步-> 写入登陆名与密码(sa,password)-> 下一步-> 下一步-> 完成 　　查询分析器-> 文件-> 连接-> 写入远程IP-> 写入登录名和密码(sa,password)-> 确定　　通常建议在查询分析器里做，因为默认情况下，通过企业管理器注册另外一台SQL Server的超时设置是4秒，而查询分析器是15秒。　　修改默认连接超时的方法: 　　企业管理器-> 工具-> 选项-> 在弹出的"SQL Server企业管理器属性"窗口中，点击"高级"选项卡-> 连接设置-> 在 登录超时(秒) 后面的框里输入一个较大的数字　　查询分析器-> 工具-> 选项-> 连接-> 在 登录超时(秒) 后面的框里输入一个较大的数字　　通常就可以连通了，如果提示错误，则进入下一步。


5：错误产生的原因通常是由于SQL Server使用了"仅 Windows"的身份验证方式，因此用户无法使用SQL Server的登录帐户(如 sa )进行连接。解决方法如下所示:

1） 在服务器端使用企业管理器，并且选择"使用 Windows 身份验证"连接上 SQL Server。
2） 展开"SQL Server组"，鼠标右键点击SQL Server服务器的名称，选择"属性"，再选择"安全性" 选项卡。
3）在"身份验证"下，选择"SQL Server和 Windows "。
4） 重新启动SQL Server服务。(在dos或命令行下面net stop mssqlserver停止服务，net start mssqlserver启动服务，也是一种快捷的方法)。

最近项目还涉及到matlab连接数据库，下面我就记录如何进行配置使得matlab能够连接sql数据库。由于最近工程做的多一些，所以分享的都在工程配置上，当初为了这些配置可是反复卸载与重装，算法其实也有，但是现在还没时间整理出来，以后会继续记录我们用到的检索流程和检索中涉及的算法。
　　首先先说明一下我的操作系统是win8，所用的数据库是SQLSERVER2012，所用的matlab是2012a。在安装以上软件的时候，以我的经验是要首先安装SQL2012的（不一定对），因为当初我首先装VS2010的时候，它会自带一个SQL，这就会出问题了，出在SQL的ODBC驱动版本将会是6.01（可能）。然后用Matlab2012a连接数据库的时候会报错，原因就是ODBC驱动问题。所以安装顺序是先装SQL2012，然后VS和Matlab安装顺序没影响。如果先装SQL2012，那么ODBC驱动版本就会是6.03，这时候用matlab的database函数连接数据库的时候就不会报错了。当安装好软件后，下面我记录具体的连接过程。
 
1. 查看服务（如有数据库冲突）
右键我的电脑->管理->服务和应用程序->服务，在右边的界面中可以查到两条服务，如图：

其实这两条服务有时候会冲突的，所以我可以选择关掉SQLEXPRESS这条服务，然后保留MSSQLSERVER。
2. 建立数据库
打开Microsoft SQL Server Management Studio，使用window验证登陆，在数据库下新建一个名字为mydb的数据库。如果你要为其建立用户，可以按照下面的流程：展开安全性->右键登录名->新建登陆名

然后如下输入用户名和密码，并且注意取消勾选“用户在下次登录时必须更改密码”，如图：

然后在用户映射中勾选如下两项，别全勾选，其中db_denydatareader，db_denydatawriter是禁止用户读写的。如图：

最好右键点击服务器，选择安全性，在服务器身份验证修改为SQL Server和Windows身份证验证模式。如图：

3. 建立数据源
建立数据源的步骤，大家可以参考这篇文章：
http://wenku.baidu.com/link?url=nTWXB-xC4SSWB024mDAk8Tue6NPeFSunjaZFoLDzhlezRUP0-2mvNb3LgeBKgSDKNpUmwqGQozF86B2ma1SuYTkR459xL9BhkR4jd8PLniK
但是我的略有不同。打开控制面板->管理工具->ODBC数据源（64位），你就会看到如下图：

点添加->选择数据源驱动程序是SQL Server->按完成：

为你的数据库命名（假设我是mydb)，然后在服务器中输入（local）。如图，然后点击下一步再点击下一步将会测试是否能够连接：

如果能够连接上，将会看到，然后就选下一步，直到完成，那么数据源就建立完毕了：

 
如上配置好之后，就可以最后打开Matlab了，在matlab中输入database('mydb','','')就可以看到如下信息：