Return Value
Remarks
............ ............ $ret = db.Open($ConnStr,$sql1) $ret = db.Open($ConnStr,$sql2) ............ ............
while db.RunSQL($ConnStr,$sql) ........... endwhile
:MAIN display "Waiting for call" answer $Provider= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Product.mdb;Persist Security Info=False" display "Displaying records from the table" $alias = db.Open($Provider,"SELECT * FROM Product") while $alias.eof = FALSE display $alias.id $alias.product $alias.productName sleep 1000 $alias = db.Skip() endwhile Display "End of the table" $alias = db.Close() hangup goto MAIN :ONSYSTEMERROR hangup MsgBox($error) log $error $alias = db.close() goto MAIN