?? default.asp
字號:
<!-- #include virtual="/eB3KTransaction.asp" -->
<!-- #include virtual="/Server/ebo.asp" -->
<!-- #include virtual="/Server/cblib.asp" -->
<!-- #include file="../Common.asp" -->
<HTML>
<script src="/client/Request.js"></script>
<script src="/client/IClient.js"></script>
<BODY>
<%
'Variable Declare
dim eBI, x, biid
biid=0
if IsNumeric(GetForm("ID")) then
biid=Clng(GetForm("ID"))
end if
'End
'eboReg
eboReg 1,"Name","Code","","DirectToRS"
eboReg 1,"Name","Title","","DirectToRS"
eboReg 1,"SerialManage","int1","","DirectToRS"
eboReg 1,"AccountID","AccountID","","LocalVariable"
eboReg 1,"Owner","Owner","","LocalVariable"
'End
function biSave(biType, biTableName, rsBI)
eboSet 1, rsBI, nothing
end function
Set eBI = Server.CreateObject("eB3KCommon.BaseInfo")
x = eBI.biSave(biid, CLng(biType), me)
if CStr(x)="0" then err.raise 10000,"Payment.Save", eBI.GetLastError()
set eBI = Nothing
%>
</BODY>
<script>
var data=new Array('<%=x%>');
IClient('data',data);
IClient('end','');
</script>
</HTML>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -