最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
ASP 调用 ORACLE存储过程并返回结果集
时间:2022-06-30 10:20:09 编辑:袖梨 来源:一聚教程网
ASP 调用 ORACLE存储过程并返回结果集
看过网上好多ASP调用ORACLE的方法,但是没有特好特直接的东西,所以总结各家的东西最后得出的一个自己需要的方法,感觉也比较大众所以特此发布
###################################################
oracle的存储过程
###################################################
--创建包头
create or replace package pck_as
as
type t_product_id is table of number
index by binary_integer;
type t_serial_no is table of varchar(300)
index by binary_integer;
type t_buy_date is table of date
index by binary_integer;
procedure allsfc
(
product_id out t_product_id,
serial_no out t_serial_no,
buy_date out t_buy_date
);
--procedure allsfc1;
end pck_as;
--创建包体
create or replace package body pck_as
as
procedure allsfc
(
product_id out t_product_id,
serial_no out t_serial_no,
buy_date out t_buy_date
)
is
cursor cur_sfc_tbl_product_reg is
select product_id,serial_no,buy_date from sfc_tbl_product_reg;
i number default 1;
begin
for onrecord in cur_sfc_tbl_product_reg
loop
product_id(i) := onrecord.product_id;
serial_no(i) := onrecord.serial_no;
buy_date(i) := onrecord.buy_date;
i := i + 1;
end loop;
end;
end;
###################################################
ASP的调用
###################################################
无标题文档
<%
dim str_ora
dim objconn_ora
str_ora = "Driver={Microsoft ODBC for Oracle};Server=ora192;uid=dwuser;pwd=family.samsung.com.cn"
看过网上好多ASP调用ORACLE的方法,但是没有特好特直接的东西,所以总结各家的东西最后得出的一个自己需要的方法,感觉也比较大众所以特此发布
###################################################
oracle的存储过程
###################################################
--创建包头
create or replace package pck_as
as
type t_product_id is table of number
index by binary_integer;
type t_serial_no is table of varchar(300)
index by binary_integer;
type t_buy_date is table of date
index by binary_integer;
procedure allsfc
(
product_id out t_product_id,
serial_no out t_serial_no,
buy_date out t_buy_date
);
--procedure allsfc1;
end pck_as;
--创建包体
create or replace package body pck_as
as
procedure allsfc
(
product_id out t_product_id,
serial_no out t_serial_no,
buy_date out t_buy_date
)
is
cursor cur_sfc_tbl_product_reg is
select product_id,serial_no,buy_date from sfc_tbl_product_reg;
i number default 1;
begin
for onrecord in cur_sfc_tbl_product_reg
loop
product_id(i) := onrecord.product_id;
serial_no(i) := onrecord.serial_no;
buy_date(i) := onrecord.buy_date;
i := i + 1;
end loop;
end;
end;
###################################################
ASP的调用
###################################################
<%
dim str_ora
dim objconn_ora
str_ora = "Driver={Microsoft ODBC for Oracle};Server=ora192;uid=dwuser;pwd=family.samsung.com.cn"
相关文章
- 阴阳师小袖之手幽篁流影怎么样 12-23
- 王者荣耀嬴政玄雷天君怎么样 12-23
- 光遇12.23免费魔法有什么 12-23
- 光遇12.23大蜡烛在哪里 12-23
- 光遇12.23季节蜡烛在哪里 12-23
- 王者荣耀嬴政玄雷天君怎么样 王者荣耀嬴政玄雷天君皮肤介绍 12-23