delphi7 mysql5的一個問題 |
答題得分者是:st33chen
|
p-soft
一般會員 發表:4 回覆:5 積分:1 註冊:2008-10-08 發送簡訊給我 |
procedure TForm1.button1Click(Sender: TObject);
var hard:string; begin hard:=Edit1.Text; with simpledataset1.Connection do begin DriverName := 'dbxmysql'; GetDriverFunc := 'getSQLDriverMYSQL50'; LibraryName := 'dbxopenmysql50.dll'; VendorLib := 'libmysql.dll'; Params.Append('HostName=localhost'); Params.Append('Database=test' ); Params.Append('User_Name=root'); Params.Append('Password=root'); end; simpledataset1.DataSet.CommandText :='select name from pc_con where hardinfo=''hard''';{這句的語法是不是有錯呢?不報錯,也沒有輸出} simpledataset1.Open; end; 不報錯也沒有輸出,哪里錯了,高手們指教。。。 編輯記錄
p-soft 重新編輯於 2008-12-05 17:44:23, 註解 無‧
|
st33chen
尊榮會員 發表:15 回覆:591 積分:1201 註冊:2005-09-30 發送簡訊給我 |
simpledataset1.DataSet.CommandText :='select name from pc_con where hardinfo=''hard''';{這句的語法是不是有錯呢?不報錯,也沒有輸出}
改成 simpledataset1.DataSet.CommandText :='select name from pc_con where hardinfo=''' hard ''''; // 請注意單引號的數目 您的原寫法是找出 hardinfo 為 [hard 這四個字母] 的資料, 語法正確所以沒報錯 因為 hard 是字串變數, 您的原意應該是 : 找 hardinfo 為 [hard 這個變數所含的值] 的資料 所以要把 hard 的值加到 commandtext 字串裏.
------
IS IT WHAT IT IS 我是 李慕白 請倒著唸. 又想把老話拿出來說, 請用台語發音 : 專家專家全是ROBOT CAR (滷肉腳啦); 都已接手這麼久了, 績效還是那麼爛, 講話還那麼大聲. |
p-soft
一般會員 發表:4 回覆:5 積分:1 註冊:2008-10-08 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |