MCGS系统内部函数参考手册

注 意：在文件开头写入字符串时，将覆盖原有内容；在文件结尾写入字符串时，将在原有基础上添加，并不覆盖原来的内容。

ODBC数据库函数

注意：MCGS从SQL Server读取数据时，是按照键值排列的，而不是输入数据的先后顺序。

!ODBCOpen(strDatabastName，strSQL，strName)

函数意义：打开strDatabastName指定的数据库中的数据表，并为该数据库连接指定一个名字strName，以方便以后对该数据库进行操作。 返 回 值：开关型， 返回0：操作成功；

返回-1：无法打开指定的数据库； 返回-2：指定的数据库已经打开。

参 数：strDatabastName，字符型，数据库名； strSQL，字符型，SQL语句； strName，字符型，指定数据连接名。

实 例：!ODBCOpen(\

实例说明：打开一个ODBC数据库dddd中的数据表Table1，并将该数据库连接命名为DB1。

!ODBCSeekToPosition(strName，lPosition)

函数意义：跳转到数据库strName的指定的行lPosition。 返 回 值：开关型，

返回0：操作成功；返回-1：操作不成功。 参 数：strName，字符型，数据库连接名。 lPosition，开关型，指定跳转的行。 实 例：! ODBCSeekToPosition(“DB1”,20) 实例说明：跳转到数据库DB1的第20行。 !ODBCClose(strName)

函数意义：关闭strName指定的数据连接。 返 回 值：开关型，

返回0：操作成功；返回-1：操作不成功。 参 数：strName，字符型，数据库连接名。 实 例：!ODBCClose(“DB1”) 实例说明：关闭数据库连接DB1。

33

!ODBCConnectionCloseAll()

函数意义：关闭当前使用的所有的ODBC数据库。 返 回 值：开关型； 参 数：无

实 例：!ODBCConnectionCloseAll()

实例说明：关闭当前使用的所有的ODBC数据库。 !ODBCConnectionCount()

函数意义：获取当前使用的所有ODBC数据库的个数。 返 回 值：开关型，当前使用的ODBC数据库的个数； 参 数：无；

实 例：!ODBCConnectionCount()

实例说明：获取当前使用的所有ODBC数据库的个数。 !ODBCConnectionGetName(lID)

函数意义：获取由lID指定的ODBC数据库的名称； 返 回 值：字符型，指定数据库的名称； 参 数：lID，开关型；

实 例：!ODBCConnectionGetName(aa)

实例说明：获取由开关型变量aa指定的ODBC数据库的名称。 !ODBCDelete(strName)

函数意义：删除由strName指定的数据库的当前行； 返 回 值：开关型； 返回0：操作成功；

返回值<0：操作不成功；但若删除的是最后一条记录，则返回值为-3 参 数：strName，字符型，数据连接名； 实 例：!ODBCDelete(“DB1”) 实例说明：删除数据库DB1的当前行。 !ODBCEdit(strName)

函数意义：在由strName指定的ODBC数据库中，用当前连接的数据对象的值修改数据库当前行； 返 回 值：开关型；

返回0：操作成功；返回值<0：操作不成功； 参 数：strName，字符型，数据连接名； 实 例：!ODBCEdit(“DB1”)

实例说明：用当前连接的数据对象的值修改数据库DB1的当前行。

34

!ODBCExecute(strName，strSQL)

函数意义：在打开的数据strName中，执行一条SQL语句strSQL；在使用该函数时应注意，对ODBC数据库进行修改后，要想看到修改的结果，必须关闭数据库并重新打开它； 返 回 值：开关型；

返回0：操作成功；返回值<0：操作不成功； 参 数：strName，字符型，数据连接名； strSQL,字符型，SQL语句；

实 例：!ODBCExecute(\('2001-05-31 12:00:00')\

实例说明： 在已经打开的数据库DB1中，执行SQL语句“INSERT INTO table1 (MCGS_Time) VALUES ('2001-05-31 12:00:00')”。 !ODBCGetCurrentValue(strName)

函数意义：获取数据库strName当前行的值； 返 回 值：开关型；

返回0：操作成功；返回值<0：操作不成功； 参 数：strName，字符型，数据连接名； 实 例：!ODBCGetCurrentValue(“DB1”) 实例说明：获取数据库DB1当前行的值； !ODBCGetRowCount(strName)

函数意义：获取ODBC数据库strName的行数； 返 回 值：开关型；

返回值>0：操作成功，其值为数据库的行数； 返回-1：操作不在功；

参 数：strName，字符型，数据连接名； 实 例：!ODBCGetRowCount(“DB1”) 实例说明：获取ODBC数据库DB1的行数。 !ODBCIsBOF(strName)

函数意义：判断ODBC数据库strName的当前位置是否位于所有数据的最前面； 返 回 值：开关型；

返回1：操作成功，且当前位置位于所有数据的最前面； 返回0：操作成功，但当前位置不是位于所有数据的最前面； 返回-1：操作不成功；

参 数：strName，字符型，数据连接名；

35

实 例：!ODBCIsBOF(“DB1”)

实例说明：若数据库DB1的当前位置位于所有数据的最前面，则返回1，否则返回0，若出错，则返回-1。

注 意：只有当移动到数据库的最前面（使用!ODBCMoveFirst）之后，再向前移动一个记录（使用!ODBCMovePrev）才会到达数据库记录集的开始位置（BOF）；向后移动记录（使用!ODBCMoveNext）一直到超过所有纪录的尾部，才会到达数据库记录集的结束位置（EOF），出现BOF或EOF后，必须使用!ODBMoveFirst或!ODBC MoveLast才能移到有效位置。 !ODBCIsEOF(strName)

函数意义：判断ODBC数据库strName的当前位置是否位于所有数据的最后面； 返 回 值：开关型；

返回1：操作成功，且当前位置位于所有数据的最后面； 返回0：操作成功，但当前位置不是位于所有数据的最后面； 返回-1：操作不成功；

参 数：strName，字符型，数据连接名； 实 例：!ODBCIsEOF (“DB1”)

实例说明：若数据库DB1的当前位置位于所有数据的最后面，则返回1，否则返回0，若出错，则返回-1。 !ODBCMoveFirst(strName)

函数意义：移动到数据库strName的最前面； 返 回 值：开关型；

返回0：操作成功；返回值<0：操作不成功； 参 数：strName，字符型，数据连接名； 实 例：!ODBCMoveFirst (“DB1”) 实例说明：移动到数据库DB1的最前面； !ODBCMoveLast(strName)

函数意义：移动到数据库strName的最后面； 返 回 值：开关型；

返回0：操作成功；返回值<0：操作不成功； 参 数：strName，字符型，数据连接名； 实 例：!ODBCMoveLast(“DB1”) 实例说明：移动到数据库DB1的最后面； !ODBCMoveNext(strName)

函数意义：移动到数据库strName的下一个记录；

36