首页 相关文章 ADO带密码的数据连接、查询一个记录集、执行一SQL语句

ADO带密码的数据连接、查询一个记录集、执行一SQL语句

  unit UDataModule;

  interface

  uses
   Controls,SysUtils, Classes, DB, ADODB,windows,forms,CustomCom_TLB;

  type
   TDataModule1 = class(TDataModule)
   ADOConnection1: TADOConnection;
   dsDataSet: TADODataSet;
   ADOQuery1: TADOQuery;
   procedure DataModuleCreate(Sender: TObject);
   private
   { Private declarations }
   public
   ConnOK:boolean;
   { Publ...[ 查看全文 ]

2016-02-19 标签:
  • 标签:ASP
      大至分为三个文件:ljmdb.asp(连接库文件)、entice.asp(sql语句执行主界面)、entice2.asp(select记录集) ====================================ljmdb.asp <% set conndb=server.createobject("ADODB.CONNECTION") constr="provider=microsoft.jet.oledb.4.0;data source="&server.mappath("/aspsky.myip.org/entice.mdb") conndb.open constr % '这是连接acc...[ 查看全文 ]
  • 标签:SQLServer
     在Access中进行时间的比较sql语句很简单,如Select * From table Where thetime#"& Now() &"#这样即可     在MSSQL就不能这样,要用DateDiff语句和GetDate()函数进行比较。     如Select Count(*) From table Where DateDiff(s,GetDate(),thetime)0,我自己特别做了个50万条数据的的表,执行这条语句差不多需要1200毫秒。     后来研究了一下...[ 查看全文 ]
  • 标签:ASP
      我们在写ASP数据库程序的时候,通常都会用到SQL语句,而在增加数据和更新数据的时候,通常会使用一下方式:insert into message (incept,sender,title,content,sendtime,flag,issend) values ('"&incept(i)&"','"&membername&"','"&title&"','"&message&"',Now(),0,1) 当字段比较多的时候,而且更新的表比较多的时候,修改起来会比较麻烦,而且查找错误也比较困难。...[ 查看全文 ]
  • 标签:Web开发
    刚刚采集了一个下午,突然发现发现在title字段里多采集了一些字符进来,并且这些字符都一样的. 采集的时候多采集了一个img src="images/hot.gif",虽说这几个字符不占多少空间,也不是非常不爽.但是生长首页的时候出了大问题,显示不了.我那就郁闷咯. 于是就想办法解决. 首先,我尝试通过直接进入dedecms一条条修改记录,但是我的天啊,3000多数据,这样一条条改下来,我还不如自己去人肉更新呢.实在太痛苦了. 实在不行,...[ 查看全文 ]
  • 自上学这么多年以来,得出了从一个例子入手来学习是最快最有效,并能培养出很强的实践能力,这是一种很好的学习方法。不访试试。比如看一本书的时候从各章节的例子入手,找出不了解的以及不懂的还是新知识, 进而有针对性的学习。看看下面的例子: <?php $ip = getenv("REMOTE_ADDR"); //echo "$ip"; $conn=mysql_connect('ip','root','****'); mysql_select_db('db...[ 查看全文 ]
  • 标签:ASP
      我们在使用ASP 内置的ADO组件进行数据库编程时,通常是在脚本的开头打开一个连接,并在脚本的最后关闭它,但是就较大脚本而言,在多数情况下连接打开的时间要比它需要打开的时间长得多。因此为了节省服务器资源,应该尽可能关闭连接以释放连接所占有的资源,这种关闭记录集的连接而不关闭记录集的技术叫做断开记录集,这个记录集本身则称为断开的记录集。 下面我们就通过一个实例来说明这种技术的...[ 查看全文 ]
  • 标签:SQLServer
      问:我的一个表中包含了名为IdValue的单列主键。对于给定的IdValue值,我希望找到紧邻目标值之前和之后的表行(假定结果按IdValue排序)。怎样才能不使用游标而通过一个基于集合的方法得到需要的结果? 答:Transact-SQL是一个基于集合的语言,使用它在结果集中定位特定的行并非一件易事。但是,服务器端ANSI Transact-SQL游标的性能远远不如基于集合的解决方案,因此,学习解决问题的多种技术非常...[ 查看全文 ]
  • 标签:SQLServer
    上周﹐被一位網友問到在sql2000中,想選取一張表的第N條記錄怎麼寫?(即如下語句select ID,Name,Title from WebSite order by ID desc 如何改寫以達到目的) 我當時直接就給他回 select ID,Name,Title from WebSite where ID= N 最后這位老兄說如果是ID是連續的話就可以,如果有記錄刪除的話,ID不連續了,就不行了 ,至此才明白他的真正意思。剛好要輪到公司的周會時間﹐于是想了一下。給出如下答案給他﹕...[ 查看全文 ]
  • 2006-10-8 表数据:tab1 id    name  num A     a         9 A     b       11 B     f         7 B     g         8 所要结果: A &n...[ 查看全文 ]
  • 如果2张表的字段一致,并且希望插入全部数据,可以用这种方法: Code: 代码如下: INSERT INTO 目标表 SELECT * FROM [ 查看全文 ]
  • 标签:SQLServer
          且不说你是否正在从事编程方面的工作或者不打算学习SQL,可事实上几乎每一位开发者最终都会遭遇它。你多半还用不着负责创建和维持某个数据库,但你怎么着也该知道以下的一些有关的SQL知识。      我为那些感兴趣的开发者或者能从数据库操作中得益的读者撰写了这篇关于基本SQL语法的概述性文章。本文主要讨论基本的数据操作查询,后续的文章还会继续...[ 查看全文 ]
  • 标签:SQLServer
      连接查询 通过连接运算符可以实现多个表查询。连接是关系数据库模型的主要特点,也是它区别于其它类型数据库管理系统的一个标志。 在关系数据库管理系统中,表建立时各数据之间的关系不必确定,常把一个实体的所有信息存放在一个表中。当检索数据时,通过连接操作查询出存放在多个表中的不同实体的信息。连接操作给用户带来很大的灵活性,他们可以在任何时候增加新的数据类型。为不同实体创建新的...[ 查看全文 ]
  • 代码如下: DECLARE @MyCounter INT SET @MyCounter = 0 /*设置变量*/ WHILE (@MyCounter 2) /*设置循环次数*/ BEGIN WAITFOR DELAY '000:00:1' /*延迟时间1秒*/ INSERT INTO comments (username) values('ahuinan') SET @MyCounter = @MyCounter + 1 END [ 查看全文 ]
  • 标签:ASP
    以前一直困扰我的一个问题,如何判断数据库连接是否成功(比如sql没有启动,数据库不存在等),实现友好的错误处理,但vbscript的错误处理机制实在太差,只有on error resume nex/go to,但往往使用ADO的错误陷阱后,等待你的将是脚本超时,这个函数将改变这一状况(连接超时长短可以自己根据实际情况控制) '入口参数:连接字符串strconn '返回值:TestConnection=true,false Function TestConnection(strco...[ 查看全文 ]
  • 标签:PHP
      (主要用了两个字符串函数implode()和explode) 我制作的域名查询的源代码,主要用了两个字符串函数implode()和explode,利用这两个函数的切割字符串的强大功能,可以查询.com,.net.,org.,cc.,tv下的域名whois。 <?php echo '<center<form'; echo '<input type="text" name="string"'; echo '<input type="submit" value="查询"'; &n...[ 查看全文 ]
  • 标签:Web开发
    % ' Moving to random record - Steven Jones' Extension If Not(记录集名称.bof and 记录集名称.eof) Then ' reset the cursor to the beginning If (记录集名称.CursorType 0) Then 记录集名称.MoveFirst Else 记录集名称.Requery End If 记录集名称_totalrn = -1 记录集名称_totalrn = 记录集名称.RecordCount ' ony works on some recordsets, but much faster If (记录集名称_totalrn = -1) Then ' an...[ 查看全文 ]
  • 标签:ASP
    This article Generates a password random, Requires a database and Mails the Password. <%@language="vbscript" % ****************************** <% 'code by Manikantan 'Web Developer '3rd Agenda 'Nungambakkam, Chennai India % <% set mail= server.CreateObject("cdonts.newmail") mail.subject="Thank You for Registering" mail.to = mailid mail.from ="Webmaster@thesi...[ 查看全文 ]
  • 标签:SQLServer
    以下为在SQL Server中查看某个表的字段信息的查询语句(以 数据库 Pubs的jobs表为例) SELECT     SysObjects.Name as TableName,                         SysColumns.Name as ColumnsName,            ...[ 查看全文 ]
  • 标签:ASP
      使用断开的Recordset的一个关键条件就是使用客户端临时表,即      指定Rs.CursorLocation  =  adUseClient  or  3,下面是一个完整         的例子:         demo-1.asp  (在线演示:http://www.aspcn.com/demo/demo-1.asp) &...[ 查看全文 ]
  • 标签:SQLServer
    在Access中进行时间的比较sql语句很简单,如Select * From table Where thetime#"& Now() &"#这样即可     在MSSQL就不能这样,要用DateDiff语句和GetDate()函数进行比较。     如Select Count(*) From table Where DateDiff(s,GetDate(),thetime)0,我自己特别做了个50万条数据的的表,执行这条语句差不多需要1200毫秒。     后来研究...[ 查看全文 ]
手机页面 收藏网站 回到头部