面朝大海，春暖花开。

摘要： ALTER procedure [dbo].[SP_splitpage]( @sql nvarchar(4000), --要执行的sql语句 @currentpage int=1, --要显示的页码 @pagesize int=50 --每页的大小)asbegin set nocount on de 阅读全文

摘要： --1、找到自己执行update语句的时间select r.FIRST_LOAD_TIME,r.* from v$sqlarea r where sql_text like '%update yzxdcfmx a set a.neir=(select%' order by r.FIRST_LOAD_ 阅读全文

摘要： 阅读全文

摘要： ALTER FUNCTION [dbo].[m_getnumber]( @my_str varchar(100))returns varchar(100)begindeclare @length intdeclare @uni_int intdeclare @i intset @i = 0set @ 阅读全文

摘要： create or replace function getDateDuan(vChuSSJ varchar2,aFlag varchar2) return integer as vDate date; p_nl_str varchar2(20); p_nl_s number; p_nl_y num 阅读全文

摘要： unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, V 阅读全文

摘要： tvLBList.Items[0].MakeVisible; ListView1.Items[i].MakeVisible(True); //定位后显示出来 阅读全文

摘要： procedure TfrmMain.DbGridEhToExcel(ADgEh: TDBGridEh);var ExpClass: TDBGridEhExportclass; Ext: string; FSaveDialog: TSaveDialog;begin try if ADgEh.Data 阅读全文

摘要： /* 注册job 设置时间 必须在命令窗口内执行 Variable N Number; Begin DBMS_JOB.Submit(:N,'P_SCQBFY;',Trunc(Sysdate)+23/24,'Trunc(Sysdate+1)+23/24'); Commit; End;*/ CREATE 阅读全文

摘要： function MyRound2(Money: Real): Real; //四啥五入 var Temp: Integer; begin if ((Money <= 0.04) and (Money >= 0)) then Money := 0.1 else if ((Money < 0) and 阅读全文