如何使用Tquery组件访问SQL数据库

TopmenC

如何使用Tquery组件访问SQL数据库，不使用其它的组件了！希望朋友们可以帮我解决一下！

乐yi忘忧

1. procedure TForm1.FormCreate(Sender: TObject);
   
2. begin
   
3.   ADOQuery1.Close;
   
4.   ADOConnection1.Close;
   
5.   ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OlEDB.4.0;Data Source='+ExtractFilePath(Application.ExeName){(ParamStr(0))}+'\database\个人应缴.mdb;User ID=admin;Password=;Persist security Info=False';//修改这里,读取数据库路径
   
6.   ADOConnection1.LoginPrompt:=False;
   
7.   ADOQuery1.Connection:=ADOConnection1;
   
8.   ADOQuery2.Connection:=ADOConnection1;
   
9.   DataSource1.DataSet:= ADOQuery1;
   
10.   DBGrid1.DataSource:= DataSource1;
    
11.   ADOQuery1.CursorLocation:= clUseServer;
    
12.   ADOQuery1.SQL.Clear;
    
13.   ADoQuery1.SQL.Add('SELECT 导入应征清册.序号,姓名,公民身份证,银行账号,应缴金额,档次变更,村委会名称,村小组,缴费类别,导入应征清册.备注 ');
    
14.   ADoQuery1.SQL.Add('FROM ([04基本信息] INNER JOIN 导入应征清册 ON [04基本信息].公民身份证=导入应征清册.公民身份证号) INNER JOIN [02村委会编码] ON [04基本信息].村委会编码=[02村委会编码].村委会编码');
    
15.   //ADOConnection1.Connected:=True;
    
16.   ADOQuery1.Open;
    
17. 
    
18. end;

复制代码

TopmenC

希望知道如何实现的朋友，加我QQ（1848483984），远程控制操作一次给我看，先多谢了！

Biner

1：ADOQuery1.ConnectionString 这个是用来连接一个数据库。。
2：ADOQuery1.Active :=true ; 激活这个连接 。
3：ADOQuery1.SQL.Add(这里是SQL语句：STRING)     这里可以写一些操作数据库的语句


上面就是访问数据库的最简单方法。。。  

zedjc

鱼币收益来

乐yi忘忧

这么多人回答还不 结题？

TopmenC

很感谢所有朋友对这个问题提出来的条案，虽然没有我想要的答案，但是谢谢了！

1588/足球

这个对我复杂了点

zhouzhou

我还是没懂