Delphi用字符串连接MSSQLERVER

2016-08-22 10:22:06来源:http://mslagee.blog.51cto.com/1065828/558806作者:mslagee人点击


很多刚学Delphi 的朋友在找Delphi连接MSSQL的方法,但发现网上大多是通过ODBC连接 的,实在不方便,也不是我喜欢的类型。


现提供通过字串连接的方式:


连接字串:


Provider=SQLOLEDB.1;Password=12345;PersistSecurityInfo=True;UserID=UserName;InitialCatalog=DataBaseName;DataSource=123.123.123.123,5678

注意,上面的“5678”为数据库的端口,如果没有特别指定,可以不写;


另:数据库连接时的端口不是用“:”指定,而是“,”。





示例代码:


procedureTForm1.Button1Click(Sender:TObject);beginADOConnection1.ConnectionString:='Provider=SQLOLEDB.1;Password=sa;PersistSecurityInfo=True;UserID=sa;InitialCatalog=DB_Name;DataSource=1.2.3.4';//连接指定的数据库ADOConnection1.LoginPrompt:=False;ADOConnection1.Connected:=True;ADOQuery1.Connection:=ADOConnection1;//连接数据源withADOQuery1do//用ADO组件连接数据表beginclose;SQL.Clear;SQL.Add('Select*fromTable1');//使用SQL语句查询数据表中的内容open;end;ADOQuery1.Active:=True;DataSource1.DataSet:=ADOQuery1;DBGrid1.DataSource:=DataSource1;end;

最新文章

123

最新摄影

微信扫一扫

第七城市微信公众平台