home *** CD-ROM | disk | FTP | other *** search
/ Tricks of the Windows Gam…ming Gurus (2nd Edition) / Disc2.iso / msdn_vcb / samples / vc98 / sdk / dbmsg / sql / vbsql / cursors.bas < prev    next >
Encoding:
BASIC Source File  |  1996-04-03  |  720 b   |  31 lines
  1. Rem Global Definitions
  2.  
  3. Rem These handle the SQL Server connection
  4.  
  5. Global DBLIB_VERSION$
  6. Global PrimaryWindowTitle$
  7. Global SqlConn%
  8. Global ServerName$
  9. Global LoginID$
  10. Global Password$
  11. Global DatabaseName$
  12. Global SQLStatus%
  13. Global DefServer$
  14. Global DefLogin$
  15. Global Const LoginTimout% = 30
  16. Global Const QueryTimeout% = 60
  17. Rem Globals for cursor operations
  18.  
  19. Global CursorHandle%
  20. Global RowStatus&()
  21. Global OpenTran%
  22. Global CursorColName$(255)
  23. Global CursorColLen&(255)
  24. Global NumRowsInCursor%
  25. Global NumRowsInKeyset&
  26. Global ScrollOpt%
  27. Global NumCols%
  28. Global CursorSliderValue%           'To tell if we are scrolling up or down
  29. Global OutputData(20) As String     'Storage for up to 21 rows
  30.  
  31.