赞
踩
比较有意思的自定义函数,VBA、SQL、VB.NET均可以做
--判断是否存在函数
if exists(select * from sysobjects where type='tf' and name='函数名')
drop function 函数名
go
--创建函数
create function 函数名(@字段1 char(60),@字段2 char(60))
--函数的返回值为table类型
returns @返回表 table(
表字段1 char(60),
表字段2 char(60)
)
as
begin
insert @返回表(表字段1,表字段2) --将结果插入【返回表】
values(@字段1,@字段2)
return
end
go
--函数测试
select * from 函数名('属性','A')
- --判断是否存在函数
- if exists(select * from sysobjects where type='tf' and name='函数名')
- drop function 函数名
-
- go
- --创建函数
- create function 函数名(@字段1 char(60),@字段2 char(60))
- --函数的返回值为table类型
- returns @返回表 table(
- 表字段1 char(60),
- 表字段2 char(60)
- )
- as
- begin
- insert @返回表(表字段1,表字段2) --将结果插入【返回表】
- values(@字段1,@字段2)
- return
- end
-
- go
- --函数测试
- select * from 函数名('属性','A')
Copyright © 2003-2013 www.wpsshop.cn 版权所有,并保留所有权利。