如何在Delphi里面用程序自动生成TADOConnection连接字符串? 我有一个TADOConnection控件,我只会用它和一个已有的SQL Server服务相连,我想在程序运行时自动指定SQL Server 或其他的数据服务。可以吗?还有,如何获得一个表中各字段的类型?如何获得服务器所支持的数据类型?本人基础较差,希望有人能给出详细的解释。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在OBJECT INSPECT 中有个属性conncet string可以让D自己生成连接参数的,也可以自己写一个,比较简单 ADOConnection.ConnectionString := 连接字符串上面这句可以在程序中进行附值获得一个表中各字段的类型:先有一个adoquery打开表,然后ADOQuery1.FieldCount是表中的字段数目,ADOQuery1.Fields.Fields[i]。FieldName字段名,ADOQuery1.Fields.Fields[i].DataType字段类型 获得一个表中各字段的类型:execute Sp_Help tablename 点 ADOConnection.ConnectionString 属性"..."-> build 一步步下去最后把ADOConnection.ConnectionString里的东西copy 出来,就可以贴在程序里.ADOConnection.ConnectionString:=; 就是要adoconnection的ConnectionString 属性要动态从外部文件中读取,而外部文件的写入可以通过自己再写一个数据库初始化程序要用户输入连接的服务器名称和数据库的用户名写入. 放一个adoconnection控件到窗体上,然后在其connectionstring属性对话框中选择固定的一个就可以得到这个字符串了。然后把这个字符串拷下来,动态生成一个adoconnection控件,删除窗体上的那个就可以了 呵呵,是不是数据库初始化程序要很难编写的呀?可不可以每次在程序中自己调出那个设置连接字符串的对话框,返回一个连接字符串,我就把他赋值给ADOConnection1.ConnectionString? 用uses AdoConedEditConnectionString(Adoconnection1)出现设置窗口 这个不是很简单你把那个Adoconnection的结构看一下,你再把相应的东西换上去就可以了基本上就是一个文件名而已了. 首先在uses中加入adodb然后,function getConnStr(var connstr:string;):boolean;begin connstr:=PromptDataSource(application.handle,''); if connstr='' then begin result:=false; end else result:=true;end;得到的这个连接串就可以直接赋给adoconnection.connectionstring了.然后连接就OK了. 建一个FORM,然后用三个edit,分别要求用户输入要连接的服务器名称,服务器数据库的用户名,密码.然后再:mypath:=......,关键user:=edit1.text,password:=edit2.text.User ID=edit3.text;写入文件,再在应用程序里读出就行了. Delphi 调用窗体必须使用application createform 怎样改变StringGrid第一列的宽度?谢 取文件大小出错,求助!急! 使用ADO&COM建立多层数据库应用程序时遇到的问题 哪里有DBGRIDEH的免费的完全版下载? 如何实现记录集之间所有记录的复制? 关于环境变量 后台处理和用户界面的问题,怎么来协调? 高分求助(完成后再加)小弟的毕业设计《实验室仪器管理系统》程序写完了,可程序好写,论文难编,哪位大哥有管理系统的开发文档,救我一 pdf扩展名是什么文件,用什么打开 关于API 文件打开问题
上面这句可以在程序中进行附值获得一个表中各字段的类型:先有一个adoquery打开表,然后ADOQuery1.FieldCount是表中的字段数目,ADOQuery1.Fields.Fields[i]。FieldName字段名,ADOQuery1.Fields.Fields[i].DataType字段类型
execute Sp_Help tablename
最后把ADOConnection.ConnectionString里的东西copy 出来,就可以贴在程序里.
ADOConnection.ConnectionString:=;
uses AdoConed
EditConnectionString(Adoconnection1)
出现设置窗口
然后,
function getConnStr(var connstr:string;):boolean;
begin
connstr:=PromptDataSource(application.handle,'');
if connstr='' then
begin
result:=false;
end
else result:=true;
end;得到的这个连接串就可以直接赋给adoconnection.connectionstring了.然后连接就OK了.
mypath:=......,关键user:=edit1.text,password:=edit2.text.User ID=edit3.text;
写入文件,再在应用程序里读出就行了.