我用一个AdoConnection来连接一个SQL SERVER 2000数据库。那么我打包后 如何让我的程序在没有装数据库的电脑上运行?
另外,如果,客户的电脑上装了 SQL server 2K.那么,我的程序如何来配置,使得我的DELPHI程序 跟客户的电脑上装的 SQL server 2K关联。要知道 我的AdoConnection,在写程序时已经定死了。代码如下:
Provider=SQLOLEDB.1;Password=1234;Persist Security Info=True;User ID=sa;Initial Catalog=picture;Data Source=BOYYUAN;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=BOYYUAN;Use Encryption for Data=False;Tag with column collation when possible=False那我是不可能更改的,况且我是在设计期做的,那么我如何让客户来配置呢?总不可能 我的SQL SERVER 2000跟客户的SQL SERVER2000一样吧。我的意思是,我的DELPHI程序,在客户那里安装好了 之后,怎样才能合理的跟客户的SQL server 2K连接。使得运行的结果跟在我自己电脑上的效果一直。
另外,如果,客户的电脑上装了 SQL server 2K.那么,我的程序如何来配置,使得我的DELPHI程序 跟客户的电脑上装的 SQL server 2K关联。要知道 我的AdoConnection,在写程序时已经定死了。代码如下:
Provider=SQLOLEDB.1;Password=1234;Persist Security Info=True;User ID=sa;Initial Catalog=picture;Data Source=BOYYUAN;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=BOYYUAN;Use Encryption for Data=False;Tag with column collation when possible=False那我是不可能更改的,况且我是在设计期做的,那么我如何让客户来配置呢?总不可能 我的SQL SERVER 2000跟客户的SQL SERVER2000一样吧。我的意思是,我的DELPHI程序,在客户那里安装好了 之后,怎样才能合理的跟客户的SQL server 2K连接。使得运行的结果跟在我自己电脑上的效果一直。
解决方案 »
- 高手请进!报价单生成问题
- 如何让Edit1或者DBEdit1的内容竖着显示?
- Dear all : 我用D7,如何判断打印机/传真机开始使用?正在使用?使用完毕?谢谢!~
- 高分求助!如何在调用的execel上画线呀(画园)!
- 有谁知道老板键的效果是怎么实现的??
- 有没有来自宁波的!!!——————进来聊聊
- 一个关于PAGECONTROL超级简单的问题,供大家娱乐
- 高分请研究过RSA算法的高手进,有些问题请教。
- 菜鸟的困惑-急、急、急:怎样让windows知道用某个程序打开一个自定义格式的文件?
- 请问如何在文本框禁止中文IME呢?
- 用database如何处理数据库的连接?
- 打印证书(不同字体,不同字号)的操作应如何进行?
ADOConnection.ConnectionString := 'FILE NAME=' + ExtractFilePath(Application.ExeName) + '\connection.udl';
程序运行时就会以*.udl设定的进行连接
你的意思是说: 在 connection.udl 文件中放入:Provider=SQLOLEDB.1;Password=1234;Persist Security Info=True;User ID=sa;Initial Catalog=picture;Data Source=BOYYUAN;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=BOYYUAN;Use Encryption for Data=False;Tag with column collation when possible=False这些信息?
cn.ConnectionString :=
'Provider=SQLOLEDB.1;Password=ly_dragonsoft;Persist Security Info=True;User ' +
'ID=sqldba;Data Source=server;Use Procedure for Prepare=1;Auto Translate=True;' +
'Packet Size=4096;Workstation ID=devil';
cn.DefaultDatabase := '你的数据库名称';
cn.KeepConnection := true;
cn.ConnectionTimeout := 5;
cn.LoginPrompt := false;