oConn.Open "Driver={Microsoft ODBC for Oracle};" & _
"Server=OracleServer.world;" & _
"Uid=myUsername;" & _
"Pwd=myPassword;"
更多的请看
http://www.jinesc.com/myweb/disp.asp?idd=91&room=40
"Server=OracleServer.world;" & _
"Uid=myUsername;" & _
"Pwd=myPassword;"
更多的请看
http://www.jinesc.com/myweb/disp.asp?idd=91&room=40
解决方案 »
- VB中怎样把不同大小的字通过串口传到下位机通过LED显示?
- ★如何实现Windows media player一样的界面换更代码★
- VB 深度下潜 之 海蛇缠绕
- 新手问题:创建MDI窗口的问题
- VB中如何使用打印机?
- [求助 VB6] DataGrid数据网格控件有关Tab键单击判断问题
- VB:如何刷新当前页面的数据库数据?
- 我刚接触VB,请问什末是msdn,对学vb有用吗〉?
- 把“ESC EM 4”打印命令写成Print #1, Chr(27) + Chr(25) + Chr(52)有问题,求救大虾。
- 想把tab控件的变成enable,在哪设它的属性,我选了enable那个框,可是其他的几个tab都用不成了!!!!111
- 问一个简单的问题
- 一个关于数据库报表的简单问题
几乎所以的数据库全有的
ADO的
2。用Net8 Assistant配置一下(服务命名),完成后,使用
SQL Plus应该可以连接上服务器;
3。如下填写连接字符串就完了:
Provider=MSDAORA.1;Password=tiger;User ID=scott;Data Source=YOURSERVICENAME;Persist Security Info=True4。使用ADOCONNECTION的OPEN方法!这个不用我教了吧。
其实连接字符 直接到ODBC设置 里去抄就可以了
Dim RS
Private Sub Form_Load()
Set CON=CreateObject("adodb.connection")
CON.Open "UID=CDITS;PWD=CDITS;driver={Microsoft ODBC for Oracle};SERVER=CDITS;"
Dim mysql As String
mysql = "select distinct(vid) from HTELEFEEINFORMATION where driverid=0 "
CON.Execute mysql
Set RS = CON.Execute(mysql)
Do While Not RS.EOF
Text1.Text = Text1.Text & RS("vid") & Chr(13) & Chr(10)
RS.MoveNext
Loop
End Sub 或
Conn.Open "PROVIDER=MSDAORA.1;Password=Test;User ID=TestUser;Data Source=LocalOracle;Persist Security Info=True"
----------------------------------------------
关于Oracle连接的问题
http://www.csdn.net/expert/topic/566/566251.xml?temp=.1875727
http://www.csdn.net/expert/topic/612/612859.xml?temp=.2167017