📄 prtype.asp
字号:
<!--#include file="../conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<link href="../css/test.css" rel="stylesheet" type="text/css">
<title>品牌资料</title>
<script language="javascript">
function checkpz()
{
if (document.form1.goodstype_name.value==''){
alert('品种名不能为空');
document.form1.goodstype_name.focus();
return false;
}
return true;
}
function checkpj()
{
if (document.pj.Appendant_name.value==''){
alert('配件名称不能为空');
document.pj.Appendant_name.focus();
return false;
}
return true;
}
function checkpp()
{
if (document.pinpai.pinpai_name.value==''){
alert('品牌名称不能为空');
document.pinpai.pinpai_name.focus();
return false;
}
return true;
}
function checkxh()
{
if (document.pinpai.xinhao_name.value==''){
alert('型号名称不能为空');
document.pinpai.xinhao_name.focus();
return false;
}
return true;
}
function checkdelxh()
{
if (confirm('你确定要删除吗？')){
return true;
}
return false;
}
</script>
</head>
<body>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="30" class="borderon"><div align="center"><a href="?action=pinzhong">品种</a> | <a href="?action=pinbai">品牌及型号</a> | <a href="?action=pj">配件</a> </div></td>
</tr>
</table>
<%
action=request("action")
select case action
case "pinzhong"
call pinzhong
case "pinbai"
call pinbai
case "pj"
call pj()
case "addpz"
call savepz()
case "addpj"
call savepj()
case "addpp"
call savepp()
case "delpz"
call delpz()
case "delpj"
call delpj()
case else
call pinbai
end select %>
<% sub pinzhong %>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<form name="form1" id="form1" method="post" action="?action=addpz">
<tr>
<td colspan="2" class="borderon">
<div align="center">品种名称
<input name="goodstype_name" type="text" id="goodstype_name">
<input type="submit" name="Submit" value="增 加 品 种" onClick="javascript:return checkpz();">
</div></td>
</tr>
</form>
<%
set rs=conn.execute("select * from ht_Goodstype")
if not rs.eof then
do while not rs.eof
%>
<tr>
<td width="50%" height="30" class="borderon"><div align="center"><%=rs("goodstype_name")%></div></td>
<td width="50%" class="borderon"><div align="center"><a href="?action=delpz&goodstype_id=<%=rs("goodstype_id")%>">删除</a></div></td>
</tr>
<%
rs.movenext
loop
rs.close()
set rs=nothing
end if
%>
</table>
<% end sub
sub pinbai
set rs=server.createobject("adodb.recordset")
sql = "select * from ht_marktype "
rs.open sql,conn,1,1
%>
<script language = "JavaScript">
var onecount;
subcat = new Array();
<%
count = 0
do while not rs.eof
%>
subcat[<%=count%>] = new Array("<%= trim(rs("marktype_name"))%>","<%= trim(rs("Marktype_Tr_id"))%>","<%= trim(rs("marktype_name"))%>");
<%
count = count + 1
rs.movenext
loop
rs.close
%>
onecount=<%=count%>;
function changelocation(locationid)
{
document.pinpai.marktype_id.length = 1;
var locationid=locationid;
var i;
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.pinpai.marktype_id.options[document.pinpai.marktype_id.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
</script>
<%
dim seltrademark
seltrademark=""
set rs=conn.execute("select * from ht_Trademark")
if not rs.eof then
seltrademark=seltrademark&"<option value="&rs("Trademark_id")&" selected>"&rs("Trademark_name")&" </option>"
selclass=rs("Trademark_id")
rs.movenext
do while not rs.eof
seltrademark=seltrademark&"<option value="&rs("Trademark_id")&">"&rs("Trademark_name")&" </option>"
rs.movenext
loop
end if %>
<form name="pinpai" id="pinpai" method="post" action="?action=addpp">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="50%" height="25" class="borderon">品牌列表：</td>
<td width="50%" class="borderon">型号列表： </td>
</tr>
<tr>
<td class="borderon"><select name="Trademark_id" size="20"onChange="changelocation(document.pinpai.Trademark_id.options[document.pinpai.Trademark_id.selectedIndex].value)">
<%=seltrademark%>
</select>
</td>
<td class="borderon"><select name="marktype_id" size="20" id="marktype_id">
<option value="">型号为： </option>
<%set rs=server.createobject("adodb.recordset")
sql="select * from ht_marktype where Marktype_Tr_id="&selclass
rs.open sql,conn,1,1
if not(rs.eof and rs.bof) then
%>
<option value="<%=rs("marktype_id")%>" ><%=rs("marktype_name")%> </option>
<%
rs.movenext
do while not rs.eof
%>
<option value="<%=rs("marktype_id")%>"><%=rs("marktype_name")%> </option>
<%
rs.movenext
loop
end if
rs.close
%>
</select>
</td>
</tr>
<tr>
<td class="borderon">品牌名称：
<input name="pinpai_name" type="text" id="pinpai_name" size="13">
<input type="submit" name="add_pinpai" value="增 加 品 牌" onClick="javascript:return checkpp();">
<input name="delpinpai" type="button" id="delpinpai" value="删 除 品 牌" onclick="javascript:return checkdelxh();"></td>
<td class="borderon">型号名称：
<input name="xinhao_name" type="text" id="xinhao_name" size="13">
<input type="submit" name="add_xinhao" value="增 加 型 号" onClick="javascript:return checkxh();">
<input name="delxinhao" type="submit" id="delxinhao" value="删除型号"></td>
</tr>
</table>
</form>
<% end sub
sub pj()
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<form name="pj" id="pj" action="?action=addpj" method="post" >
<tr>
<td colspan="2" class="borderon"><div align="center">配件名称
<input name="Appendant_name" type="text" id="Appendant_name">
<input type="submit" name="Submit2" value="增 加 配 件" onClick="javascript:return checkpj();">
</div></td>
</tr>
</form>
<%
set rs=conn.execute("select * from ht_Appendant")
if not rs.eof then
do while not rs.eof
%>
<tr>
<td width="50%" height="30" class="borderon"><div align="center"><%=rs("Appendant_name")%></div></td>
<td width="50%" class="borderon"><div align="center"><a href="?action=delpj&appendant_id=<%=rs("appendant_id")%>">删除</a></div></td>
</tr>
<%
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</table>
<%end sub %>
<%
'****************************
' 增加删除品种
'****************************
sub savepz()
goodstype_name=douhao(trim(request("goodstype_name")))
set rs=conn.execute("select * from ht_goodstype where goodstype_name='"&goodstype_name&"'")
if rs.eof then
conn.execute("insert into ht_goodstype(goodstype_name) values ('"&goodstype_name&"')")
end if
rs.close
set rs=nothing
response.Redirect("?action=pinzhong")
end sub
sub delpz()
goodstype_id=douhao(request("goodstype_id"))
conn.execute("delete from ht_goodstype where goodstype_id="&goodstype_id)
response.Redirect("?action=pinzhong")
end sub
'***************
'增加删除配件
'***************
sub savepj()
Appendant_name=douhao(trim(request("appendant_name")))
set rs=conn.execute("select * from ht_appendant where appendant_name='"&appendant_name&"'")
if rs.eof then
conn.execute("insert into ht_appendant(appendant_name) values ('"&appendant_name&"')")
end if
rs.close
set rs=nothing
response.Redirect("?action=pj")
end sub
sub delpj()
appendant_id=douhao(request("appendant_id"))
conn.execute("delete from ht_appendant where appendant_id="&appendant_id)
response.Redirect("?action=pj")
end sub
'***************
'增加删除品牌,型号
'***************
sub savepp()
if trim(request("add_pinpai"))="增 加 品 牌" then
pinpai_name=douhao(trim(request("pinpai_name")))
set rs=conn.execute("select * from ht_Trademark where Trademark_name='"&pinpai_name&"'")
if rs.eof then
conn.execute("insert into ht_Trademark(Trademark_name) values ('"&pinpai_name&"')")
end if
rs.close
set rs=nothing
end if
if trim(request("add_xinhao"))="增 加 型 号" then
xinhao_name=douhao(trim(request("xinhao_name")))
Trademark_id=douhao(trim(request("Trademark_id")))
set rs=conn.execute("select * from ht_marktype where Marktype_name='"&pinpai_name&"'")
if rs.eof then
conn.execute("insert into ht_marktype(Marktype_Tr_id,Marktype_name) values ("&Trademark_id&",'"&xinhao_name&"')")
end if
rs.close
set rs=nothing
end if
response.Redirect("?action=pinpai")
if trim(request("delxinhao"))="删除型号" then
marktype_id=douhao(trim(request("marktype_id")))
response.write "sdfsdf"
response.End()
end if
end sub
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -