The ASP calls the Oracle stored procedure and returns the result set. I have seen a lot of ASP calling Oracle methods, but there is no special direct thing, so I summarize the things that the things you need, I feel that the big is here. release
######################################################################################################################################################################################################################################################################################################## #oracle's stored procedure ########################################################################################################################################################################################################################################################################################## ######
- Create Baotou create or replace package pck_asas 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); END PCK_AS;
- Create inclusions create or replace package body pck_asas 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;
######################################################################################################################################################################################################################################################################################################## #ASP call ######################################################################################################################################################################################################################################################################################### #####
While Not Rs1.eof Response.write (RS1 (0) & "| & RS1 (2) &" | ") rs1.movenextwend%>
