productedit.asp

物流管理系统

for i = 1 to rs8.pagesize
pinming = trim(rs8("prod_pinming"))
weight = trim(rs8("prod_weight"))
volume = trim(rs8("prod_volume"))
prod_flag = rs8("prod_flag")
%>
<tr>
<td align=center><%= rs8("prod_no") %></td>
<td align=center>
<%
if prod_flag <> ""  then
	sql = "select type_name from prod_type where id = "&prod_flag&""
	set rs_type = conn.execute(sql)
	if not rs_type.eof then
		type_name = rs_type("type_name")
	else
		type_name = "<font color=red>尚未归属</font>"
	end if
	rs_type.close
	set rs_type = nothing
	Response.Write type_name
else
	Response.Write "<font color=red>尚未归属</font>"

end if
%>
</td>
<td align=center>
<%
if pinming <> "" then
	Response.Write pinming
else
	Response.Write "&nbsp;"
end if
 %>
 </td>
<td align=center><%= rs8("prod_type") %></td>
<td align=center>
<%
if trim(rs8("prod_color")) <> "" then
	Response.Write trim(rs8("prod_color"))
else
	Response.Write "&nbsp;"
end if
 %></td>
<td align=center>
<%
if weight <> "" then
	Response.Write weight
else
	Response.Write "&nbsp;"
end if
 %></td>
<td align=center>
<%
if volume <> "" then
	Response.Write volume
else
	Response.Write "&nbsp;"
end if
 %>
</td>
<td align=center><a href='productedit.asp?action=edit&id=<%= rs8("prod_id") %>&page=<%=curpage%>&companyid=<%=newcompanyid%>'>编辑</a> 
</td></tr>
<% rs8.movenext
if rs8.eof then
	i = i + 1
	exit for
end if
next %>
</table>
<%		
		response.write "<p align=center>"
		response.write "第" + cstr(curpage) + "页/总" + cstr(rs8.pagecount) + "页 "
		response.write "本页" + cstr(i-1) + "条/总" + cstr(rs8.recordcount) + "条 "
		if curpage = 1 then 
			response.write "首页 前页 "
		else
			response.write "<a href='productedit.asp?page=1&companyid="&newcompanyid&"'>首页</a> <a href='productedit.asp?page=" + cstr(curpage-1) + "&companyid="&newcompanyid&"'>前页</a> "
		end if
		if  curpage = rs8.pagecount then
			response.write "后页 末页"
		else
			response.write "<a href='productedit.asp?page=" + cstr(curpage+1) + "&companyid="&newcompanyid&"'>后页</a> <a href='productedit.asp?page=" + cstr(rs8.pagecount) + "&companyid="&newcompanyid&"'>末页</a>"
		end if
	End If
	
end if
rs8.close
set rs8 = nothing
 %>
<hr size=1>
<% 
if bedit then
	sql = "SELECT * FROM product WHERE prod_id =  "&curid&""
	'set rs9 = conn.execute(sql)
	set rs8 = server.CreateObject("adodb.recordset")
	rs8.open sql,conn,3,2
	if rs8.EOF then
		bedit = false
	end if
end if
 %>
 
<form action="productedit.asp" method="POST" name="input1">
<p align=center><b><% If bedit then %>编辑：<% Else  %>添加：<% End If %></b></p>
<table align=center cellspacing="0" cellpadding="2" border="0">
<tr>
    <td width="25%"><b>产品编号：</b></td>
    <td width="75%">
    <%if bedit then%>
    <input type="Text"  name="txttitle" size="30" value='<%response.write rs8("prod_no")%>' maxlength=30 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9">**</td>
	<%else %>
	<input type="Text"  name="txttitle" size="30" value='' maxlength=30 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9">**</td>
	<%end if%>
</tr>
<tr>
    <td width="15%"><b>所属类别：</b></td>
    <td width="85%"><select  name="selcate" onkeydown="javascript:if(event.keyCode==13)event.keyCode=9">
    <%
    
    response.write "<option value=0>请选择类别</option>"
    sql1 = "select * from prod_type where type_companyid = "&newcompanyid&" order by id"
    set rs1 = server.CreateObject("adodb.recordset")
    rs1.open sql1,conn,1,1
if bedit then
	prod_flag = rs8("prod_flag")
	if not rs1.eof then
		do while not rs1.eof
			if prod_flag = rs1("id") then
				response.write "<option value=" + cstr(rs1("id"))+" selected>"+rs1("type_name")+"</option>"		
			else
				response.write "<option value=" + cstr(rs1("id"))+">"+rs1("type_name")+"</option>"
			end if
		rs1.movenext
		loop
	else
		response.write "<option value=0>尚无类别</option>"	
	end if
