Rexx-讀取操作

對任何資料庫執行讀取操作是指從資料庫中獲取一些有用的資訊。一旦我們的資料庫連線建立，就可以對該資料庫進行查詢。

以下示例顯示如何從 employee 表中獲取所有記錄。

示例

/* Main program */ 
Call RxFuncAdd 'SQLLoadFuncs', 'rexxsql', 'SQLLoadFuncs' 
Call SQLLoadFuncs 

if SQLConnect(c1,'testuser','test123','testdb') == 0 then say 'Connect Succedded' 
if SQLCommand(u1,"use testdb") == 0 then say 'Changed database to testdb' 
sqlstr = "select first_name,last_name,age,sex,income from employee" say 
   SQLCommand(c2,sqlstr) 

say c2.first_name.1 
say c2.last_name.1 
say c2.age.1 
say c2.sex.1 
say c2.income.1

上面程式的輸出如下圖所示。

Connect Succedded 
Changed database to testdb 
0 
Mac 
MOhan 
20 
M 
2000