8594.html

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

HTML
23
字号
<html>
  <head>
    <title>Re: 如何得知 在.MDB档中有某一TABLE存在?</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>Re: 如何得知 在.MDB档中有某一TABLE存在?</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by <a href="mailto:nicky@ctx.com.tw">Nicky</a> on December 24, 1998 at 17:23:36:<p>
In Reply to: <a href="8575.html">如何得知 在.MDB档中有某一TABLE存在?</a> posted by jan on December 24, 1998 at 10:03:42:<p>
: 请问: 应如何得知在  TMP.MDB 资料库中, 是否有 TEST 的TABLE 存在?<p>Dim I as integer<br>Dim db as database<br>Dim Bo as Boolean<p>Set Db = DBEngine.Workspaces(0).OpenDatabase("C:\Tmp.mdb", False, False)<br>For I = 0 To Db.TableDefs.Count - 1<br> If InStr(Tmp.TableDefs(I).Name,"TEST") <br>    Bo=true<br>    exit for <br> End if<br>Next I<p>if bo then <br>   '找到了,在这加上Logic<br> else<br>   '找不到,在这加上Logic<br>end if
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 8594-->
</ul><!--end: 8594-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

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