20525.html

来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 23 行

HTML
23
字号
<html>  <head>    <title>Re: 要如何用VB6开dbf的档案??(no)</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>Re: 要如何用VB6开dbf的档案??(no)</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by test on October 22, 1999 at 12:34:21:<p>In Reply to: <a href="20372.html">Re: 要如何用VB6开dbf的档案??</a> posted by 梁 檩 on October 19, 1999 at 17:59:19:<p>: : 我有一个附档名为dbf的档案,请问我要如何开启<br>: : 我用VB6 SP3 + ADO<br>: : 我设ODBC(Microsoft dBase Driver)与ADODC Connect 却出现<br>: : [Microsoft][ODBC dBase 驱动程式]从外部资料库驱动程式产生的非预期的错误<br>: : 的错误讯息,请问是我哪里设错了吗,那要如何设定??<br>: : 请大家帮忙,感激不尽!!<p>: 既然已设odbc, 不如用rdo,效果不错!<br>: Dim Env As rdoEnvironment<br>: Dim Db As rdoConnection<br>: Dim Rs As rdoResultset<p>: Set Env = rdoEnvironments(0)<br>: Set Db = Env.OpenConnection("KTDBF1", rdDriverCompleteRequired, True, "")<br>: SQLDBF = "SELECT * FROM Matme ORDER BY Mat_cm"<br>: Set Rs = Db.OpenResultset(SQLDBF, rdOpenKeyset)<br>: 如有一栏位为mat_cm<br>: 可用 rs("mat_cm") 读取<br>: ... <p><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 20525--></ul><!--end: 20525--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?