木子屋
 

标题: 用VBS操作数据库

作者: dnawo

日期: 2007-04-12 08:46 AM

分类: 脚本语言

内容: 复制内容到剪贴板 程序代码Dim objConn,objRs,strSql
Set objConn = CreateObject("ADODB.Connection")
objConn.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=F:/www.mzwu.com/database/db1.mdb"
objConn.open
Set objRs = CreateObject("ADODB.RecordSet")
strSql = "Select count(*) from table1"
objRs.open strSql,objConn,1,2
msgbox "table1表中共有" & objRs(0) & "条记录",48,"记录统计:"
objRs.close
Set objRs = nothing
objConn.close
Set objConn = nothing
将上边代码保存成vbs文件就能直接统计出db1.db库的table1表中有多条记录，这是昨晚在网吧看到很多的vbs文件来做一些操作时想到的，这边只提供一个思路，我们还可以用他来做一些其他的东西。

+ 查看当前日志评论 (1)

 

登录

────────────

木子屋

PJBlog3 v3.2.9.518 Inside.

Processed In 0.598 ms

标题: 用VBS操作数据库

你没有权限发表评论

────────────

木子屋

PJBlog3 v3.2.9.518 Inside.

Processed In 0.598 ms

暂无评论

返回

────────────

木子屋

PJBlog3 v3.2.9.518 Inside.

Processed In 0.598 ms