📄 xladd.asp
字号:
<!-- #include file="../conn2.asp" -->
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<link href="../style2.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.STYLE1 {font-size: 14px}
.STYLE2 {color: #0000CC}
body,td,th {
font-size: 18px;
color: #0000CC;
}
-->
</style>
</head>
<body>
<form name="form1" method="post" action="">
<table width="100%" border="1">
<tr>
<th class="a1 TextTitle" scope="col">小类填加</th>
</tr>
</table>
<p> </p>
<p> </p>
<table width="100%" border="1">
<tr>
<th class="a1" scope="col"><div align="right" class="STYLE1">填写新小类名称 </div></th>
<th class="a1 STYLE1" scope="col"><div align="left"> 选择所属大类</div></th>
</tr>
<tr>
<td height="28" align="right" valign="middle"><div align="right"><input name="smallclassn" type="text" id="smallclassn">
</div></td>
<td><label>
<%
sql="select * from bigclass order by id"
set rs_bigclass=conn.execute(sql)
%>
<select name="bigclassid" id="bigclassid" onChange="form2.submit()">
<option value="">所有大类</option>
<%
do while rs_bigclass.eof=false
%>
<option value="<%=rs_bigclass("id")%>" selected="selected"<%if trim(cstr(rs_bigclass("id")))=nowbigclass then%><%end if%>><%=rs_bigclass("bigclass")%></option>
<%
rs_bigclass.movenext
loop
%>
</select>
<input type="submit" name="Submit" value="提交">
</label></td>
<% nowbigclassid=request("bigclassid")
fnbid=Cint(nowbigclassid) '将字符转换为数字
nowsmallclass=request("smallclassn")
%>
<%
sql="INSERT INTO smallclass ( smallclass, id_bigclass ) values('"&nowsmallclass&"',"&fnbid&")"
' sql="insert into smallclass(id_bigclass) values('"&fnbid&"')"
conn.execute(sql)
%>
</tr>
</table>
<p> </p>
</form>
<p align="center" class="TextTitle STYLE2"> |<a href="xl.asp">小类列表</a> | 修改小类 | 删除小类 | 大类列表 | </p>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -