HELP!VB如何连接ORACLE数据库?
解决方案 »
- 为何SQL语句统计的效率还不如循环语句?
- VB6通过API操作注册表实例
- 用CreateProcess获得进程的句柄用其它什么API还可以同样获取??急,请教
- http://expert.csdn.net/Expert/topic/3058/3058408.xml?temp=.1052362
- 运行环境问题?百思不解
- 动态域名解析(诸如花生壳之类)如何实现???请高手指导!!!
- 难题求解,有高手帮忙吗?分不够在加!!!在线等!!!!!
- 插入数据时,发生数据丢失问题?
- 如何控制最小化和还原的按钮??????
- 语音识别的问题(不是高手别进来)
- 打包后安装在98下出现的问题,大家帮忙看看
- 给沧海冷心的100分
Dim OraSess as Object
Dim OraDb as Object
Dim Dyna as ObjectSet OraSess = CreateObject("OracleInProcServer.XOraSession")
Set OraDb = OraSess.DbOpenDatabase("oracle8","scott/tiger",0&)
' In the Above Command
'FirstParameter ("oracle8") is the Database Name or the HostString
'SecondParameter ("scott/tiger") is the UserName/Password
Set Dyna = OraDb.CreateDynaSet("Select * from Emp",0&)
for i = 0 to Dyna.RecordCount
text1 = Dyna.Fields(0).Value
text2 = Dyna.Fields(1).Value
text3 = Dyna.Fields(2).Value
text4 = Dyna.Fields(3).Value
Dyna.DbMoveNext
Next i