delphi_sql_Óαê·ÖÒ³_·ÖÒ³dbgrid²éѯ
alter procedure qry_page
@sqlstr nvarchar(4000), --²éѯ×Ö·û´®
@page int, --µÚNÒ³
@pagesize int --ÿҳÐÐÊý
as
declare @rscounts int --¼Ç¼×ÜÊý
declare @pages int --Ò³Ãæ×ÜÊý
set nocount on
declare @P1 int --P1ÊÇÓαêµÄid
exec sp_cursoropen @P1 output,@sqlstr,@scrollopt=1,@ccopt=1,@RecordCount=@rscounts output
set @pages = ceiling(1.0*@rscounts/@pagesize)
if @page<=0 set @page=1
if @page>@pages set @page=@pages
--µ±Ç°Ò³ÃæÌõÊý£¬²»×ãÒ»Ò³
declare @curpg_counts int
if @rscounts<@page*@pagesize
set @curpg_counts=@rscounts-(@page-1)*@pagesize
else
set @curpg_counts=@pagesize
--µ±Ç°Ò³ÆðʼÐÐ,´Ó1¿ªÊ¼
declare @startPos int
set @startPos=(@page-1)*@pagesize+1
--»ñȡָ¶¨¼Ç¼
exec sp_cursorfetch @P1,16,@startPos,@curpg_counts
exec sp_cursorclose @P1
set nocount off
--ÁíÍâ·µ»Ø¼Ç¼×ÜÊý/×ÜÒ³ÃæÊý/µ±Ç°Ò³/ÿҳÌõÊý
select rscounts=@rscounts,pages=@pages,pagesize=@pagesize,page=@page
--exec qry_page 'select * from user_record_in order by id',3,5
¿Í»§¶Ë·ÃÎʳÌÐò
delphi°æ±¾:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Buttons, Grids, DBGrids, ExtCtrls, DB, ADODB, Mask;
type
TForm1 = class(TForm)
Panel1: TPanel;
DBGrid1: TDBGrid;
SpeedButton6: TSpeedButton;
SpeedButton7: TSpeedButton;
Label5: TLabel;
SpeedButton1: TSpeedButt
Ïà¹ØÎĵµ£º
Ò»¡¢ÓÃÈçϲ½×öÁË£º
1¡¢DUMP¡¡TRANSACTION¡¡¿âÃû¡¡WITH¡¡no_log
2¡¢dbcc
shrinkfile(logfilename)
3¡¢ÊÕËõÊý¾Ý¿â
4¡¢É趨×Ô¶¯ÊÕËõ¡£
¡¡¡¡¶þ¡¢·ÖÀëÊý¾Ý¿â,ɾ³ýÈÕÖ¾
Îļþ,ÔÙ¸½¼Ó,OK!ÓÒ»÷Êý¾Ý¿â££ËùÓÐÈÎÎñ££·ÖÀëor ¸½¼Ó
¡¡¡¡Èý¡¢1¡¢backup
log¡¡¿âÃû¡¡WITH¡¡no_log£¬2¡¢dbcc shrinkfile(logfilename)£¬3¡ ......
SQL·ÖÒ³
ÍòÄÜ·ÖÒ³
.net´úÂë
select top ÿҳÏÔʾµÄ¼Ç¼Êý * from topic where id not in
(select top £¨µ±Ç°µÄÒ³Êý-1£©×ÿҳÏÔʾµÄ¼Ç¼Êý id from topic order by id desc)  ......
ÉϽÚÎÒÃǽéÉÜÁ˱íÁ¬½Ó£¬¸üÈ·ÇеÄ˵ÊÇinner joins內Á¬½Ó£®
¡¡¡¡內Á¬½Ó½öÑ¡³öÁ½ÕűíÖл¥ÏàÆ¥ÅäµÄ¼Ç¼£®Òò´Ë£¬Õâ»áµ¼ÖÂÓÐʱÎÒÃÇÐèÒªµÄ¼Ç¼ûÓаüº¬½øÀ´¡£
¡¡¡¡Îª¸üºÃµÄÀí½âÕâ¸ö¸ÅÄÎÒÃǽéÉÜÁ½¸ö±í×÷ÑÝʾ¡£ËÕ¸ñÀ¼Òé»áÖеÄÕþµ³±í(party)ºÍÒéÔ±±í(msp)¡£
party(Code,Name,Leader)
Code: Õþµ³´úÂë
Name: Õþµ³ ......
ORACLE PL/SQLÓëSQL SERVER T-SQLһЩ±È½Ï
×Ö·û´®Á¬½Ó
OracleÓÃ|| ·ûºÅ×÷ΪÁ¬½Ó·û£¬¶øSQL ServerµÄÁ¬½Ó·ûÊǼӺţº+ ¡£
Oracle²éѯÈçÏÂËùʾ£ºSelect ‘Name’ || ‘Last Name’ from tableName
SQL Server²éѯÈçÏ£ºSelect ‘Name’ + ‘Last Name’
GUID
OracleÓÃSYS_GUID ......