📄 lm.asp
字号:
<% Set hdobj = Server.CreateObject("HD.comOpen")'请确保此行在最前
Connkaa = hdobj.WeekaaConn()
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta http-equiv="pragma" content="no-cache">
<title>红笛软件</title>
<style type="text/css">
<!--
.style3 {font-size: 12px}
.style4 { color: #FFFFFF;
font-size: 14px;
}
body,td,th {
font-size: 12px;
}
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
a:link {
text-decoration: none;
}
a:visited {
text-decoration: none;
}
a:hover {
text-decoration: none;
}
a:active {
text-decoration: none;
}
.STYLE12 {color: #FFFFFF; font-family: "黑体"; font-size: 16px;}
.STYLE14 {color: #FFFFFF}
-->
</style>
<script language=javascript>
function winclose() {
window.opener.location.reload();
window.close();
}
</script>
</head>
<body onmouseover="self.status='红笛软件:服务网址[http://weekaa.com/red]';return true" onUnload="winclose();">
<p>
<%
dim stv,sqstv
taba=request.QueryString("Taba")
if request.QueryString("action") = "" then
Set stv = Server.CreateObject("ADODB.RecordSet")
sqstv = "Select * From [sets] where TB='"&taba&"'"
stv.Open Sqstv,Connkaa,1,3
%>
</p>
<form name="form1" method="post" action="?action=action&ID=<%=stv("ID")%>">
<table width="800" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#0033cc" bgcolor="#E8EBEE">
<tr>
<td height="30" align="center" bordercolor="#E8EBEE" bgcolor="#0033cc" class="STYLE12 STYLE14">证卡名称设置</td>
</tr>
<tr>
<td><table width="100%" border="1" cellpadding="0" cellspacing="0" bordercolor="#E8EBEE">
<tr align="center" bgcolor="#F1F3F5">
<td width="110" bgcolor="#FFFFFF" class="style3">原证卡名</td>
<td width="110" height="25" bgcolor="#FFFFFF" class="style3"><%=stv("a")%></td>
<td width="110" bgcolor="#FFFFFF" class="style3"><%=stv("b")%></td>
<td width="110" bgcolor="#FFFFFF" class="style3"><%=stv("c")%></td>
<td width="110" bgcolor="#FFFFFF" class="style3"><%=stv("d")%></td>
<td width="110" bgcolor="#FFFFFF" class="style3"><%=stv("e")%></td>
<td width="110" bgcolor="#FFFFFF" class="style3"><%=stv("f")%></td>
<td width="110" bgcolor="#FFFFFF" class="style3"><%=stv("g")%></td>
<td width="110" bgcolor="#FFFFFF" class="style3"><%=stv("h")%></td>
</tr>
<tr align="center" valign="bottom" bgcolor="#FFFFFF">
<td>新证卡名</td>
<td height="25"><input name="a" type="text" id="a" value="<%=stv("a")%>" size="8"></td>
<td><input name="b" type="text" id="b" value="<%=stv("b")%>" size="8"></td>
<td><input name="c" type="text" id="c" value="<%=stv("c")%>" size="8"></td>
<td><input name="d" type="text" id="d" value="<%=stv("d")%>" size="8"></td>
<td><input name="e" type="text" id="e" value="<%=stv("e")%>" size="8"></td>
<td><input name="f" type="text" id="f" value="<%=stv("f")%>" size="8"></td>
<td><input name="g" type="text" id="g" value="<%=stv("g")%>" size="8"></td>
<td><input name="h" type="text" id="h" value="<%=stv("h")%>" size="8"></td>
</tr>
<tr align="center" valign="bottom" bgcolor="#FFFFFF">
<td height="25" colspan="9"><input type="submit" name="Submit" value="保 存"></td>
</tr>
</table></td>
</tr>
<tr>
<td height="30" align="center" bgcolor="#0033cc"> </td>
</tr>
</table>
</form>
<%
else
call hdobj.ADDL("sets","O",3)
end if
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -