6331.html

来自「VB技巧问答10000例 VB技巧问答10000例」· HTML 代码 · 共 23 行

HTML
23
字号
<html>
  <head>
    <title>Re: VB and Oracle</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>Re: VB and Oracle</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by <a href="mailto:johnya@mitac.com.tw">安宝</a> on October 08, 1998 at 11:11:49:<p>
In Reply to: <a href="6328.html">VB and Oracle</a> posted by 孤鹰 on October 08, 1998 at 10:46:37:<p>
<br>:来 , 给你 sample :<br>: 1. 首先 , 在 模组内加入以下<br>:   Public OraSession As Object<br>:   Public OraDatabase As Object<br>:   Public OraDynaset As Object<br>:   Public SQL$        <br>:   Public MyDyn As Object<p>: 2. 在主form内加入以下<br>:  UserName = User ID<br>:  Password = Password<br>:  DatabaseName = HOST IP Address<br>:  Connect = UserName + "/" + Password<br>:  Set OraSession =   _<br>:  CreateObject("OracleInProcServer.XOraSession")<br>:  Set OraDatabase = _<br>:  OraSession.DbOpenDatabase(DatabaseName,   Connect, 0&)<p>: 2. 在使用的 Form 中加入 ORADC1,DBGrid1 物件<p>: 3. 在处理时参照以下<br>:  SQL$ = SQL Language<br>:  Set MyDyn = OraDatabase.DbCreateDynaset(SQL$, 0&)<br>:  Set ORADC1.Recordset = MyDyn<p>: 4.  每次处理完要更新 DBGrid1 时 , 重覆上述程序3 
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 6331-->
</ul><!--end: 6331-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

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