20974.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 27 行

HTML
27
字号
<html>  <head>    <title>Re: 请列出您中间操做的那段程式或DE的安排方式</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>Re: 请列出您中间操做的那段程式或DE的安排方式</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by AOK(帝王世纪) on November 03, 1999 at 22:06:09:<p>In Reply to: <a href="20953.html">Re: 请列出您中间操做的那段程式或DE的安排方式</a> posted by Lai on November 03, 1999 at 14:37:47:<p>: : : 资料库中资料经过异动后<br>: : : datareport印出的内容还是原来的<br>: : : 要如何解决请帮忙...<p>: 程式段:<br>: Private Sub cmdPrint_Click()<br>: DataEnvironment1.Commands("Command1").Parameters(0) = sYm<br>:     datareport1.show<br>: End Sub<br>: DE安排:SQL参数<br>: select * from car21 where dt2101 = ?<br>: 请帮忙...<p>只要Command物件内含资料录集合 , 它就不会重新执行SQL<br>指令,假设你只有指定如下:<br>   Set [ObjectName].DataSource = DataEnvironment1<br>       [ObjectName].DataMember = "Command1"<br>这会使得Command物件执行SQL指令一次 , 接着便含有资料<br>录集合了 , 所以接下来你再按Command键就没效了.<p>解决方法:类向大汉堡前辈所说的 , 先把资料录集合关闭,<br>   然后再执行SQL指令:判断的程式码如下 -- <p> If DE1.rsCommand1.adStateClosed Then<br>    DE1.rsCommand1.Close '关闭资料录集合<br> End If<br>     .<br>     .<br>接下来就可再加上你以上的程式码了.<br><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 20974--><!--top: 20975--><li><a href="20975.html">Re: Sorry..修正一下程式码....</a> <b>AOK(帝王世纪)</b> <i>22:10:33 11/03/99</i>(<!--responses: 20975-->0)<ul><!--insert: 20975--></ul><!--end: 20975--></ul><!--end: 20974--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

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