悠悠博客 关注Ajax技术与web开发

建立表：
SQL> create table CD_BILL_LOG
2 (
3 BILL_ID NUMBER,
4 DEAL_EMP_ID NUMBER,
5 REACH_DATE DATE,
6 DONE_DATE DATE,
7 BILL_STATUS VARCHAR2(10),
8 DEAL_DEPT_ID NUMBER,
9 SIGN NUMBER,
10 REMARK VARCHAR2(50)
11 )
12 ;

建立过程：


SQL> create or replace procedure
2 cd_update_log(inputremark varchar2,msg out float)
3 as
4 begin
5
6 update cd_bill_log a
7 set a.remark =inputremark --to_char(sysdate,'mi:ss')
8 where a.bill_id=45;
9 msg:=1;
10 commit;
11 end;

调用过程：

<%@ LANGUAGE="Javascript"%>
<%
var conn = Server.CreateObject("ADODB.Connection");
conn.Open("sczbo","sczb","sczb");
var sp_common= Server.CreateObject("ADODB.Command");
var rs = Server.CreateObject("ADODB.Recordset");
conn.CursorLocation =3;

sp_common.CommandText = "cd_update_log";
sp_common.CommandType = 4;

var para1=sp_common.CreateParameter("inputremark", 129,1,50,"联通");
sp_common.Parameters.Append(para1);
var para2=sp_common.CreateParameter("msg", 3, 2);
sp_common.Parameters.Append(para2);
sp_common.activeConnection=conn;
sp_common.execute;
var msg=sp_common("msg");
Response.write( msg);
Response.end;

%>