📄 3538.html
字号:
<html>
<head>
<title>Re: 怎样用 OpenDatabase 来开启资料库里的资料表?</title>
</head>
<body bgcolor="#FFFFFF" vlink="#808080">
<center>
<h1>Re: 怎样用 OpenDatabase 来开启资料库里的资料表?</h1>
</center>
<hr size=7 width=75%>
<hr size=7 width=75%><p>
Posted by <a href="mailto: jwh@ms1.hinet.net">纪文和</a> on June 29, 1998 at 01:47:02:<p>
In Reply to: <a href="3531.html">怎样用 OpenDatabase 来开启资料库里的资料表?</a> posted by kkcheung on June 27, 1998 at 20:27:10:<p>
看到您又问这个问题, 我就知道您一定还搞不清楚资料库<br>物件及DataBound Control, 大体来说, 前者是较手动的,<br>后者是较自动的, 二者可以只用其一, 可以混用, 但不是如您写的那样用 ! 建议您先去看我之前对于(Re: 这个 <br>SQL 语法对吗 )答. 算了我将它直接 Copy 过来好了, 如<br>下:<p>(((<br>再请教你所指可以不用data1及dbgrid,那可以怎样?<p>使用 Data Bound Control 是抓资料(查询)最简单方便的<br>工具,对于单一 Table 的存取, 也很容易处理, 但是在程<br>式语言上, 通常有利即有弊, 对于比较复杂的输入处理, <br>或交叉查询, 常常会有想作某些动作, 却苦无出力点的麻<br>烦, 但是 VB 本身也相对的提供了一套完整的物件, 在 <br>Data Bound Control 之外, 让程式开发者有一个更容易<br>作细部处理的途径. 在我们集团那么多公司(20-30)的系<br>统中, 大部份都不是使用 Data Bound Control而是直接<br>使用资料库物件来开发的 ! (虽然是稍微麻烦一点点)<p>扯远了, 您的问题是这样的 :<p>Dim db as Database '资料库物件<br>Dim ss as snapshot '资料集物件<br>Dim wsql as string 'SQL 字串<br>Set db = OpenDatabase(资料库/ODBC Data Source)<br>wsql = "Select Field1,field2.. from Table1 where "<br>wsql = wsql & "cust_id = '" & Text1 & "'"<br>Set ss = db.CreateSnapshot(wsql) 'ODBC--(wsql,64)<br>If ss.RecordCount > 0 Then '至少找到一笔资料<br>Do while not ss.EOF<br> '将资料由搬到 Text 或 (db)Grid<br> '例: Text1.text = ss("Field1") & ""<br> ss.Movenext<br>Loop<br>End If<br>)))<p>以上是完全未使用DataBound Control 的程式码, ss 是<br>宣告成 Snapshot, 但您可以用 Dynaset 来替代.<p>不知道您有无看懂 ? 我认为您还是多看看书上或VB 线上使用手册中对资料库物件的说明的好.<p>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 3538-->
<!--top: 3545--><li><a href="3545.html">谢谢您的指导 ..</a> <b>kkcheung</b> <i>12:51:09 6/29/98</i>
(<!--responses: 3545-->0)
<ul><!--insert: 3545-->
</ul><!--end: 3545-->
</ul><!--end: 3538-->
<br><hr size=7 width=75%><p>
</body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -