《Excel处理SQL数据库教程1.docVIP

Excel处理SQL数据库教程 我们可以用Excel来处理SQl数据库，这样可以加快开发步伐。Excel有很强的显示效果，打印控制也比较简单，是计算机上必备的软件。我们通过下面的步骤，一步步的学习如何通过Excel来控制和开发简单的程序。作为一个入门的教程，力求从最简单的步骤开始。学习本教程要求已经具备了比较初步的vba编程经验。 步骤一：打开Excel后，进入microsoft visual basic 编辑器（ALT+F11） 步骤二：引用ADO。方法是在vb编辑器中点击菜单栏中的“工具”菜单——“引用”， 我们对于数据库的操作基本最基本的操作就是 “增加”，“删除”，“查询”等操作。以下我们通过实例来说明。 1、如何向数据库增加记录 以下代码中红色底纹部分文字是你需要修改的，比如这里的jszxfwq就是sql服务器名，database就是要进行处理的数据库名，本例是hszx；uid是登陆的用户名，这里是sa，pwd是登陆的密码，这里是空。例子引用的表a只有两个字段，分别是a(文本类型),b(整数类型) Sub 增加记录() 首先是建立连接 Dim cn As New ADODB.Connection Dim strCn As String, sqlins As String ‘ Dim rs As New ADODB.Recordset strCn = Provider=sqloledb;Server=jszxfwq;Database=hszx;Uid=sa;Pwd=; cn.Open strCn ‘通过以上步骤就建立了一个连接，有了这个连接，表示你机器上的excel就连接上了sql所在的服务器，可以对hszx数据库进行操作了。 sqlins=”insert into a(a,b) values(‘hoo’,2)” cn.Execute sqlins set cn=Nothing End Sub 运算结果如下 进一步的，如果我们使用循环，就可以将电子表格中的数据导入到SQl数据库中。由于Excel对数据的要求不是非常的严格，因此，在输入数据的时候就应当采取相应的措施才保证在导入SQL数据库的时候不至于出错。 2、如何删除数据库中已有的记录 下面就将刚才已经添加的记录进行删除，方法如下： Sub 删除记录() 首先是建立连接 Dim cn As New ADODB.Connection Dim strCn As String, sqldel As String ‘ Dim rs As New ADODB.Recordset strCn = Provider=sqloledb;Server=jszxfwq;Database=hszx;Uid=sa;Pwd=; cn.Open strCn ‘通过以上步骤就建立了一个连接，有了这个连接，表示你机器上的excel就连接上了sql所在的服务器，可以对hszx数据库进行操作了。 Sqldel=”delete from a where id=1” cn.Execute sqldel set cn=Nothing End Sub 删除前数据库内容 删除后数据库内容 3、如何查询数据库中的记录 查询数据库中以有的记录有两种方式，一种是通过excel的导入外部数据的功能，不需要编程就可以直接读取到数据库中的数据。一个就是直接通过读取数据集的方式进行。下面进行逐一介绍。 导入外部数据 ： 步骤如下：点击菜单栏中的“数据”菜单，选中其中的“导入外部数据”——新建数据库查询 然后出现了以下的对话框 选择“新数据源”，然后点击确定。这里实质上就是在定义一个和sql数据库连接的过程。出现如下的对话框。 在该对话框中：请输入数据源名称是你自己输入的表示是对这个连接的一个描述。数据库类型的驱动程序选择SQL Server。然后点击“连接”按钮出现以下对话框 这里和我们刚才的这个代码进行比较 strCn = Provider=sqloledb;Server=jszxfwq;Database=hszx;Uid=sa;Pwd=; 这里可以看到和代码相比我们只有数据库hszx没有设置，没有关系，我们点击“选项”按钮，可以看到如下对话框 以上设置妥当以后，点击确定返回到了原来的对话框，好像有点点不一样啊 然后再点击确定按钮。回到最初的对话框，继续确定，打开Microsoft Query。这个东东好像和Access有点点像啊。 把那个*号拖到下面来就出现了上图。然后按照以下方法点击 将数据返回excel 点击确定 这样就读