脚本语言 订阅所有【脚本语言】的日志

用VBS操作数据库

编辑:dnawo 日期:2007-04-12

字体大小: 小 中 大
复制内容到剪贴板程序代码 程序代码
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文件来做一些操作时想到的，这边只提供一个思路，我们还可以用他来做一些其他的东西。

上一篇: IP地址和子网掩码
下一篇: 五大行20日统一停收ATM跨行查询费
文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags:
最新日志:
评论: 1 | 引用: 0 | 查看次数: 6017
发表评论
请登录后再发表评论！