📄 20749.html

📁 VB技巧问答10000例 VB技巧问答10000例

💻 HTML

字号:

<html>  <head>    <title>Re: 谢谢你帝王世纪,(无内文) </title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>Re: 谢谢你帝王世纪,(无内文) </h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by AOK(帝王世纪) on October 28, 1999 at 20:51:32:<p>In Reply to: <a href="20557.html">谢谢你帝王世纪,(无内文) </a> posted by david on October 23, 1999 at 13:07:19:<p>: : : 请问各位同好vb如何connect to DB2<br>: : : &如何get data to mdb....tks <p>: : ::(1)首先先确定你在DB2的资料库已经有"启动",若无启动,<br>: :      请先用Start命令或在控制中心先启动.<br>: : (2)设定ODBC或使用Jet引擎以准备连结.<br>: : (3)Dim adoConn As ADODB.Connection<br>: :    Dim adoRS   As ADODB.Recordset<br>: :    Dim strSQL  As String<p>: :    Set adoConn = New ADODB.Connection<br>: :    Set adoRS   = New ADODB.Connection<p>: :    adoConn.Open "DSN=[资料库名];UID=[DB2通行码];<br>: :                  PWD=[db2通行密码]"<p>: :  (P.S.)通行码一般预设都为db2admin,以上是使用ODBC<br>: :        方法连结.<p>: :    strSQL = "SELECT * FROM [你的资料表名]"<br>: :    adoRS.Open strSQL,adoConn,...........<br>: :       .<br>: :       . <br>: :    adoRS.Close<br>:::NoQ NoQ,有什么新发现请尽量拿来做讨论喔:)<br><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 20749--></ul><!--end: 20749--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -