在DELPHI中编程生成ACCESS数据库文件并创建指向此连接
8页1、在DELPHI中编程生成ACCESS数据库文件并创建指向此连接的ODBC数据源 要实现创建ACCESS数据库文件,我们要用到Windows系统中用来完成ODBC 管理功能的DLL(odbccp32.dll)。 废话少说,让我们用个例子来演示吧!(一)在DELPHI中新建一个工程,并在窗体上添加两个按钮。然后保存(二)从系统中搜索odbccp32.dll和odbcint.dll,一般在C:WINDOWSsystem32中,并将这两个文件拷贝到在上一步我们创建的DELPHI工程的同级目录下(三)在程序的中添加关于常量的定义const ODBC_ADD_DSN = 1; / 添加数据源 ODBC_CONFIG_DSN = 2; / 配置数据源 ODBC_REMOVE_DSN = 3; / 删除数据源 ODBC_ADD_SYS_DSN = 4; / 添加系统DSN ODBC_CONFIG_SYS_DSN = 5; / 配置系统DSN ODBC_REMOVE_SYS_DSN = 6; / 删除系统DSN(四)在程序的type处添加声明type TSQLConfigDataSource = fun
2、ction( hwndParent: HWND; fRequest: WORD; lpszDriver: LPCSTR; lpszAttributes: LPCSTR ) : BOOL; stdcall;(五)用来完成建立DSN并生成数据库文件的代码如下:procedure TForm1.Button1Click(Sender: TObject);var pFn: TSQLConfigDataSource; hLib: LongWord; strDriver: string; strAttr: string; strFile: string; fResult: BOOL; srInfo : TSearchRec;begin /获得程序所在路径 strFile := ExtractFilePath(ParamStr(0)+Test.MDB; /加载动态库 hLib := LoadLibrary( ODBCCP32 ); if( hLib NULL ) then begin pFn := GetProcAddress( hLib, SQLConfigDataSource ); if( pF
3、n nil ) then begin / 重新建立DSN strDriver := Microsoft Access Driver (*.mdb); strAttr := Format( DSN=TestDSN+#0+ DBQ=%s+#0+ Exclusive=1+#0+ Description=Test Data+#0+#0, strFile ); fResult := pFn( 0, ODBC_ADD_SYS_DSN, strDriver1, strAttr1 ); if not fResult then ShowMessage( 创建DSN失败! ); / 检测/创建同DSN关联的 MDB 文件 if( FindFirst( strFile, 0, srInfo ) 0 ) then begin strDriver := Microsoft Access Driver (*.mdb); /,CREATE_DB的调用是Access(MS Jet引擎)的专有调用,类似的还有COMPACT_DB和REPAIR_DB等 strAttr := Format( DSN=TestDSN+#0+
《在DELPHI中编程生成ACCESS数据库文件并创建指向此连接》由会员新**分享,可在线阅读,更多相关《在DELPHI中编程生成ACCESS数据库文件并创建指向此连接》请在金锄头文库上搜索。
大学生专科毕业自我鉴定
南开大学21秋《企业管理概论》在线作业三满分答案79
小学生爱我校园的演讲稿
幼儿园保教个人工作计划怎么写
第八章大比例尺地形图的应用
最新《施工组织设计》部队地勤楼改造装修工程施工组织设计(2011年制 技术标)8
土木工程毕业实习总结
共享农庄经营模式套路多四大案例告诉你怎么做
2023年江西省景德镇市乐平市后港镇官将村社区工作人员考试模拟试题及答案
关于网络相关推广
征地拆迁工作自查报告
口腔医师工作计划标准范本
营山县玲珑小学校本研修组织管理和考核制度
2021年房地产营销计划
有趣的猎狐活动
[心伤的图片]凉透心伤感签名千辛万苦联系到你换来一句你是谁(个性签名)
心理咨询师素质1
盲人摸象教学设计
仁爱版英语七年级上册知识点复习
中央电大财务报表分析第二次形成性考核作业答案4099952
2024-01-03 4页
2023-06-04 6页
2023-10-14 60页
2023-04-04 5页
2023-06-14 5页
2023-08-26 8页
2023-04-16 17页
2023-10-29 4页
2022-08-24 21页
2022-10-10 15页