else
	if not rs1.eof then
		do while not rs1.eof
			response.write "<option value=" + cstr(rs1("id"))+">"+rs1("type_name")+"</option>"
			rs1.movenext
	    loop
    else
		response.write "<option value=0>尚无类别</option>"	
	end if
end if
rs1.close
set rs1 = nothing
%>
	   

</select>
</td>
</tr>
<tr>
    <td width="25%"><b>品&nbsp;&nbsp;&nbsp;&nbsp;名：</b></td>
    <td width="75%">
    <%if bedit then%>
    <input type="Text"  name="prod_pinming" size="30" value='<%response.write trim(rs8("prod_pinming"))%>' maxlength=30 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9">**</td>
	<%else %>
	<input type="Text"  name="prod_pinming" size="30" value='' maxlength=30 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9">**</td>
	<%end if%>
</tr>
<tr>
    <td width="25%"><b>产品型号：</b></td>
    <td width="75%">
    <%if bedit then%>
    <input type="Text"  name="prod_type" size="30" value='<%response.write trim(rs8("prod_type"))%>' maxlength=30 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9">**</td>
	<%else %>
	<input type="Text"  name="prod_type" size="30" value='' maxlength=30 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9">**</td>
	<%end if%>
</tr>

<tr>
    <td width="25%"><b>产品颜色：</b></td>
    <td width="75%">
    <%if bedit then%>
    <input type="Text"  name="prod_color" size="30" value='<%response.write trim(rs8("prod_color"))%>' maxlength=30 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9"></td>
	<%else %>
	<input type="Text"  name="prod_color" size="30" value='' maxlength=30 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9"></td>
	<%end if%>
</tr>
<tr>
    <td width="25%"><b>出厂批号：</b></td>
    <td width="75%">
    <%if bedit then%>
    <input type="Text"  name="prod_batch" size="30" value='<%response.write trim(rs8("prod_batch"))%>' maxlength=30 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9"></td>
	<%else %>
	<input type="Text"  name="prod_batch" size="30" value='' maxlength=30 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9"></td>
	<%end if%>
</tr>
<tr>
    <td width="25%"><b>重&nbsp;&nbsp;&nbsp;&nbsp;量：</b></td>
    <td width="75%">
    <%if bedit then%>
    <input type="Text"  name="prod_weight" size="30" value='<%response.write trim(rs8("prod_weight"))%>' maxlength=10 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9"></td>
	<%else %>
	<input type="Text"  name="prod_weight" size="30" value='' maxlength=10 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9"></td>
	<%end if%>
</tr>
<tr>
    <td width="25%"><b>体&nbsp;&nbsp;&nbsp;&nbsp;积：</b></td>
    <td width="75%">
    <%if bedit then%>
    <input type="Text"  name="prod_volume" size="30" value='<%response.write trim(rs8("prod_volume"))%>' maxlength=10 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9"></td>
	<%else %>
	<input type="Text"  name="prod_volume" size="30" value='' maxlength=10 onkeydown="javascript:if(event.keyCode==13)event.keyCode=9"></td>
	<%end if%>
</tr>
<tr>
    <td width="25%"><b>备&nbsp;&nbsp;&nbsp;&nbsp;注：</b></td>
    <td width="75%">
    <%if bedit then%>
    <textarea rows="4" name="beizu" cols="29" onkeydown="javascript:if(event.keyCode==13)event.keyCode=9"><%=trim(rs8("prod_beizu"))%></textarea></td>
	<%else %>
	<textarea rows="4" name="beizu" cols="29" onkeydown="javascript:if(event.keyCode==13)event.keyCode=9"></textarea></td>
	<%end if%>
</tr>
<%
 'end if
 'rs8.close
 %>
<tr><td align=center colspan="2">
<input type="Hidden" name="action" value='<% If bedit then%>editsave<% Else  %>newsave<% End If %>'>
<% If bedit then %>
<input type="Hidden" name="id" value='<%= cstr(curid) %>'>
<% End If %>
<input type="Hidden" name="companyid" value='<%= cstr(newcompanyid) %>'>
<input type="Hidden" name="page" value='<%= cstr(curpage) %>'>
<input type="Hidden" name=<%= strtype %> value=<%= strvalue %>>
<input class=buttonface type="Submit" name="btnsave" value="保存">
<input class=buttonface type="Reset" value="取消"></td></tr>
</table>

</form>
<%
if bedit then
	rs8.close
	set rs8 = nothing
end if
call closedatabase
%>
<p align=center>[ <a href='manage.asp'>返回</a> ]
<!--#include file=../data/copyright.asp-->
</body>
</html>