home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 February / PCWK0296.iso / po7_win / object10 / dempoip.bas < prev    next >
BASIC Source File  |  1994-11-14  |  666b  |  18 lines
  1. 'Global objects
  2. Global OraSession As Object
  3. Global OraDatabase As Object
  4. Global EmpDynaset As Object
  5. Global DeptDynaset As Object
  6.  
  7. 'Connection info and SELECT statements.
  8. Global Const Connect$ = "scott/tiger"
  9. Global Const DatabaseName$ = "ExampleDb"
  10. Global Const DeptQuery$ = "select * from dept"
  11. Global Const EmpQuery$ = "select * from emp where deptno = :deptno"
  12.  
  13. Global Const WarnFirstDept$ = "You are already on the first department."
  14. Global Const WarnLastDept$ = "You are already on the last department."
  15. Global Const WarnFirstEmp$ = "You are already on the first employee."
  16. Global Const WarnLastEmp$ = "You are already on the last employee."
  17.  
  18.