首先form中添加ADOConnection,命名AdoC1
然后添加Ado Query,命名ADOq1
AdoQ1的connect属性为AdoC1;
然后ADOC1的connectionstring点击,就会让你连接
SQL Server如下:
1.选Microsoft... Sql Server,下一步
2.机器名,数据库用户名,密码,数据库名...
3.OK,回来,修改ADOC1的active为true.好了!
adoQ1可以直接SQL了!
假如Access
1.选取OLE DB Jet 4.0
2.下一步,数据库=选取对应access文件,如果无密码,不用输入!
3.返回修改adoc1的active为true
.
ok
然后添加Ado Query,命名ADOq1
AdoQ1的connect属性为AdoC1;
然后ADOC1的connectionstring点击,就会让你连接
SQL Server如下:
1.选Microsoft... Sql Server,下一步
2.机器名,数据库用户名,密码,数据库名...
3.OK,回来,修改ADOC1的active为true.好了!
adoQ1可以直接SQL了!
假如Access
1.选取OLE DB Jet 4.0
2.下一步,数据库=选取对应access文件,如果无密码,不用输入!
3.返回修改adoc1的active为true
.
ok
解决方案 »
- Delphi调用C++动态链接库的一个问题 long *
- Delphi 中 TIndUDPServer 关闭时报错 用Active := False 关闭.
- 关于IdHttp控件获取图片的问题!我可以放的分我可以全放了!放分信誉良好的!各位大哥帮忙啊。。。
- 如何用WebBrower 控件获得打开网页的源码?或用其它方法,本人刚学,请指教。
- 如何得知本form是哪个form创建的?如何调用父form的方法和属性?
- 有没有指针使用高手?
- socket传文件(支持多用户同时传)
- 谁能给我一点rave designer的使用方法吗?
- 如何最小化所有窗口
- 新手请教:如何打开和关闭一个MDI子窗口?谢谢!
- 难难难
- <<<<<<<<<C/S数据库编程问题,要用到SOCKET>>>>>>>>>>>
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, ADODB;type
TForm1 = class(TForm)
ADOConnection1: TADOConnection;
labelededit1: TEdit;
labelededit2: TEdit;
Button1: TButton;
Button2: TButton;
Label1: TLabel;
Label2: TLabel;
Edit1: TEdit;
Label3: TLabel;
Edit2: TEdit;
Label4: TLabel;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
var
str:string;
begin
if (labelededit1.Text<>'') and (labelededit2.Text<>'') then
begin
//连接远程服务器:str:='Provider=SQLOLEDB.1'+';'+'Persist Security Info=False'+';'+'User ID='+LabeledEdit1.Text+';'+'Password='+labelededit2.text+';'+'Initial Catalog=数据库名称'+';'+'Data Source=服务器名称';str:='Provider=SQLOLEDB.1'+';'+'Persist Security Info=False'+';'+'User ID='+LabeledEdit1.Text+';'+'Password='+labelededit2.text+';'+'Initial Catalog='+edit2.Text+';'+'Data Source='+EDIT1.Text;ADOConnection1.ConnectionString:=str;ADOConnection1.Open;labelededit2.Text:='';
Button1.Enabled:=false;end;end;procedure TForm1.Button2Click(Sender: TObject);
begin
ADOConnection1.Close;Button1.Enabled:=true;end;end.
以上是一窗体的所有程序,相信你应该看行懂吧,至于ACcess我认为没有必要研究它?
================================================================CSDN 论坛助手 Ver 1.0 B0402提供下载。 改进了很多,功能完备!★ 浏览帖子速度极快![建议系统使用ie5.5以上]。 ★ 多种帖子实现界面。
★ 保存帖子到本地[html格式]★ 监视您关注帖子的回复更新。
★ 可以直接发贴、回复帖子★ 采用XML接口,可以一次性显示4页帖子,同时支持自定义每次显示帖子数量。可以浏览历史记录!
★ 支持在线检测程序升级情况,可及时获得程序更新的信息。★★ 签名 ●
可以在您的每个帖子的后面自动加上一个自己设计的签名哟。Http://www.ChinaOK.net/csdn/csdn.zip
Http://www.ChinaOK.net/csdn/csdn.rar
Http://www.ChinaOK.net/csdn/csdn.exe [自解压]
procedure Tloginmain.Button2Click(Sender: TObject);beginADOConnection1.Close;Button1.Enabled:=true; end;
具体连接到数据库的某个表可以用:ADODataSet将ADODataSet的Connection属性设置为:ADOConnection将ADODataSet的CommandType属性设置为:cmdTableif not loginmain.ADODataSet1.Active thenbeginADODataSet1.CommandText:='worker_information';//worker_information为表名ADODataSet1.Open;end; 操作起来相当方便的================================================================CSDN 论坛助手 Ver 1.0 B0402提供下载。 改进了很多,功能完备!★ 浏览帖子速度极快![建议系统使用ie5.5以上]。 ★ 多种帖子实现界面。
★ 保存帖子到本地[html格式]★ 监视您关注帖子的回复更新。
★ 可以直接发贴、回复帖子★ 采用XML接口,可以一次性显示4页帖子,同时支持自定义每次显示帖子数量。可以浏览历史记录!
★ 支持在线检测程序升级情况,可及时获得程序更新的信息。★★ 签名 ●
可以在您的每个帖子的后面自动加上一个自己设计的签名哟。Http://www.ChinaOK.net/csdn/csdn.zip
Http://www.ChinaOK.net/csdn/csdn.rar
Http://www.ChinaOK.net/csdn/csdn.exe [自解压]
然后adotable,adoquery什么的conncetion选择adoconnection
其他就和bde差不多了