<%'-----------------------------------dim sp_commonSet sp_common = Server.CreateObject("ADODB.Command") with sp_common .ActiveConnection = conn .CommandText = "cd_update_log" .Parameters.Append .CreateParameter("@inputremark", adVarChar, adParamInput,50,"联通.Ye") .Parameters.Append .CreateParameter("@msg", adInteger, adParamOutput) .execute end with msg=sp_common("@msg")'-----------------------------------response.write "

If 1+1=3 then

'----------------------------------Table create table CD_BILL_LOG ( BILL_ID NUMBER, DEAL_EMP_ID NUMBER, REACH_DATE DATE, DONE_DATE DATE, BILL_STATUS VARCHAR2(10), DEAL_DEPT_ID NUMBER, SIGN NUMBER, REMARK VARCHAR2(50) ) ;'-----------------------proccreate or replace procedure cd_update_log(inputremark varchar2,msg out float) as begin update cd_bill_log a set a.remark =inputremark --to_char(sysdate,'mi:ss') where a.bill_id=45; msg:=1; commit;end;

end if%>