好的,谢谢,请你发给我,请把步骤说的清楚一点好吗?例如在什么地方添加等,谢谢。
[email protected]
[email protected]
解决方案 »
- 再过两月当爸爸,再散!
- 急!像Vb的datagrid功能??
- 9月3日是法定的中国抗战胜利纪念日
- 蹭点空间用^_^
- 我想在另外一台机器上用delphi做的程序访问本机access数据库
- 无法在ACCESS表中增加字段!请教
- 我下载了一个牛仔布厂成品出仓管理系统delphi,还有诸多不懂~~
- 高手或者熟手请进:excel问题!和以前的贴子不同的! 急用!!!
- 怎样实现先退出自己的程序,再重新启动计算机
- 装SQL2000的问题,请赐教!!!1
- 80分求助!滚动ScrollBox的Scrollbar,结束滚动时,可以触发什么事件?请高手帮忙!
- 问一下,指针到底有什么用?链表到底是干什么用的,请说的实际一些?
STRING szKey, szClass, szKeyRoot, szTitle, szMsg, svLogFile;
NUMBER nResult;
begin
RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);
szKey = "SOFTWARE\\ODBC\\ODBC.INI\\BeiAirImport";
RegDBCreateKeyEx(szKey, szClass);
RegDBSetKeyValueEx(szKey,"Driver",REGDB_STRING,WINSYSDIR + "\\SQLSRV32.dll",-1);
RegDBSetKeyValueEx(szKey,"Server",REGDB_STRING,svServerName,-1);
RegDBSetKeyValueEx(szKey,"Database",REGDB_STRING,"BeiAirImport",-1);
RegDBSetKeyValueEx(szKey,"LastUser",REGDB_STRING,"dev",-1);
szKey = "SOFTWARE\\ODBC\\ODBC.INI\\ODBC Data Sources";
RegDBSetKeyValueEx(szKey,"BeiAirImport",REGDB_STRING,"SQL Server",-1);
return 0;
end;