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;