PROC批量导入导出ORACLE数据库表.docx
文本预览下载声明
最近在开发一个项目中,为了解决数据库IO瓶颈,不得不把数据库中的数据导出为文本文件。文本传到客户端后又要导入到数据库。本人用C++Builder嵌入PROC++写了一个导入导出的DLL。假如对你有用深感荣幸!具体内容如下:?一、预备工作计算机环境:Win 2000 PRO,Oracle?9i,C++ Builder 5.5引入必要的ORACLE内部函数:要用的函数在$(ORACEL_HOME)\bin qlora9.dll链接库中。为了能在C++ Builder中使用,先得生成LIB:implib?sqlora9.lib sqlora9.dll二、源文件分析//-------------------------------------------------------------------------//加入必要的头文件#includevcl.h #includewindows.h #includestdio.h #includestdlib.h #includestring.h#includetime.h #includemath.h #includefcntl.h #includeio.h #includesys tat.h//说明DLL的输出函数extern C _declspec(dlleXPort) int _stdcallConnectDB(const char *Username,??????????????????????????????? const char *PassWord, const char *Dbname);extern C _declspec(dllexport) int _stdcallImportTxtfile(TList *LengthArray,??????????????????????????????? String *FieldArray, const char *TableName,??????????????????????????????? const char *FileName);extern C _declspec(dllexport) int _stdcallExportTxtfile(const char *Sql,??????????????????????????????? const char *FileName);?#pragmahdrstop//----------------------------------------------------------------------------#define MAX_ITEMS 20??????? //定义最大字段数#define MAX_VNAME_LEN 30? //定义选择表项最大长度#define MAX_INAME_LEN 30? //定义指示器变量名字的最大长度?EXEC SQL INCLUDE?sqlca;??? //说明SQL通讯区EXEC SQL INCLUDE oraca;??? //说明ORACLE通讯区EXEC SQL INCLUDE sqlda;??? //说明SQL语句描述结构/*SQLDA结构体请查相关资料*/?EXEC ORACLE OPTION (ORACA = YES);EXEC ORACLE OPTION (RELEASE_CURSOR = YES);?//说明ORACLE外部函数extern C _declspec(dllimport) void _stdcallsqlclu(SQLDA*);extern C _declspec(dllimport) void _stdcallsqlnul(short*, short*, int*);extern C _declspec(dllimport) void _stdcallsqlprc(int*, int*, int*);extern C _declspec(dllimport) strUCt SQLDA * _stdcall?sqlald(int, unsigned int, unsigned int);?SQLDA *SelectUnit;? //定义选择项描述SQLDA *BindUnit;? //定义输入项空间//定义变量,以存放连接数据库的参数EXEC SQL BEGIN DECLARE SECTION;??? char User[20];//用户名??? char Pwd[20];//密码??? char DB[20];//数据库服务名EXEC SQL END DECLARE SECTION;?boolbConnect = false;//是否连接标志#pragmahdrstop?#pragmaargs
显示全部