函数Retrieve详解

浅浅的花香味﹌ 2022-09-28 02:53 122阅读 0赞

函数作用：为DataWindow或者Datastore检索数据。在使用该函数之前应该执行过函数SetTransObject或者SetTrans，为数据窗口设置过事务对象。该函数执行之前，首先将数据窗口中已有的数据清除掉，然后将数据库中的数据检索到数据窗口中。所以，如果希望将检索到的数据追加到数据窗口中，需要编写程序。在数据窗口对象的RetrieveStart事件中返回2，即可防止清除掉数据窗口中的已有数据。  
函数语法：long dwcontrol.Retrieve ( \{ any argument, any argument . . . \} )  
ldwcontrol：数据窗口、DataStore或者下拉子数据窗口。  
largument：可选参数，根据数据窗口对象中的定义而定。参数的个数和数据类型应该和数据窗口对象中的定义保持一致。  
返 回 值：数字类型，表示函数执行完之后数据窗口中显示出来的数据行数。注意，该返回值不表示检索到的数据行数。有两点，RetrieveStart中是否编写了脚本、数据窗口对象定义中是否指定了过滤规则。如果数据窗口对象中定义了过滤规则，检索完成后自动将不符合过滤规则的数据移动到数据窗口的Filter缓冲区中，函数的返回值则是检索到的总数据行数扣除移动到Filter缓冲区的数据行数。需要注意的是，只有数据窗口对象中定义的过滤规则影响Retrieve函数的返回值，函数SetFilter和Filter并不影响。  
代码实例：  
例1：下面的程序根据Retrieve函数的返回值显示提示信息。  
long ll\_rows  
  
dw\_main.SetTransObject(SQLCA)  
ll\_rows = dw\_main.Retrieve()  
IF ll\_rows < 1 THEN MessageBox("错误","没有检索到数据。")  
例2：带参数的检索。  
数据窗口对象的SQL语句如下：  
SELECT Name, emp.sal, sales.rgn From Employee, Sales  
WHERE emp.sal > :an\_Salary and sales.rgn = :as\_Region  
其中，an\_Salary和as\_Region为检索参数，分别为数值型和字符型。可以使用下面的语法检索数据：  
dw\_1.Retrieve(50000, "NW")