有现成的例子最好
解决方案 »
- 当360云查杀对我们的程序报毒时,你会怎么办?
- 有时候第一列有2个或者以上的图片,输出的时候,有的图片就不输出了,想要输出,以第三列的iten no为名称,重复的就在后面加个(1)或者字母a
- 刚接触vb的新丁:请问关于vb 连接MYsql和 查询数据的问题?谢谢回答
- outlook vb source
- 求助在SQL 2000数据库中如何存储图片数据
- 如何改造一下使用MSGBOX时出现的浅灰色的背景色
- vb 中用 ADO 访问 sql 的问题
- 问时间控件问题
- 我有项目,有谁参加???
- VB高手看过来!(有分啦!)
- VB的数据报表(Data Report)怎么用阿?
- 如何做到FoxMail那样的分割窗体?
conn.open"Provider=OraOLEDB.Oracle.1;Password=bdcs;Persist Security Info=True;User ID=bdcsdt;Data Source=bdcsdt"
"Data Source=MyOracleDB;" & _
"User Id=myUsername;" & _
"Password=myPassword;"
oConn.Open "Driver={Microsoft ODBC Driver for Oracle};" & _
"ConnectString=OracleServer.world;" & _
"Uid=myUsername;" & _
"Pwd=myPassword;"Provider=MSDAORA.1;Password=tiger;User ID=scott;Data Source=dbserver;Persist Security Info=True
引用Active Data Object 2.5 LiabraryPrivate Sub Command1_Click()Dim connstr as stringDim conn As New ADODB.Connection
Dim Rs As New ADODB.Recordsetconnstr = "Provider=MSDAORA.1;User ID=user;Data Source=SQLServerName;Persist Security Info=False"conn.Open connstrrs.Open "select * from test", conn, adOpenKeyset, adLockPessimisticEnd Sub