TADOConnection和TADQuery组件连接访问数据库总结
首先先来简单了解一下TADOConnection控件和TADOQuery控件作用,如下图:
好了简单对这两个控件有了一个初步的认识了,下面我们就通过两种形式来进行访问数据库:第一种是通过手动配置不需要写代码来实现;第二种是自己通过代码来连接数据库。
下面先介绍一下第一种方法:
第一步:向Form窗体拖上面的两个控件,一次将起属性Name改为:adoCnt 和adoQry;
第二步:单击TADOQuery控件找到属性:ConnectionString;如图:点击红色圈出现下一个界面:
点击Build... 会弹出下面左边的窗体:
然后选择你需要的数据库,然后点击"下一步" 进入上图右边的对话框:然后一次输入你的服务器名、用户名称、密码信息,输入后你也可以测试一下数据库是否可用。点击测试链接就可以了。
第三步:选中TADOQuery控件,找到属性为:Connection ,如图:点击三角找到TADOConnection控件的Name,这样就将这两个控件就关联起来了。
到这里我们就已经配置好链接数据库了。是不是很简单啊。
下面讲一下第二种方法:
第一步:和上面的第一步是一样的。
第二步:向Form添加一个按钮:按钮的Caption属性改为:测试;按钮的Name属性改为:btnTest;
第三步:和上面的第三步一样的。
第四步:编写代码,在刚刚添加的测试按钮里写入如下代码:
- procedure TForm1.btnTestClick(Sender: TObject);
- var
- user,passwd, server :string;
- begin
- user := 'admin';
- pwd := '123456';
- server := '192.168.3.11';
- adoCnt.ConnectionString := 'Provider=MSDAORA.1;Password=' + pwd;
- adoCnt.ConnectionString := adoCnt.ConnectionString + ';User ID=' + user;
- adoCnt.ConnectionString := adoCnt.ConnectionString + ';Data Source=' + server;
- adoCnt.ConnectionString := adoCnt.ConnectionString + ';Persist Security Info=True';
- try
- adoCnt.Open;
- except
- ShowMessage('数据库连接错误');
- end;
- end;
下面在简单介绍一下连接好数据库后,我们要读取数据库的数据显示到listview上改怎么实现呢?
首先:选择上面的其中一种方法来连接数据库,当然我比较建议第二种用代码的方式实现。
其次:为Form添加一个listview控件和一个按钮;按钮的Caption属性为:导出数据;Name属性依次为:lvshow和btnexportdata。
然后:在导出数据的按钮中写入下面的代码:
- procedure TForm1.btnexportdataClick(Sender: TObject);
- var
- items :TListItem;
- begin
- adoQry.SQL.Clear;
- adoQry.SQL.Add('select * from test');
- adoQry.Open;
- while not adoQry.Eof do
- begin
- items := lvshow.SubItems.Add;
- items.SubItems.Add(adoQry.FieldByName('std_name').AsString);
- items.SubItems.Add(adoQry.FieldByName('std_age').AsInteger);
- items.SubItems.Add(adoQry.FieldByName('std_addr').AsString);
- adoQry.Next;
- end;
- end;
TADOConnection和TADQuery组件连接访问数据库总结的更多相关文章
- VB如何连接访问数据库Access
VB如何连接访问数据库Access 听语音 | 浏览:10675 | 更新:2015-05-05 11:26 | 标签:连接 access 1 2 3 4 5 6 7 分步阅读 VB即Visual B ...
- 使用C#的两种方式OracleClient组件和OleDB组件连接ORACLE数据库
一.使用OracleClient组件连接Oracle .Net框架的System.Data.OracleClient.dll组件(ADO.Net组件),为连接和使用Oracle数据库提供了很大的方便. ...
- c#连接访问数据库(菜鸡篇)
C#如何访问数据库(小白篇) 刚入坑不久学习的路上还是遇到了不小的问题,昨天学习C#的时候需要连接数据库获取数据. 网上有很多这样的文章,说实话对于我这样的小白还真是有点难理解,经过一番周折总算是了解 ...
- Java访问数据库Mysql
一.概述 本文主要介绍Java接连数据库的基本方法和步骤,并对其中的几个要点进行简要说明. 二.数据库访问步骤 在Java中连接数据库进行的访问主要有以下几个步骤: 加载数据库驱动 注册数据库驱动 建 ...
- delphi通过TADOConnection组件直接连接MSSQL数据库并读写数据。
unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System ...
- ADO.NET 连接方式和非链接方式访问数据库
一.//连接方式访问数据库的主要步骤(利用DataReader对象实现数据库连接模式) 1.创建连接对象(连接字符串) SqlConnection con = new SqlConnection(Co ...
- ASP.NET MVC- EF返回连接池用ADO.NET方式访问数据库
用习惯了ADO.NET的方式去访问数据库,虽然ADO.NET写的代码没有EF简洁,可是也并不麻烦.而且EF在进行多表查询的那种方式是,EF需要先去数据库里定义外键,再进去一次代码生成,然后才能用INC ...
- Windows server2008 搭建ASP接口访问连接oracle数据库全过程记录--备用
真的是太不容易了,以前的时候在window server 2003上面搭建了一套asp+oracle的接口系统,就费了好大的劲儿,其实那会迷迷瞪瞪的也不知道怎么的就弄好了,也懒得管了.OK,从昨天到今 ...
- 用连接池提高Servlet访问数据库的效率
Java Servlet作为首选的服务器端数据处理技术,正在迅速取代CGI脚本.Servlet超越CGI的优势之一在于,不仅多个请求可以共享公用资源,而且还可以在不同用户请求之间保留持续数据.本文介绍 ...
随机推荐
- NGUI ScrollView中MoveRelative,Scroll的区别
Scroll会计算边界,和直接拖拽的效果类似 MoveRelative不计算边界,超出边界了也不会管,也不会应用缓动效果
- TypesMethodsAndFields
https://github.com/JesusFreke/smali/wiki/TypesMethodsAndFields Types dalvik's bytecode has two major ...
- socket failed:EACCES(Permission denied)
1. 权限问题 安卓端写的TCP协议软件报错原因是建立的套接字没有限权对外连接. 在AndroidManifest.xml中,加上这一句话,取得权限. <uses-permission andr ...
- csu-1328 近似回文词 和 最长回文字符串
原博文地址:http://blog.csdn.net/u012773338/article/details/39857997 最长回文子串 描述:输入一个字符串,求出其中最长的回文子串.子串的含义是: ...
- react-native在win10下用adb报错的解决方案
react-native在WIN10上面运行用adb链接模拟器,会直接在powershell里报错, 报错大概意思是识别不了adb这个cmdlet函数. 找了很久的解决办法,直接找到adb.exe所在 ...
- RIP协议两个版本对不连续子网的支持情况实验
一.连续子网与不连续子网 我们经常见到说RIPv1不支持不连续子网,仅支持连续子网,那么什么是连续子网,什么是不连续子网呢? l 不连续子网:指在一个网络中,某几个连续由同一主网划分的子网在中间被多 ...
- Ream的入门使用
一.介绍 Realm是一个不错的手机平台上的数据库,支持多种编程环境,如:Java.Object-C.React Native.Swift.Xamari等. Realm的官网:https://real ...
- Jquery学习笔记(4)--checkbox全选反选
可能有浏览器兼容性,注意html里的checked是一个属性,存在就默认选中. <!DOCTYPE html> <html lang="en"> <h ...
- PHP学习笔记(2)字符串函数
注意: 1.双引号中可以解析变量 2.单引号中不会解析变量
- try...except...后中断程序继续运行
今天遇到一个问题,本来是以前已经了解过的,但是忘了,现在又想起来了,还是记一下 try...except...当except抓到异常后程序会继续运行 但是个人感觉抓到异常后都是终止程序的吧...可能也 ...