以下命令可用于关闭与数据库的连接。
SQLDisconnect(cname)
cname - 这是连接的名称。
值等于0表示命令成功。
/* Main program */
Call RxFuncAdd 'SQLLoadFuncs', 'rexxsql', 'SQLLoadFuncs'
Call SQLLoadFuncs
if SQLConnect(c1,'testuser','test123','testdb') == 0 then say 'Connect Succedded'
if SQLDisconnect(c1) == 0 then say 'Disconnected'
上述程序的输出如下所示。
Connect Succedded
Disconnected