📄 index_en.asp
字号:
<!--#include file="../Manage/mConn.asp"-->
<!--#include file="../Manage/mConst.asp"-->
<%
If Session("SK2B")="" Then
Response.Redirect "888_Login.Asp"
Response.End
End If
Dim Rs6,P_AgentID,Caution
Set Rs6=Server.CreateObject("Adodb.RecordSet")
Set Rs6=Conn.Execute("Select Top 1 P_AgentID,Caution From m_agent where Login_Name='"&Cstr(Session("SK2B"))&"'")
If Rs6.Eof Then
Response.Write ("<script language=javascript>alert('登陆超时！');location.href='Index_Logout.asp'</script>")
End If
P_AgentID=Rs6("P_AgentID")
Caution=Rs6("Caution")
Set Rs6=Nothing
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
href="../images/control_main.css" type=text/css rel=stylesheet>
<SCRIPT>
var chk_account = 0;
function SubChk(){
if(!confirm("是否确定写入资料?")){return false;}
}
</SCRIPT>
<META content="MSHTML 6.00.2800.1476" name=GENERATOR></HEAD>
<BODY text=#000000 bgColor=#ffffff leftMargin=0 topMargin=0>
<FORM name=myFORM onsubmit="return SubChk()" action=agent_Oper.asp?K6=K1 method=post>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD height=4></TD></TR>
<TR>
<TD>
<%If P_AgentID=0 Then
Response.Write ("总代理商")
Else
Response.Write ("代理商")
End If
%>管理 --修改 </TD></TR>
<TR>
<TD height=4></TD></TR></TBODY></TABLE>
<TABLE class=m_tab_ed cellSpacing=1 cellPadding=0 width=780 border=0>
<TBODY>
<TR class=m_title_edit>
<TD colSpan=2>基本资料设定</TD></TR>
<TR class=m_bc_ed>
<TD class=m_ag_ed width=100>帐号:</TD>
<TD><%=Cstr(Session("SK2B"))%></TD></TR>
<TR class=m_bc_ed>
<TD class=m_ag_ed>特别号警示:</TD>
<TD><INPUT class=za_text_02 maxLength=10 size=10 value='<%=Caution%>' name=wager_max>
</TD></TR></TBODY></TABLE><INPUT class=za_button type=submit value=确定 name=OK>
<INPUT class=za_button id=FormsButton2 onclick="javascript:history.go(-1)" type=button value=取消 name=FormsButton2>
</FORM></BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -