VBQUERY.BAS

Rem These handle the SQL Server connection for this application 

' Declare SqlConn as Integer in VBWin, Long in VBDOS
Global SqlConn As Integer

Global DBLIB_VERSION$
Global PrimaryWindowTitle$
Global ServerName$
Global LoginID$
Global Password$
Global DatabaseName$
Global SQLStatus%
Global Const LoginTimeout% = 30
Global Const QueryTimeout% = 60