Excel处理SQL数据库教程.doc
文本预览下载声明
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没有设置,没有关系,我们点击“选项”按钮,可以看到如下对话框
这里不就是我们要设置的hszx数据库名吗?
以上设置妥当以后,点击确定返回到了原来的对话框,好像有点点不一样啊
出现了我们刚才选定的数据库名
然后再点击确定按钮。回到最初的对话框,继续确定,打开Microsoft Query。这个东东好像和Access有点点像啊。
把那个*号拖到下面来就出现了上图。然后按照以下方法点击
将数
显示全部