📄 4797.html

📁 VB技巧问答10000例 VB技巧问答10000例

💻 HTML

字号:

<html>
  <head>
    <title>请教个位程式高手一个蛮困难的问题</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>请教个位程式高手一个蛮困难的问题</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by <a href="mailto:hrichand@ms25.hinet.net">翔仔</a> on August 17, 1998 at 13:23:55:<p>
I have a test.mdb file ,include A table and B table<br>A table: w x y z 栏位<br>B table: w p q r s 栏位<br>欲从B table中过滤出一些recordset后将这些recordset与A table建立关联,再产生一个cross talbe.以下是本人的作法但是此作法浪费太多时间，请教个位高手是否有其它的方法，谢谢！<br>作法:将B table 产生的recordset存入C table 再去处理资料<p>db.execute "select * into [C] where [B].[r]>20 "<br>data1.recordsource="transform sum([C].[p]*[C].[q]) as [总合] select[A].[y] from [A] inner join [C] on [A].[w]=[C].[w] group by [A].[y] pivot [C].[s]<br>data1.refresh   ( 建立一个cross table)<br>db.execute "delete from [C]"<br>db.close<br>data1.database.close<br>dbengine.compactdatabase test.mdb temp.mdb<br>kill test.mdb<br>name temp.mdb test.mdb<p>以上是我程式部分，希望有更好的方法use SQL ,DAO ,DATA1 使程序更简化且更有效率.<br>            谢谢
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 4797-->
<!--top: 4802--><li><a href="4802.html">Re: 请教个位程式高手一个蛮困难的问题</a> <b>Amos</b> <i>17:43:04 8/17/98</i>
(<!--responses: 4802-->2)
<ul><!--insert: 4802-->
<!--top: 4821--><li><a href="4821.html">建立 QueryDef</a> <b>小吴</b> <i>07:39:15 8/18/98</i>
(<!--responses: 4821-->1)
<ul><!--insert: 4821-->
<!--top: 4852--><li><a href="4852.html">感谢各位高手的帮忙，谢谢(无内容)</a> <b>翔仔</b> <i>07:27:48 8/19/98</i>
(<!--responses: 4852-->0)
<ul><!--insert: 4852-->
</ul><!--end: 4852-->
</ul><!--end: 4821-->
</ul><!--end: 4802-->
</ul><!--end: 4797-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -