📄 1067.html
字号:
<html>
<head>
<title>RDO与SQL Server 6.5的连接问题</title>
</head>
<BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="red" VLINK="#808080" ALINK="">
<center>
<h1>RDO与SQL Server 6.5的连接问题</h1>
</center>
<HR><p>
Posted by <a href="mailto:ddm@ms1.hinet.net">周邦信</a> on October 08, 1997 at 19:27:28:<p>
请教诸位先进，<br>我使用vb6的RDO连接SQL Server 6.5<br>为什么我将rdoConnection的CursorDriver设为rdUserServer<br>OpenConnection时将Readonly设为False<br>OpenResultset时将Type设为rdOpenKeyset<br>所开出来的Resultset的Type却仍是rdOpenStatic呢？<p>以下是我的程式码：<br>Dim sql As String<br>Dim cn As New rdoConnection<br>Dim qr As rdoQuery<br>Dim rs As rdoResultset<p>Private Sub Form_Load()<br> cn.Connect = "DSN=SqlDdm;DATABASE=DDM;"<br> cn.CursorDriver = rdUseServer<br> cn.EstablishConnection rdDriverNoPrompt, False<br> sql$ = "select * from Basic"<br> Set qr = cn.CreateQuery("sample", sql$)<br> Set rs = qr.OpenResultset(rdOpenKeyset, rdConcurLock)<br> Debug.Print rs.Type<br>End Sub<br>
<br>
<p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 1067-->
<!--top: 1072--><li><a href="1072.html"><b>我现在没有 SQL 6.5</b></a> 小吴 <i>23:20:46 10/08/97</i>
(<!--responses: 1072-->0)
<ul><!--insert: 1072-->
</ul><!--end: 1072-->
</ul><!--end: 1067-->
<br><HR><p>
</body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -