如何在程序中给ODBC建立一个user DSN

daiguan 2002-03-28 01:48:22
加精
其实具体的就是如何控制ODBC,不是去调用他,而是如何去管理他。
...全文
36 6 打赏 收藏 举报
写回复
6 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
ewsl 2002-04-09
再问一句!
如何用程序添加 odbc 的access(*.mdb)数据源?
  • 打赏
  • 举报
回复
daiguan 2002-03-29
oh yeah,谢谢 zswang(伴水)(破碎的心只剩下灵感) 大侠
  • 打赏
  • 举报
回复
rqcong 2002-03-29
我也非常想知道这个问题的答案,谢谢!
  • 打赏
  • 举报
回复
王集鹄 2002-03-29
const
ODBC_ADD_DSN = 1;
ODBC_CONFIG_DSN = 2;
ODBC_REMOVE_DSN = 3;
ODBC_ADD_SYS_DSN = 4;
ODBC_CONFIG_SYS_DSN = 5;
ODBC_REMOVE_SYS_DSN = 6;

function SQLConfigDataSource(hwndParent: Integer;
fRequest: LongInt; lpszDriverString: string;
lpszAttributes: string): LongBool; stdcall; external 'ODBCCP32.DLL';

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
const
BoolStr: array[Boolean] of string = ('f', 't');
begin
if Key <> VK_RETURN then Exit;
Caption := BoolStr[
SQLConfigDataSource(0, ODBC_ADD_SYS_DSN,
// ~换成Handle就是手工配置
'SQL Server', //数据库类型
'DSN=MyDatabase'#0 + //数据源名称
'Server=(local)'#0 + //SQL Server服务器名
'Database=DatabaseName'#0 + //数据库名称
'Description=动态配置ODBC'#0 //描述
)];
end;
  • 打赏
  • 举报
回复
daiguan 2002-03-29
ADO有这个功能吗?还请详细解释,我查不到。
  • 打赏
  • 举报
回复
ChinaOk 2002-03-28
用ado 调用api。生成连接字符串可以吗?
  • 打赏
  • 举报
回复
相关推荐
发帖
Delphi
加入

5094

社区成员

Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
申请成为版主
帖子事件
创建了帖子
2002-03-28 01:48
社区公告
暂无公告