首页    新闻    小组    交易    人才    下载    博客    代码贴    在线编程    论坛
代码贴随便看看SQL
create or replace trigger stu_trig
after delete or insert or UPDATE on tb_student
declare
    age number;
    cnt number;
begin
    if inserting then
        select min(TRUNC(months_between(sysdate, birthday)/12)) into age from tb_student;
        dbms_output.put_line(age);
    elsif deleting then
        select count(*) into cnt from tb_student;
        dbms_output.put_line(cnt);
......................
阅读全部 | mimijilu 贴于 2019-06-01 20:07:11     hide bbsi
x=76543
y=0
do while x>0
      y=x%10+y*10
      x=int(x/10)
enddo
阅读全部 | 最后的八月 贴于 2019-03-19 22:23:42     hide bbsi
create table 专业信息表
(编号 char(6) not null primary key,
 院系编号 char(4) not null,
 名称 char(40) not null,
 foreign key (院系编号) references 系部信息表(编号) on update cascade
)


服务器: 消息 170,级别 15,状态 1,行 5
第 5 行: '(' 附近有语法错误。
阅读全部 | Exactly 贴于 2015-07-11 23:47:49     hide bbsi
select a.agentcode 工号,
       a.name 姓名,
       (select codename
          from ldcode
         where codetype = 'sex'
           and code = a.sex) 性别,
       (select codename
          from ldcode
         where codetype = 'degree'
           and code = a.degree) 学历,
       a.birthday 出生日期,
       b.Initgrade 入职职级,
......................
阅读全部 | 魏利宇 贴于 2015-05-13 13:48:09     hide bbsi
Create Function [dbo].[fn_BitTest32](@num int,@bitpostion int)
Returns bit
As
Begin
--测试某位是否为真
Declare @Rst bit=0
Declare @bit int 
If (@bitpostion>=1 And @bitpostion<=31)
Begin 
Set @bit=Power(2,@bitpostion)
If((@num & @bit)=0)
        Set @Rst=0
......................
阅读全部 | mxbing1984 贴于 2014-08-23 17:22:14     hide bbsi
Create Procedure [dbo].[sp_Converter](@TransType tinyint,@sInText nVarchar(4000),@sOutText nVarchar(4000) OUTPUT) 
AS
Begin
Declare @App int
Declare @Doc int
Declare @Err int
Declare @Selection int

Exec @Err = sp_OACreate 'Word.Application', @App OUT
If @err<>0 goto lb_err
Exec @Err = sp_OACreate 'Word.Document', @Doc OUT
If @err<>0 goto lb_err
......................
阅读全部 | mxbing1984 贴于 2014-08-23 17:21:20     hide bbsi
DECLARE @hr INT;
DECLARE @objExcel INT;
DECLARE @objWorkBooks INT;
DECLARE @objWorkBook INT;
DECLARE @objSheets INT;
DECLARE @objSheet INT;
DECLARE @objRange INT;
Declare @A INT


EXEC @hr = sp_OACreate 'Excel.Application',@objExcel OUTPUT;
EXEC @hr = sp_OASetProperty @objExcel,'Visible','True';
......................
阅读全部 | mxbing1984 贴于 2014-08-23 17:20:49     hide bbsi
Create Procedure sp_MSJZ(@N int)
As
Begin
If @N<3 or @N%2=0
Begin
Print '请输入大于2的奇数'
Return
End

--定义I,J行列和值
Declare @I int=1,@J int,@K int,@X int,@Y int,@T int,@R int

......................
阅读全部 | mxbing1984 贴于 2014-08-23 17:20:06     hide bbsi
Create Procedure sp_Upload(@path Varchar(200))
As
Begin
Set NoCount on
/*
Create Table myFile
(
ID int Identity(1,1),
filename Varchar(100),
files Varbinary(max)
)
*/
......................
阅读全部 | mxbing1984 贴于 2014-08-23 17:19:28     hide bbsi
如何从sql中导出二进制照片
阅读全部 | wc_jcz 贴于 2012-12-21 14:33:50     hide bbsi
1 2 下一页