Cyd
2b8ca921cb
Complete disaster-recovery snapshot: engine/game source, game data assets, VC6 toolchain + DX SDKs, build outputs, deployed game, and _UNUSED archive. Large binaries in Git LFS; text preserved byte-for-byte (core.autocrlf=false, no eol attributes). See RECOVERY.md for the one-clone rebuild procedure.
558 lines
27 KiB
Plaintext
558 lines
27 KiB
Plaintext
Rem Global declarations for Visual Basic to DB-Library translation dll.
|
|
Rem Used by all apps linking with the VBSQL DLL (vbsql.vbx)
|
|
|
|
Rem Global return values for all RETCODE type functions
|
|
Global Const SUCCEED% = 1
|
|
Global Const FAIL% = 0
|
|
|
|
Rem return values permitted in error handlers
|
|
Global Const INTEXIT% = 0
|
|
Global Const INTCONTINUE% = 1
|
|
Global Const INTCANCEL% = 2
|
|
|
|
Global Const MOREROWS = -1
|
|
Global Const NOMOREROWS = -2
|
|
Global Const REGROW = -1
|
|
Global Const BUFFULL = -3
|
|
|
|
Rem Status code for dbresults(). Possible return values are
|
|
Rem SUCCEED, FAIL, and NO_MORE_RESULTS.
|
|
|
|
Global Const NOMORERESULTS = 2
|
|
Global Const NOMORERPCRESULTS = 3
|
|
|
|
|
|
Rem versions for SQLSetLVersion
|
|
|
|
Global Const SQLVER42% = 8
|
|
Global Const SQLVER60% = 9
|
|
|
|
|
|
|
|
Rem option values permitted in option setting/querying/clearing
|
|
Rem used by SqlSetOpt%(), SqlIsOpt%(), and SqlClrOpt%().
|
|
|
|
Global Const SQLBUFFER% = 0
|
|
Global Const SQLOFFSET% = 1
|
|
Global Const SQLROWCOUNT% = 2
|
|
Global Const SQLSTAT% = 3
|
|
Global Const SQLTEXTLIMIT% = 4
|
|
Global Const SQLTEXTSIZE% = 5
|
|
Global Const SQLARITHABORT% = 6
|
|
Global Const SQLARITHIGNORE% = 7
|
|
Global Const SQLNOAUTOFREE% = 8
|
|
Global Const SQLNOCOUNT% = 9
|
|
Global Const SQLNOEXEC% = 10
|
|
Global Const SQLPARSEONLY% = 11
|
|
Global Const SQLSHOWPLAN% = 12
|
|
Global Const SQLSTORPROCID% = 13
|
|
Global Const SQLANSItoOEM% = 14
|
|
Global Const SQLCLIENTCURSORS% = 16
|
|
|
|
Rem Data type token values. Used for datatype determination for a column.
|
|
|
|
Global Const SQLTEXT% = &H23
|
|
Global Const SQLARRAY% = &H24
|
|
Global Const SQLVARBINARY% = &H25
|
|
Global Const SQLINTN% = &H26
|
|
Global Const SQLVARCHAR% = &H27
|
|
Global Const SQLBINARY% = &H2D
|
|
Global Const SQLIMAGE% = &H22
|
|
Global Const SQLCHAR% = &H2F
|
|
Global Const SQLINT1% = &H30
|
|
Global Const SQLBIT% = &H32
|
|
Global Const SQLINT2% = &H34
|
|
Global Const SQLINT4% = &H38
|
|
Global Const SQLMONEY% = &H3C
|
|
Global Const SQLDATETIME% = &H3D
|
|
Global Const SQLFLT8% = &H3E
|
|
Global Const SQLFLTN% = &H6D
|
|
Global Const SQLFLT4% = &H3B
|
|
Global Const SQLMONEYN% = &H6E
|
|
Global Const SQLDATETIMN% = &H6F
|
|
Global Const SQLAOPCNT% = &H4B
|
|
Global Const SQLAOPSUM% = &H4D
|
|
Global Const SQLAOPAVG% = &H4F
|
|
Global Const SQLAOPMIN% = &H51
|
|
Global Const SQLAOPMAX% = &H52
|
|
Global Const SQLAOPANY% = &H53
|
|
Global Const SQLAOPNOOP% = &H56
|
|
Global Const SQLMONEY4% = &H7A
|
|
Global Const SQLDATETIM4% = &H3A
|
|
Global Const SQLDECIMAL% = &H6A
|
|
Global Const SQLNUMERIC = &H6C
|
|
|
|
|
|
|
|
Rem error numbers VBSQL error codes that are passed to local error
|
|
Rem handler
|
|
|
|
Global Const SQLEMEM% = 10000
|
|
Global Const SQLENULL% = 10001
|
|
Global Const SQLENLOG% = 10002
|
|
Global Const SQLEPWD% = 10003
|
|
Global Const SQLECONN% = 10004
|
|
Global Const SQLEDDNE% = 10005
|
|
Global Const SQLNULLO% = 10006
|
|
Global Const SQLESMSG% = 10007
|
|
Global Const SQLEBTOK% = 10008
|
|
Global Const SQLENSPE% = 10009
|
|
Global Const SQLEREAD% = 10010
|
|
Global Const SQLECNOR% = 10011
|
|
Global Const SQLETSIT% = 10012
|
|
Global Const SQLEPARM% = 10013
|
|
Global Const SQLEAUTN% = 10014
|
|
Global Const SQLECOFL% = 10015
|
|
Global Const SQLERDCN% = 10016
|
|
Global Const SQLEICN% = 10017
|
|
Global Const SQLECLOS% = 10018
|
|
Global Const SQLENTXT% = 10019
|
|
Global Const SQLEDNTI% = 10020
|
|
Global Const SQLETMTD% = 10021
|
|
Global Const SQLEASEC% = 10022
|
|
Global Const SQLENTLL% = 10023
|
|
Global Const SQLETIME% = 10024
|
|
Global Const SQLEWRIT% = 10025
|
|
Global Const SQLEMODE% = 10026
|
|
Global Const SQLEOOB% = 10027
|
|
Global Const SQLEITIM% = 10028
|
|
Global Const SQLEDBPS% = 10029
|
|
Global Const SQLEIOPT% = 10030
|
|
Global Const SQLEASNL% = 10031
|
|
Global Const SQLEASUL% = 10032
|
|
Global Const SQLENPRM% = 10033
|
|
Global Const SQLEDBOP% = 10034
|
|
Global Const SQLENSIP% = 10035
|
|
Global Const SQLECNULL% = 10036
|
|
Global Const SQLESEOF% = 10037
|
|
Global Const SQLERPND% = 10038
|
|
Global Const SQLECSYN% = 10039
|
|
Global Const SQLENONET% = 10040
|
|
Global Const SQLEBTYP% = 10041
|
|
Global Const SQLEABNC% = 10042
|
|
Global Const SQLEABMT% = 10043
|
|
Global Const SQLEABNP% = 10044
|
|
Global Const SQLEBNCR% = 10045
|
|
Global Const SQLEAAMT% = 10046
|
|
Global Const SQLENXID% = 10047
|
|
Global Const SQLEIFNB% = 10048
|
|
Global Const SQLEKBCO% = 10049
|
|
Global Const SQLEBBCI% = 10050
|
|
Global Const SQLEKBCI% = 10051
|
|
Global Const SQLEBCWE% = 10052
|
|
Global Const SQLEBCNN% = 10053
|
|
Global Const SQLEBCOR% = 10054
|
|
Global Const SQLEBCPI% = 10055
|
|
Global Const SQLEBCPN% = 10056
|
|
Global Const SQLEBCPB% = 10057
|
|
Global Const SQLEVDPT% = 10058
|
|
Global Const SQLEBIVI% = 10059
|
|
Global Const SQLEBCBC% = 10060
|
|
Global Const SQLEBCFO% = 10061
|
|
Global Const SQLEBCVH% = 10062
|
|
Global Const SQLEBCUO% = 10063
|
|
Global Const SQLEBUOE% = 10064
|
|
Global Const SQLEBWEF% = 10065
|
|
Global Const SQLEBTMT% = 10066
|
|
Global Const SQLEBEOF% = 10067
|
|
Global Const SQLEBCSI% = 10068
|
|
Global Const SQLEPNUL% = 10069
|
|
Global Const SQLEBSKERR% = 10070
|
|
Global Const SQLEBDIO% = 10071
|
|
Global Const SQLEBCNT% = 10072
|
|
Global Const SQLEMDBP% = 10073
|
|
Global Const SQLEINIT% = 10074
|
|
Global Const SQLCRSINV% = 10075
|
|
Global Const SQLCRSCMD% = 10076
|
|
Global Const SQLCRSNOIND% = 10077
|
|
Global Const SQLCRSDIS% = 10078
|
|
Global Const SQLCRSAGR% = 10079
|
|
Global Const SQLCRSORD% = 10080
|
|
Global Const SQLCRSMEM% = 10081
|
|
Global Const SQLCRSBSKEY% = 10082
|
|
Global Const SQLCRSNORES% = 10083
|
|
Global Const SQLCRSVIEW% = 10084
|
|
Global Const SQLCRSBUFR% = 10085
|
|
Global Const SQLCRSFROWN% = 10086
|
|
Global Const SQLCRSBROL% = 10087
|
|
Global Const SQLCRSFRAND% = 10088
|
|
Global Const SQLCRSFLAST% = 10089
|
|
Global Const SQLCRSRO% = 10090
|
|
Global Const SQLCRSTAB% = 10091
|
|
Global Const SQLCRSUPDTAB% = 10092
|
|
Global Const SQLCRSUPDNB% = 10093
|
|
Global Const SQLCRSVIIND% = 10094
|
|
Global Const SQLCRSNOUPD% = 10095
|
|
Global Const SQLCRSOS2% = 10096
|
|
Global Const SQLEBCSA% = 10097
|
|
Global Const SQLEBCRO% = 10098
|
|
Global Const SQLEBCNE% = 10099
|
|
Global Const SQLEBCSK% = 10100
|
|
Global Const SQLEUVBF% = 10101
|
|
Global Const SQLEBIHC% = 10102
|
|
Global Const SQLEBWFF% = 10103
|
|
|
|
Rem The severity levels are defined here for error handlers
|
|
|
|
Global Const EXINFO% = 1
|
|
Global Const EXUSER% = 2
|
|
Global Const EXNONFATAL% = 3
|
|
Global Const EXCONVERSION% = 4
|
|
Global Const EXSERVER% = 5
|
|
Global Const EXTIME% = 6
|
|
Global Const EXPROGRAM% = 7
|
|
Global Const EXRESOURCE% = 8
|
|
Global Const EXCOMM% = 9
|
|
Global Const EXFATAL% = 10
|
|
Global Const EXCONSISTENCY% = 11
|
|
|
|
Rem Length of text timestamp and text pointer
|
|
Global Const SQLTXTSLEN% = 8 ' length of text timestamp
|
|
Global Const SQLTXPLEN% = 16 ' length of text pointer
|
|
|
|
Global Const OFF_SELECT% = &H16D
|
|
Global Const OFF_FROM% = &H14F
|
|
Global Const OFF_ORDER% = &H165
|
|
Global Const OFF_COMPUTE% = &H139
|
|
Global Const OFF_TABLE% = &H173
|
|
Global Const OFF_PROCEDURE% = &H16A
|
|
Global Const OFF_STATEMENT% = &H1CB
|
|
Global Const OFF_PARAM% = &H1C4
|
|
Global Const OFF_EXEC% = &H12C
|
|
|
|
Rem Bulk Copy Definitions (bcp)
|
|
|
|
Global Const DBIN% = 1 ' transfer from client to server
|
|
Global Const DBOUT% = 2 ' transfer from server to client
|
|
|
|
Global Const BCPMAXERRS% = 1 ' SqlBcpControl parameter
|
|
Global Const BCPFIRST% = 2 ' SqlBcpControl parameter
|
|
Global Const BCPLAST% = 3 ' SqlBcpControl parameter
|
|
Global Const BCPBATCH% = 4 ' SqlBcpControl parameter
|
|
Global Const BCPKEEPNULLS% = 5 ' SqlBcpControl parameter
|
|
|
|
Rem Cursor related constants
|
|
|
|
Rem Following flags are used in the concuropt parameter in the
|
|
Rem SqlCursorOpen function
|
|
|
|
Global Const CURREADONLY% = 1 ' Read only cursor, no data modifications
|
|
Global Const CURLOCKCC% = 2 ' Intent to update, all fetched data locked
|
|
' when dbcursorfetch is called inside a
|
|
' transaction block
|
|
Global Const CUROPTCC% = 3 ' Optimistic concurrency control, data
|
|
' modifications succeed only if the row
|
|
' hasn't been updated since the last fetch
|
|
Global Const CUROPTCCVAL% = 4 ' Optimistic concurrency control based on
|
|
' selected column values
|
|
|
|
Rem Following flags are used in the scrollopt parameter in the
|
|
Rem SqlCursorOpen function
|
|
|
|
Global Const CURFORWARD% = 0 ' Forward only scrolling
|
|
Global Const CURKEYSET% = -1 ' Keyset driven scrolling
|
|
Global Const CURDYNAMIC% = 1 ' Fully dynamic
|
|
Global Const CURINSENSITIVE% = -2 ' Server-side cursors only
|
|
|
|
Rem Any other number indicates mixed scrolling. (Keyset driven within the given
|
|
Rem number, dynamic outside)
|
|
|
|
Rem Following flags define the fetchtype in the SqlCursorFetch function
|
|
|
|
Global Const FETCHFIRST% = 1 ' Fetch first n rows
|
|
Global Const FETCHNEXT% = 2 ' Fetch next n rows
|
|
Global Const FETCHPREV% = 3 ' Fetch previous n rows
|
|
Global Const FETCHRANDOM% = 4 ' Fetch n rows beginning with given row#
|
|
Global Const FETCHRELATIVE% = 5 ' Fetch relative to previous fetch row #
|
|
Global Const FETCHLAST% = 6 ' Fetch the last n rows
|
|
|
|
Rem Following flags define the per row status as filled by SqlCursorFetch
|
|
|
|
Global Const FTCEMPTY% = &H0 ' No row available
|
|
Global Const FTCSUCCEED% = &H1 ' Fetch succeeded, (failed if not set)
|
|
Global Const FTCMISSING% = &H2 ' The row is missing
|
|
Global Const FTCENDOFKEYSET% = &H4' End of the keyset reached
|
|
Global Const FTCENDOFRESULTS% = &H8 ' End of results set reached
|
|
|
|
Rem Following flags define the operator types for the SqlCursor function
|
|
|
|
Global Const CRSUPDATE% = 1 ' Update operation
|
|
Global Const CRSDELETE% = 2 ' Delete operation
|
|
Global Const CRSINSERT% = 3 ' Insert operation
|
|
Global Const CRSREFRESH% = 4 ' Refetch given row
|
|
Global Const CRSLOCKCC% = 5 ' Lock given row (if only inside a transaction)
|
|
|
|
Rem Following define row information type requested from SqlColInfo
|
|
Global Const SQLCI_REGULAR% = 1 ' regular row
|
|
Global Const SQLCI_ALTERNATE% = 2 ' compute row
|
|
Global Const SQLCI_CURSOR% = 3 ' cursor row
|
|
|
|
Rem Following are values returned to ColInfo Usertype Type field for Cursors
|
|
Global Const CU_CLIENT& = &H1
|
|
Global Const CU_SERVER& = &H2
|
|
Global Const CU_KEYSET& = &H4
|
|
Global Const CU_MIXED& = &H8
|
|
Global Const CU_DYNAMIC& = &H10
|
|
Global Const CU_FORWARD& = &H20
|
|
Global Const CU_INSENSITIVE& = &H40
|
|
Global Const CU_READONLY& = &H80
|
|
Global Const CU_LOCKCC& = &H100
|
|
Global Const CU_OPTCC& = &H200
|
|
Global Const CU_OPTCCVAL& = &H400
|
|
|
|
Rem Following are values returned to ColInfo Usertype Status field forCursors
|
|
Global Const CU_FILLING = &H1
|
|
Global Const CU_FILLED = &H2
|
|
|
|
|
|
Rem Remote Procedure Call function options
|
|
Global Const SQLRPCRECOMPILE% = &H1 ' recompile the stored procedure
|
|
Global Const SQLRPCRESET% = &H4 ' reset rpc processing
|
|
Global Const SQLRPCRETURN% = 1 ' return parameter
|
|
|
|
Rem The following values are passed to SqlServerEnum for searching criteria.
|
|
Global Const NETSEARCH% = 1
|
|
Global Const LOCSEARCH% = 2
|
|
|
|
|
|
Rem These constants are the possible return values from SqlServerEnum.
|
|
Global Const ENUMSUCCESS% = 0
|
|
Global Const MOREDATA% = 1
|
|
Global Const NETNOTAVAIL% = 2
|
|
Global Const OUTOFMEMORY% = 4
|
|
Global Const NOTSUPPORTED% = 8
|
|
|
|
Rem These constants are passed to SqlUpdateText for setting update type
|
|
Global Const UTTEXTPTR% = &H1
|
|
Global Const UTTEXT% = &H2
|
|
Global Const UTMORETEXT% = &H4
|
|
Global Const UTDELETEONLY% = &H8
|
|
Global Const UTLOG% = &H10
|
|
|
|
|
|
Rem These constants are used by SqlProcInfo
|
|
Global Const SERVTYPEUNKNOWN% = 0
|
|
Global Const SERVTYPEMICROSOFT% = 1
|
|
|
|
|
|
Rem State unknown in SqlColInfo
|
|
Global Const SQLUNKNOWN% = 2
|
|
|
|
Rem User defined data type for SqlGetColumnInfo
|
|
Type ColumnData
|
|
Coltype As Integer
|
|
Collen As Long
|
|
Colname As String * 31
|
|
ColSqlType As String * 31
|
|
End Type
|
|
|
|
Rem User defined data type for SqlGetAltColInfo
|
|
Type AltColumnData
|
|
ColID As Integer
|
|
DataType As Integer
|
|
MaxLen As Long
|
|
AggType As Integer
|
|
AggOpName As String * 31
|
|
End Type
|
|
|
|
Rem User defined data type for SqlBcpColumnFormat
|
|
Type BcpColData
|
|
FType As Integer
|
|
FPLen As Integer
|
|
fColLen As Long
|
|
FTerm As String * 31
|
|
FTLen As Integer
|
|
TCol As Integer
|
|
End Type
|
|
|
|
Rem User defined data type for SqlDateCrack
|
|
Type DateInfo
|
|
Year As Integer
|
|
Quarter As Integer
|
|
Month As Integer
|
|
DayOfYear As Integer
|
|
Day As Integer
|
|
Week As Integer
|
|
WeekDay As Integer
|
|
Hour As Integer
|
|
Minute As Integer
|
|
Second As Integer
|
|
Millisecond As Integer
|
|
End Type
|
|
|
|
Rem User defined data type for SqlColInfo
|
|
Type ColInfo
|
|
Name As String * 31
|
|
ActualName As String * 31
|
|
TableName As String * 31
|
|
CType As Integer
|
|
UserType As Long
|
|
MaxLength As Long
|
|
Precision As Integer
|
|
Scale As Integer
|
|
VarLength As Integer
|
|
Null As Integer
|
|
CaseSensitive As Integer
|
|
Updatable As Integer
|
|
Identity As Integer
|
|
End Type
|
|
|
|
Type ProcInfo
|
|
ServerType As Integer
|
|
ServerMajor As Integer
|
|
ServerMinor As Integer
|
|
ServerRevision As Integer
|
|
ServerName As String * 31
|
|
NetLibName As String * 31
|
|
NetLibConnStr As String * 256
|
|
End Type
|
|
|
|
Type SqlCursorInfo
|
|
TotCols As Long
|
|
TotRows As Long
|
|
CurRow As Long
|
|
TotRowsFetched As Long
|
|
CursorType As Long
|
|
Status As Long
|
|
End Type
|
|
|
|
|
|
Rem Function/Sub declarations for Visual Basic App Global module
|
|
Declare Function SqlInit Lib "VBSQL.VBX" () As String
|
|
Declare Sub SqlWinExit Lib "VBSQL.VBX" ()
|
|
Declare Function SqlLogin Lib "VBSQL.VBX" () As Integer
|
|
Declare Function SQLSETLUSER Lib "VBSQL.VBX" (ByVal Login As Integer, User As String) As Integer
|
|
Declare Function SqlSetLPwd Lib "VBSQL.VBX" (ByVal Login As Integer, Pwd As String) As Integer
|
|
Declare Function SqlSetLApp Lib "VBSQL.VBX" (ByVal Login As Integer, App As String) As Integer
|
|
Declare Function SqlSetLHost Lib "VBSQL.VBX" (ByVal Login As Integer, Host As String) As Integer
|
|
Declare Function SqlSetLNatLang Lib "VBSQL.VBX" (ByVal Login As Integer, Lang As String) As Integer
|
|
Declare Function SqlSetLSecure Lib "VBSQL.VBX" (ByVal Login As Integer) As Integer
|
|
Declare Function SQLSETLVERSION Lib "VBSQL.VBX" (ByVal Login As Integer, ByVal Version As Integer) As Integer
|
|
Declare Function SqlOpen Lib "VBSQL.VBX" (ByVal Login As Integer, Server As String) As Integer
|
|
Declare Sub SqlClose Lib "VBSQL.VBX" (ByVal SqlConn As Integer)
|
|
Declare Sub SqlFreeLogin Lib "VBSQL.VBX" (ByVal Login As Integer)
|
|
Declare Function SqlCmd Lib "VBSQL.VBX" (ByVal SqlConn As Integer, Cmd As String) As Integer
|
|
Declare Function SqlExec Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlResults Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlNextRow Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlNumCols Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlColName Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Column As Integer) As String
|
|
Declare Function SqlColType Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Column As Integer) As Integer
|
|
Declare Function SqlColUType Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Column As Integer) As Long
|
|
Declare Function SqlColLen Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Column As Integer) As Integer
|
|
Declare Function SqlDatLen Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Column As Integer) As Long
|
|
Declare Function SqlData Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Column As Integer) As String
|
|
Declare Function SqlColInfo Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal InfoType As Integer, ByVal Column As Integer, ByVal ComputeId As Integer, ColInf As ColInfo) As Integer
|
|
Declare Function SqlDataReady Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Sub SqlExit Lib "VBSQL.VBX" ()
|
|
Declare Function SqlSetLoginTime Lib "VBSQL.VBX" (ByVal Seconds As Integer) As Integer
|
|
Declare Function SqlSetTime Lib "VBSQL.VBX" (ByVal Seconds As Integer) As Integer
|
|
Declare Function SqlSend Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlOk Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlGetChar Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal CharNum As Integer) As String
|
|
Declare Function SqlStrCpy Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Start As Integer, ByVal NumBytes As Integer, Buffer As String) As Integer
|
|
Declare Function SqlStrLen Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlSetOpt Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Opt As Integer, Param As String) As Integer
|
|
Declare Function SqlClrOpt Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Opt As Integer, Param As String) As Integer
|
|
Declare Function SqlIsOpt Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Opt As Integer, Param As String) As Integer
|
|
Declare Sub SqlFreeBuf Lib "VBSQL.VBX" (ByVal SqlConn As Integer)
|
|
Declare Function SqlCancel Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlCanQuery Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlGetRow Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal RowNum As Long) As Integer
|
|
Declare Sub SqlClrBuf Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal RowNum As Long)
|
|
Declare Function SqlColBrowse Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Column As Integer) As Integer
|
|
Declare Function SqlColSource Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal TabNum As Integer) As String
|
|
Declare Function SqlQual Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal TabNum As Integer, TableName As String) As String
|
|
Declare Function SqlTabBrowse Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal TabNum As Integer) As Integer
|
|
Declare Function SqlTabCount Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlTabName Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal TabNum As Integer) As String
|
|
Declare Function SqlTabSource Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal ColNum As Integer, TabNum As Integer) As String
|
|
Declare Function SqlTsNewLen Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlTsNewVal Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As String
|
|
Declare Function SqlTsPut Lib "VBSQL.VBX" (ByVal SqlConn As Integer, NewTs As String, ByVal NewTsLen As Integer, ByVal TabNum As Integer, TabName As String) As Integer
|
|
Declare Function SqlMoreText Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Size As Long, Text As String) As Integer
|
|
Declare Function SqlTxPtr Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Column As Integer) As String
|
|
Declare Function SqlTxTimeStamp Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Column As Integer) As String
|
|
Declare Function SqlTxTsNewVal Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As String
|
|
Declare Function SqlTxTsPut Lib "VBSQL.VBX" (ByVal SqlConn As Integer, NewTxTs As String, ByVal Column As Integer) As Integer
|
|
Declare Function SqlWriteText Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ObjName As String, TextPtr As String, ByVal TextPtrLen As Integer, TimeStamp As String, ByVal Logging As Integer, ByVal Size As Long, Text As String) As Integer
|
|
Declare Function SqlUpdateText Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ObjName As String, TextPtr As String, TimeStamp As String, ByVal UType As Integer, ByVal Offset As Long, ByVal DelLen As Long, SrcName As String, ByVal Size As Long, Text As String) As Integer
|
|
Declare Function SqlCmdRow Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlIsCount Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlCount Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Long
|
|
Declare Function SqlCurCmd Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlCurRow Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Long
|
|
Declare Function SqlDead Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlFirstRow Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Long
|
|
Declare Function SqlGetTime Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlIsAvail Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlLastRow Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Long
|
|
Declare Function SqlMoreCmds Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlNumOrders Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlRows Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlRowType Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlNumAlts Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal ComputeId As Integer) As Integer
|
|
Declare Function SqlAltType Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal ComputeId As Integer, ByVal Column As Integer) As Integer
|
|
Declare Function SqlAltUType Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal ComputeId As Integer, ByVal Column As Integer) As Long
|
|
Declare Function SqlAltLen Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal ComputeId As Integer, ByVal Column As Integer) As Integer
|
|
Declare Function SqlADLen Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal ComputeId As Integer, ByVal Column As Integer) As Long
|
|
Declare Function SqlAData Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal ComputeId As Integer, ByVal Column As Integer) As String
|
|
Declare Function SqlAltColId Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal ComputeId As Integer, ByVal Column As Integer) As Integer
|
|
Declare Function SqlAltOp Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal ComputeId As Integer, ByVal Column As Integer) As Integer
|
|
Declare Function SqlByList Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal ComputeId As Integer) As String
|
|
Declare Function SqlNumCompute Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlUse Lib "VBSQL.VBX" (ByVal SqlConn As Integer, DataBase As String) As Integer
|
|
Declare Function SqlGetOff Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal OffType As Integer, ByVal StartFrom As Integer) As Integer
|
|
Declare Function SqlOrderCol Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Order As Integer) As Integer
|
|
Declare Function SqlChange Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As String
|
|
Declare Function SqlGetMaxProcs Lib "VBSQL.VBX" () As Integer
|
|
Declare Function SqlName Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As String
|
|
Declare Function SQLPRTYPE Lib "VBSQL.VBX" (ByVal Token As Integer) As String
|
|
Declare Sub SqlSetAvail Lib "VBSQL.VBX" (ByVal SqlConn As Integer)
|
|
Declare Function SqlSetMaxProcs Lib "VBSQL.VBX" (ByVal MaxProcs As Integer) As Integer
|
|
Declare Function SqlBCPColfmt Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal FColumn As Integer, ByVal FType As Integer, ByVal FPLen As Integer, ByVal FCLen As Long, FTerm As String, ByVal FTLen As Integer, ByVal TCol As Integer) As Integer
|
|
Declare Function SqlBCPColumns Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal ColCount As Integer) As Integer
|
|
Declare Function SqlBCPControl Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal Param As Integer, ByVal Value As Long) As Integer
|
|
Declare Function SqlBCPExec Lib "VBSQL.VBX" (ByVal SqlConn As Integer, RowsCopied As Long) As Integer
|
|
Declare Function SqlBCPInit Lib "VBSQL.VBX" (ByVal SqlConn As Integer, TblName As String, HFile As String, ErrFile As String, ByVal Direction As Integer) As Integer
|
|
Declare Function SqlBCPSetL Lib "VBSQL.VBX" (ByVal Loginrec As Integer, ByVal Enable As Integer) As Integer
|
|
Declare Function SqlBCPDone Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlSendCmd Lib "VBSQL.VBX" (ByVal SqlConn As Integer, Cmd As String) As Integer
|
|
Declare Function SqlGetColumnInfo Lib "VBSQL.VBX" (ByVal SqlConn As Integer, Col As ColumnData, ByVal Column As Integer) As Integer
|
|
Declare Function SqlGetAltColInfo Lib "VBSQL.VBX" (ByVal SqlConn As Integer, AltCol As AltColumnData, ByVal ComputeId As Integer, ByVal AltColumn As Integer) As Integer
|
|
Declare Function SqlOpenConnection Lib "VBSQL.VBX" (Server As String, LoginID As String, Pwd As String, WorkStation As String, Application As String) As Integer
|
|
Declare Function SqlTextUpdate1Row Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ObjName As String, ByVal Column As Integer, Text As String) As Integer
|
|
Declare Function SqlTextUpdateManyRows Lib "VBSQL.VBX" (ByVal QSqlConn As Integer, ByVal USqlConn As Integer, ObjName As String, ByVal Column As Integer, Text As String) As Long
|
|
Declare Function SqlBCPColumnFormat Lib "VBSQL.VBX" (ByVal SqlConn As Integer, Col As BcpColData, ByVal NumCols As Integer) As Integer
|
|
Declare Function SqlTsUpdate Lib "VBSQL.VBX" (ByVal QSqlConn As Integer, ByVal USqlConn As Integer, ByVal TabNum As Integer, TabName As String) As Integer
|
|
Declare Function SqlCursorOpen Lib "VBSQL.VBX" (ByVal SqlConn As Integer, Statement As String, ByVal ScrollOpt As Integer, ByVal ConCurOpt As Integer, ByVal nRows As Integer, PStat As Long) As Integer
|
|
Declare Function SqlCursorFetch Lib "VBSQL.VBX" (SqlCursor As Integer, ByVal FetchType As Integer, ByVal RowNum As Integer) As Integer
|
|
Declare Function SqlCursorFetchEx Lib "VBSQL.VBX" (SqlCursor As Integer, ByVal FetchType As Integer, ByVal RowNum As Long, ByVal nRows As Long, ByVal Reserved As Long) As Integer
|
|
Declare Function SqlCursorData Lib "VBSQL.VBX" (SqlCursor As Integer, ByVal BufNo As Integer, ByVal Column As Integer) As String
|
|
Declare Function SqlCursor Lib "VBSQL.VBX" (SqlCursor As Integer, ByVal OpType As Integer, ByVal BufNo As Integer, Table As String, Statement As String) As Integer
|
|
Declare Sub SqlCursorClose Lib "VBSQL.VBX" (SqlCursor As Integer)
|
|
Declare Function SqlCursorColInfo Lib "VBSQL.VBX" (SqlCursor As Integer, ByVal Column As Integer, Colname As String, Coltype As Integer, Collen As Long, UserType As Integer) As Integer
|
|
Declare Function SqlCursorInfo Lib "VBSQL.VBX" (SqlCursor As Integer, Columns As Integer, Rows As Long) As Integer
|
|
Declare Function SqlCursorInfoEx Lib "VBSQL.VBX" (SqlCursor As Integer, SqlCursInf As SqlCursorInfo) As Integer
|
|
Declare Function SqlDateCrack Lib "VBSQL.VBX" (ByVal SqlConn As Integer, SqlDateInfo As DateInfo, DateTime As String) As Integer
|
|
Declare Function SQLHasRetStat Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SQLNumRets Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SQLRetData Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal RetNum As Integer) As String
|
|
Declare Function SQLRetLen Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal RetNum As Integer) As Long
|
|
Declare Function SQLRetName Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal RetNum As Integer) As String
|
|
Declare Function SQLRetStatus Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Long
|
|
Declare Function SQLRetType Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ByVal RetNum As Integer) As Integer
|
|
Declare Function SqlRpcInit Lib "VBSQL.VBX" (ByVal SqlConn As Integer, RpcName As String, ByVal Options As Integer) As Integer
|
|
Declare Function SqlRpcParam Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ParamName As String, ByVal Status As Integer, ByVal ParamType As Integer, ByVal MaxLen As Long, ByVal DataLen As Long, Value As String) As Integer
|
|
Declare Function SqlRpcSend Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlRpcExec Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Sub SqlRPwClr Lib "VBSQL.VBX" (ByVal Login As Integer)
|
|
Declare Function SqlRPwSet Lib "VBSQL.VBX" (ByVal Login As Integer, SrvName As String, Password As String) As Integer
|
|
Declare Function SqlServerEnum Lib "VBSQL.VBX" (ByVal SearchMode As Integer, ServerBuf As String, NumEntries As Integer) As Integer
|
|
Declare Function SqlSetLPacket Lib "VBSQL.VBX" (ByVal Login As Integer, ByVal PacketSize As Integer) As Integer
|
|
Declare Function SqlGetPacket Lib "VBSQL.VBX" (ByVal SqlConn As Integer) As Integer
|
|
Declare Function SqlProcInfo Lib "VBSQL.VBX" (ByVal SqlConn As Integer, ProcInf As ProcInfo) As Integer
|
|
|
|
|
|
|
|
|