我加载了Borlndmm.dll和midas.dll。还要什么文件吗
解决方案 »
- 我在一个系统里同时安装delphi 7和delphi 6,然后编译程序时提示内存错误?
- 紧急求助!!怎么把一个form设置成一个project的main form
- 弱问,数据字典是什么?在哪里?和tquery什么关系?在哪里能学到这方面知识?
- 如何用NetLocalGroupEnum这个API得到本地用户组列表?急
- 菜鸟问题:怎么样删除 ListBox 中选取的项(用Shift or ctrl)???
- 哪里有大富翁离線BBS下載?怎麼從WWW.DELPHIBBS.COM上下載281M的大富翁离線BBS不能使用!!!
- 如何取得TREEVIEW某个结点的子结点的所有值!
- 如何让table的onposterror事件发生时只显示我写的错误信息?
- 若何在Delphi7下使用ServerSocket和ClientSocket
- 定义了一个Double类型的属性,在设置Default时,该设什么数据?
- 请问当下比较流行的超级记事本如EditPlus,它们用的是什么控件?
- delphi7哪里可以修改Application的属性??
还有,最好把你测试的数据库也一道考过去试试
如果连不上,如果别的终端是Win98,请升级安装微软的数据访问补丁
运行一次 MDac_typ.exe ,这个文件在微软的 Windows、IE、Office、Visual Studio 中都有。
安装程序所安装后的目录与程序中设置的目录路径一样,C:\Program Files\Common Files\System\ado文件夹中有没有ADO组件,装ACCESS2000就有ADO2.1,没有则安装MS OFfice2000,编译要去掉project->Option->Packages对话框中的Build With RunTime Library的勾。◇[DELPHI]配置ODBC的代码
var
reg: TRegistry;
Driver: string;
begin
//建立和更新odbc数据源
//查找ODBCINST.INI键,如果sql server的驱动程序没有安装,则提示退出
//如果存在,则进行配置
reg := TRegistry.Create;
try
with reg do
begin
RootKey := HKEY_LOCAL_MACHINE;
if OpenKey('Software\ODBC\ODBCINST.INI\SQL Server', False) then
begin //如果存在sql server 驱动程序
Driver := ReadString('Driver');
CloseKey;
if OpenKey('Software\ODBC\ODBC.INI\ODBC Data Sources', True) then
begin //注册一个DSN名称
WriteString(Edit_DataSource.Text, 'SQL Server');
end
else
begin //创建键值失败
Application.MessageBox(pchar('在创建DSN' + edit_datasource.text + '时发生错误'), '创建ODBC数据源失败', MB_ICONINformATION or MB_OK);
exit;
end;
CloseKey;
//end 建立dsn
if OpenKey('Software\ODBC\ODBC.INI\' + Edit_DataSource.Text, True) then
begin
WriteString('Database', Edit_DataSource.Text);
WriteString('Driver', Driver);
WriteString('LastUser', Edit_LoginUser.Text);
WriteString('Server', Edit_Ip.Text);
end
else
begin //创建键值失败
Application.MessageBox(pchar('在创建DSN' + edit_datasource.text + '时发生错误'), '创建ODBC数据源失败', MB_ICONINformATION or MB_OK);
exit;
end;
CloseKey;
end
else
Application.MessageBox('在当前机器上没有安装 SQL Server的ODBC 驱动程序!,请安装相应的驱动程序', '驱动程序出错', MB_ICONINformATION or MB_OK);
CloseKey;
end;
finally
reg.Free;
end;
end;
只要你有装ADO就行了!