<!--#include file="incpublic.asp"-->
<!--#include file="incconn.asp"-->
<html>
<الرأس>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<العنوان></العنوان>
</الرأس>
<الجسم>
<%
'-----------------------------------
خافت sp_common
تعيين sp_common = Server.CreateObject("ADODB.Command")
مع sp_common
.ActiveConnection = conn
.CommandText = "cd_update_log"
.Parameters.Append .CreateParameter("@inputremark"، adVarChar، adParamInput,50،"联通.Ye")
.Parameters.Append .CreateParameter("@msg"، adInteger، adParamOutput)
.ينفذ
تنتهي ب
msg=sp_common("@msg")
'-----------------------------------
استجابة.اكتب "<hr>" & رسالة
Response.end
إذا كان 1+1=3 ثم
'----------------------------------الجدول
إنشاء جدول CD_BILL_LOG
(
رقم معرف الفاتورة،
رقم DEAL_EMP_ID،
REACH_DATE DATE،
DONE_DATE التاريخ،
بيل_ستاتوس فارتشار2(10)،
رقم DEAL_DEPT_ID،
رقم التوقيع،
ملاحظة VARCHAR2(50)
)
;
'-----------------------بروك
إنشاء أو استبدال الإجراء
cd_update_log(inputremark varchar2,msg out float)
مثل
يبدأ
تحديث cd_bill_log أ
تعيين a.remark =inputremark --to_char(sysdate,'mi:ss')
حيث a.bill_id=45;
الرسالة:=1;
يقترف؛
نهاية؛
نهاية إذا
%>
</الجسم
>
</html>