Dim num,ora
ora="ora"
set con=createobject("adodb.connection")
'con.open "DRIVER={Microsoft ODBC for Oracle};Server=10.137.86.120;Uid=JXCS0115;Pwd=JXCS0115"
con.open "DSN=ora120;UID=JXCS0115;PWD=JXCS0115;DBQ=120 ;DBA=W;APA=T;EXC=F;FEN=T;QTO=T;FRC=10;FDL=10;LOB=T;RST=T;BTD=F;BNF=F;BAM=IfAllSuccessful;NUM=NLS;DPM=F;MTS=T;MDI=F;CSR=F;FWC=F;FBS=64000;TLO=O;"
set record=createobject("adodb.recordset")
sql="select * from service"
record.open sql,con
Do
if(record("list")="0")then'//查找表格list列中有多少0
num=num+1
end if
record.movenext
loop until record.eof=true
record.close
set record=nothing
con.close
set con=nothing
msgbox num
分享到:
相关推荐
vb连接oracle数据库实例说明(代码)
vb.net操作Oracle数据库增删改查以及存储过程调用1
vb.net操作Oracle数据库1
通过VB来连接oracle数据库做查询,需要修改SQL语句的,我是用公司系统做测试的。
使用VB调用oracle数据库存储过程的研究.pdf
VB与Oracle数据库接口的应用
vb编写的oracle数据库导入导出,实用方便.只需填写oracle帐号密码即可
数据上传Oracle数据库的小程序,包括对数据库查询,插入,修改
引用了Oracle.ManagedDataAccess,打成安装包十分方便。
'功能: 打开指定的数据库 '参数: ' strServerName:主机字符串 ' strUserName:用户名 ' strUserPwd:密码 '返回: 数据库打开成功,返回true;失败,返回false
VB环境下基于ADO的Oracle数据库访问.pdf
用VB6作为前端开发工具,后台数据库为Oracle9进行应用程序开发
VB下利用ADO技术访问Oracle数据库
本课程设计是用vb连接到Oracle上的,包含有vb的源代码!
VB访问Oracle远程数据库方法与实现.pdf
vb数据库操作简化工具,方便快捷,秩只需要系统运行时传递一个管道,即可直接操纵,一般只需要负责sql语句就行,一句话搞定,包装有事务处理。
VB.net连接oracle数据库
VB.NET编写的ORACLE数据库线程查询工具
数据库操作类: 支持 SQLServer mysql sqlite Sybase Oracle等DB 数据库操作类 包括执行SQL或者存储过程,返回DataSet、DataTable等功能 完全支持存储过程和参数调用 javascriptClassLibrary 包括一些JavaScript 类...