home *** CD-ROM | disk | FTP | other *** search
/ Microsoft Internet Business Development Kit / PRODUCT_CD.iso / sqlsvr / odbcsdk / samples / vbdemo / odbext_m.bi < prev    next >
Encoding:
Text File  |  1994-12-07  |  5.6 KB  |  48 lines

  1. '
  2. '|========================================================================|
  3. '| ODBC Module Extended Definitions                                       |
  4. '|========================================================================|
  5. '
  6. '  ODBC Extended API's Definitions
  7. '
  8. '  Level 1 Prototypes
  9. '
  10. Declare Function SQLBindCol Lib "odbc.dll" (ByVal hstmt&, ByVal icol%, ByVal fCType%, rgbValue As Any, ByVal cbValueMax&, pcbValue&) As Integer
  11. Declare Function SQLBindParameter Lib "odbc.dll" (ByVal hstmt&, ByVal ipar%, ByVal fParamType%, ByVal fCType%, ByVal fSqlType%, ByVal cbColDef&, ByVal ibScale%, rgbValue As Any, ByVal cbValueMax&, pcbValue As Long) As Integer
  12. Declare Function SQLColumns Lib "odbc.dll" (ByVal hstmt&, szTblQualifier As Any, ByVal cbTblQualifier%, szTblOwner As Any, ByVal cbTblOwner%, szTblName As Any, ByVal cbTblName%, szColName As Any, ByVal cbColName%) As Integer
  13. Declare Function SQLDriverConnect Lib "odbc.dll" (ByVal hdbc&, ByVal hwnd%, ByVal szCSIn$, ByVal cbCSIn%, ByVal szCSOut$, ByVal cbCSMax%, cbCSOut%, ByVal fDrvrComp%) As Integer
  14. Declare Function SQLGetConnectOption Lib "odbc.dll" (ByVal hdbc&, ByVal fOption%, pvParam As Any) As Integer
  15. Declare Function SQLGetData Lib "odbc.dll" (ByVal hstmt&, ByVal icol%, ByVal fCType%, rgbValue As Any, ByVal cbValueMax&, pcbValue&) As Integer
  16. Declare Function SQLGetFunctions Lib "odbc.dll" (ByVal hdbc&, ByVal fFunction%, pfExists%) As Integer
  17. Declare Function SQLGetInfo Lib "odbc.dll" (ByVal hdbc&, ByVal fInfoType%, rgbInfoValue As Any, ByVal cbInfoMax%, cbInfoOut%) As Integer
  18. Declare Function SQLGetStmtOption Lib "odbc.dll" (ByVal hstmt&, ByVal fOption%, pvParam As Any) As Integer
  19. Declare Function SQLGetTypeInfo Lib "odbc.dll" (ByVal hstmt&, ByVal fSqlType%) As Integer
  20. Declare Function SQLParamData Lib "odbc.dll" (ByVal hstmt&, prgbValue As Any) As Integer
  21. Declare Function SQLPutData Lib "odbc.dll" (ByVal hstmt&, rgbValue As Any, ByVal cbValue&) As Integer
  22. Declare Function SQLSetConnectOption Lib "odbc.dll" (ByVal hdbc&, ByVal fOption%, ByVal vParam&) As Integer
  23. Declare Function SQLSetStmtOption Lib "odbc.dll" (ByVal hstmt&, ByVal fOption%, ByVal vParam&) As Integer
  24. Declare Function SQLSpecialColumns Lib "odbc.dll" (ByVal hstmt&, ByVal fColType%, szTblQualifier As Any, ByVal cbTblQualifier%, szTblOwner As Any, ByVal cbTblOwner%, szTblName As Any, ByVal cbTblName%, ByVal fScope%, ByVal fNullable%) As Integer
  25. Declare Function SQLStatistics Lib "odbc.dll" (ByVal hstmt&, szTblQualifier As Any, ByVal cbTblQualifier%, szTblOwner As Any, ByVal cbTblOwner%, szTblName As Any, ByVal cbTblName%, ByVal fUnique%, ByVal fAccuracy%) As Integer
  26. Declare Function SQLTables Lib "odbc.dll" (ByVal hstmt&, szTblQualifier As Any, ByVal cbTblQualifier%, szTblOwner As Any, ByVal cbTblOwner%, szTblName As Any, ByVal cbTblName%, szTblType As Any, ByVal cbTblType%) As Integer
  27.  
  28. '  Level 2 Prototypes
  29. '
  30. Declare Function SQLBrowseConnect Lib "odbc.dll" (ByVal hdbc&, ByVal szConnStrIn$, ByVal cbConnStrIn%, ByVal szConnStrOut$, ByVal cbConnStrOutMax%, pcbConnStrOut%) As Integer
  31. Declare Function SQLColumnPrivileges Lib "odbc.dll" (ByVal hstmt&, szTQf As Any, ByVal cbTQf%, szTOwn As Any, ByVal cbTOwn%, szTName As Any, ByVal cbTName%, szColName As Any, ByVal cbColName%) As Integer
  32. Declare Function SQLDrivers Lib "odbc.dll" (ByVal henv&, ByVal fDirection%, ByVal szDriverDesc$, ByVal cbDriverDescMax%, pcbDriverDesc%, ByVal szDriverAttr$, ByVal cbDrvrAttrMax%, pcbDrvrAttr%) As Integer
  33. Declare Function SQLDataSources Lib "odbc.dll" (ByVal henv&, ByVal fDirection%, ByVal szDSN$, ByVal cbDSNMax%, pcbDSN%, ByVal szDescription$, ByVal cbDescriptionMax%, pcbDescription%) As Integer
  34. Declare Function SQLDescribeParam Lib "odbc.dll" (ByVal hstmt&, ByVal ipar%, pfSqlType%, pcbColDef&, pibScale%, pfNullable%) As Integer
  35. Declare Function SQLExtendedFetch Lib "odbc.dll" (ByVal hstmt&, ByVal fFetchType%, ByVal irow&, pcrow&, rgfRowStatus%) As Integer
  36. Declare Function SQLForeignKeys Lib "odbc.dll" (ByVal hstmt&, ByVal PTQual&, ByVal PTQual%, ByVal PTOwnr&, ByVal PTOwnr%, ByVal PTName&, ByVal PTName%, ByVal FTQual&, ByVal FTQf%, ByVal FTOwnr&, ByVal FTOwnr%, ByVal FTName&, ByVal FTName%) As Integer
  37. Declare Function SQLMoreResults Lib "odbc.dll" (ByVal hstmt&) As Integer
  38. Declare Function SQLNativeSql Lib "odbc.dll" (ByVal hdbc&, ByVal szSqlStrIn$, ByVal cbSqlStrIn&, ByVal szSqlStr$, ByVal cbSqlStrMax&, pcbSqlStr&) As Integer
  39. Declare Function SQLNumParams Lib "odbc.dll" (ByVal hstmt&, pcpar%) As Integer
  40. Declare Function SQLParamOptions Lib "odbc.dll" (ByVal hstmt&, ByVal crow%, pirow&) As Integer
  41. Declare Function SQLPrimaryKeys Lib "odbc.dll" (ByVal hstmt&, szTblQualifier As Any, ByVal cbTblQualifier%, szTblOwner As Any, ByVal cbTblOwner%, szTblName As Any, ByVal cbTblName%) As Integer
  42. Declare Function SQLProcedureColumns Lib "odbc.dll" (ByVal hstmt&, szProcQualifier As Any, ByVal cbProcQualifier%, szProcOwner As Any, ByVal cbProcOwner%, szProcName As Any, ByVal cbProcName%, szColName As Any, ByVal cbColName%) As Integer
  43. Declare Function SQLProcedures Lib "odbc.dll" (ByVal hstmt&, szProcQualifier As Any, ByVal cbProcQualifier%, szProcOwner As Any, ByVal cbProcOwner%, szProcName As Any, ByVal cbProcName%) As Integer
  44. Declare Function SQLSetPos Lib "odbc.dll" (ByVal hstmt&, ByVal irow%, ByVal fOption%, ByVal fLock%) As Integer
  45. Declare Function SQLSetScrollOptions Lib "odbc.dll" (ByVal hstmt&, ByVal fConcurrency%, ByVal crowKeyset&, ByVal crowRowset%) As Integer
  46. Declare Function SQLTablePrivileges Lib "odbc.dll" (ByVal hstmt&, szTblQualifier As Any, ByVal cbTblQualifier%, szTblOwner As Any, ByVal cbTblOwner%, szTblName As Any, ByVal cbTblName%) As Integer
  47.  
  48.