A. delphi与sql的链接,动态链接
给你贴一短代码看吧。
myini:=tinifile.Create(extractfilepath(application.ExeName)+'connect.ini');
sqlname:=myini.ReadString('SQLSEVERS','sqlname','0');
sqlpw:=myini.ReadString('SQLSEVERS','sqlpw','0');
myini.Free; datamole1.ADOConnection1.ConnectionString:='Provider=SQLOLEDB.1;Password='+sqlpw+ ';Persist Security Info=True;User ID=sa;Initial Catalog=master;Data Source='+sqlname;
datamole1.ADOConnection1.Connected:=true;
connect.Free;
B. Delphi中关于如何拼接SQL语句
核心提示:在一些论坛,常看到有人拼接SQL的时候,喜欢直接硬拼,结果就是出现一大堆加号和单引号,不仅写起来麻烦(你得小心该连续写多少个单引号),SQL的可读性也相当差。...稍微好一点的方法是,使用QuotedStr函数,这个函数用于输出一个单引号括着的字符串。我相信写“'Insert into table(a,b,c) values(' + QuotedStr('ET') + ',' + QuotedStr('OTL') + ',' + QuotedStr('ORZ') + ')'”,总比你写“'Insert into table(a,b) values(' + ''''ET'''' + ',' + ''''OTL'''' + ',' + ''''ORZ'''' + ')'”可读性要强些吧,这么多引号看着都烦,别说写了。 更好的方法是使用Format函数。此函数一定要多多善用,通过格式化字符串的办法,可大大提高语句的可读性;而且格式化控制符有数字型也有字符串型,免除了你一会IntToStr,一会又StrToInt的痛苦。以上SQL的等效写法是“Format('Insert into table(a,b,c) values(%s,%s,%s)', [QuoteStr('ET'), QuotedStr('OTL'), QuotedStr('ORZ')])”。 本文到此还没结束,大家是否觉得尽管Format能大大提高了语句的可读性,但是写带单引号的字符串时,仍然比较麻烦呢?no problem,其实我们稍稍"扩充"下Format语句就行了: function FormatSQL(const AFormat: string; const Args: array of const): string; begin result := Format(StringReplace(AFormat, '%q', QuotedStr('%s'), [rfReplaceAll, rfIgnoreCase]), Args); end; 以上SQL的等效写法为“FormatSQL('Insert into table(a,b,c) values(%q,%q,%q)', ['ET', 'OTL', 'ORZ'])”。应该算是比较方便了,我觉得。顶一下
C. delphi中请分别使用ADOConnection控件连接SQLServer。ACCESS,EXCEL3中类型数据库,并把各自的连接字符串
SQL:
Provider=SQLOLEDB.1;Password=123;Persist Security Info=True;User ID=as;Initial Catalog=aaa;Data Source=127.0.0.1
Access:
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=test.mdb;Mode=ReadWrite;Persist Security Info=False
Excel:
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=test.xls;Mode=ReadWrite;Extended Properties=Excel 8.0;Persist Security Info=False
D. 求delphi与sql连接 实例
d7还是很经典的。现在很多人用。
这也可以说 是delphi 比较没落的地方了。
楼主问的问题很简单。
看代码:
const
MDBCONNECTIONSTR = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%S;Persist Security Info=False';这里是个access的连接 字符串,楼主自己改成sql2000的就可以了
MYSQLCONNECTIONSTR = 'DRIVER={MySQL ODBC 5.1 Driver}; SERVER=%s; PORT=%s; DATABASE=%s; USER=%s; PASSWORD=%s; OPTION=3;';
implementation
function b2i(a:Boolean):Integer;
begin
if a then
Result:=1
else
Result:=0;
end;
{$R *.dfm}
procere Tmain.btnLocalClick(Sender: TObject);
var
fPath:string;
begin
with TOpenDialog.Create(nil) do
begin
Filter:='Access数据库|*.mdb|all files|*.*';
if Execute() then
fPath:=FileName;
Free;
end;
qryMDB.Close;
qryMDB.ConnectionString:=format(MDBCONNECTIONSTR,[fPath]);
//
qryMDB.SQL.Clear;
qryMDB.SQL.Add('select * from content');
try
qryMDB.Open;
except
ShowMessage('获取本地数据库失败了');
end;
end;
然后控件需要设置的地方。一个TDatasource控件的dataset属性设置成qryMDB,然后一个DBGrid的datasource属性设置成这个TDatasource控件。
这样表的内容就可以显示了
E. delphi连接SQL数据库
一般连ms
sql
server
(连oracle的略有不同)常用的方法有两种:
1、BDE方式
2、ADO方式
用ADO的较多,你可以试试ADOConnection作为连接然后用adoquery做查询组件,很方便的。具体的方法你去看看相关ADO的资料即可
F. delphi与sql数据库如何链接具体的方法
那就要看你用什么组件去联了,
一般用到三个面板上的组件:BDE(数据库引擎)、Data Access(数据库访问)、Data Control(数据库控制)这三个面板。
最简单的有两种:1.Table、dataSource、dbGrid;
2.Query、dataSource、dbGrid;
我不知道你这具体的方法是指什么意思,是代码还是其他的之间的关系,如果你想了解,我还可以讲的更详细一点。
G. 如何在delphi中更改连接ACCESS的字符串变成连接SQL的呢
ADOConnection.ConnectionString='Provider=SQLOLEDB.1;Password=ems;Persist Security Info=True;User ID=sa;Initial Catalog=CSATS;Data Source=192.169.5.1';
其中ems是数据库密码,sa是用户名,CSATS是数据库名,192.169.5.1是数据库所在服务器之IP。
也可以直接在ADOC控件上配置连接字符串:点击ADOC控件属性ConnectionString后面的三个点->点击"Build"按钮->选择"Microsoft OLE DB Provider for SQL Drivers"->点击"下一步"按钮->在"配置数据来源名称"处填写数据库所在服务器之IP(如192.169.5.1)->在"使用者名称"处配置用户名(如sa)->在"密码"处配置密码(如ems)->勾上“允许存储密码”->在"选择服务器上资料库"下面选择要使用的资料库->点击"测试连接"按钮->点击"确定"按钮
H. SQL的拼接语句在DELPHI中怎么写
SQL 语句的拼接,关键点在于对引号的处理上。
在 delphi 的语法中,使用单引号做字符串的标志符。因此,当遇到 SQL 语句中字符串标识量编写的时候,需要用两个单引号来代替实际的引号。
举例:
SQL:='Insertintotable(表名)values('+''''数据值1''''+','+''''数据值2''''+','+''''数据值''''+')';
看起来单引号太多,显得挺乱。
其实可以用其他手段来完成:
1、使用 QuotedStr 函数
SQL:='Insertintotable(表名)values('+QuoteStr('数据值1')+','+QuotedStr('数据值2')+','+QuotedStr('数据值3')+')';
2、使用 Format 函数
SQL:=Format('Insertintotable(表名)values(%s,%s,%s)',[QuoteStr('数据值1''),QuotedStr('数据值2),QuotedStr('数据值3')]);
I. 求delphi连接SQL的语句
比如连接SQLServer的NorthWind库
ADOConnection.ConnectionString := 'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Northwind;Data Source=MYCOMPUTER'
J. Delphi如何与SQL数据库连接
connstr:='Provider=SQLOLEDB.1;Password=<sql
的用户ID的登录密码>;Persist
Security
Info=True;User
ID=<sql
的用户ID>;Initial
Catalog=<数据库名称>;Data
Source=<sql
服务器名称或IP地址>‘;
ADO下的ADOConnection控件
ADOConnection1.connectstring:=connstr;
Adoquery1.connect
选
ADOConnection1
Adoquery1.sql.clear;
Adoquery1.sql.add('select
*
from
表名
');
Adoquery1.open;