📄 product.asp

📁 by php excellent hotel management system
💻 ASP
字号:
<%
'###########################################################################################
'			   Copyright (C) 2006 FreeLin rights reserved.                                 '
'			      本系统由FREELIN工作室独立开发2006.3.20                                      '
'				     版权所有,并保留所有版权,不得修改传播                                       '
'					    http://www.yisky.com                                          '
'						     co_lin@126.com                                                '
'###########################################################################################
%>
<!--#include file="config.asp"-->
<!--#include file="freelin.asp"-->
<%
dim proname,protype,proclass,proinfo,classabout
picabout = "只能是jpg,gif,png,bmp格式图片"
title = "添加客房"
if request.querystring("id") <> "" then
	modId = trim(request.querystring("id"))
	if request.form("submit")<>"" then
		proName = trim(Request("proname"))
		proType = trim(Request("protype"))
		proClass = trim(Request.Form("proclass"))
		proInfo = server.htmlencode(rtrim(Request("proinfo")))
		FileName = trim(Request.Form("proPic"))
		if proName="" or proType="" or proInfo="" or FileName="" then xln_showmsg "操作失败","所有项目都不能为空！","product.asp","自动返回"
		conn.execute ("update pro set proName='"& proName &"', proType='"& proType &"', proPic='"& FileName &"', proClass='"&  proClass &"', proInfo='"& proInfo &"' where id="& modId &"")
		conn.close
		xln_showmsg "操作成功","修改客房成功！","listpro.asp","进入查看"
	else
		set rs = conn.execute("select * from pro where id="& modId &"")
		proname = rs("proName")
		protype = rs("proType")
		proclass = rs("proClass")
		proinfo = rs("proInfo")
		proPic = rs("proPic")
		picabout = "选择已上传好的图片"
		classabout = "请重新选择分类"
		title = "修改客房"
	end if
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=title%>--FreeLin设计</title>
<LINK href="../images/style.css" type=text/css rel=stylesheet>
</head>

<body>
<table width="100%" border="1" cellpadding="3" cellspacing="0" bordercolor="#f0f0f0" bgcolor="#FFFFFF">
<%if request.querystring("id") <> "" then%>
<form action="" method="post" name="form1">
<%else%>  
<form action="addpro.asp" method="post"  enctype="multipart/form-data" name="form1">
<%end if%>
    <tr align="center" class="text"> 
      <td height="50" colspan="2"> <strong><%=title%></strong></td>
    </tr>
    <tr class="text"> 
      <td width="12%">客房名称：</td>
      <td width="88%"> <input name="proname" type="text" class="TextBoxT" id="proname" size="38" value='<%=proname%>'>
      </td>
    </tr>
    <tr class="text"> 
      <td>客房价格：</td>
      <td width="88%"><input name="protype" type="text" class="TextBoxT" id="protype" size="38" value='<%=protype%>'></td>
    </tr>
    <tr class="text"> 
      <td>客房图片：</td>
      <td> 
<%if request.querystring("id") <> "" then%>
	  <input name="propic" type="text" class="TextBoxT" id="propic" size="38" value='<%=proPic%>'>
<%else%>  
	  <input name="filedata" type="file" class="TextBoxT" id="filedata" size="38">
<%end if%>
        <font color=red><%=picabout%></font></td>
    </tr>
    <tr class="text"> 
      <td valign="top">客房类别：</td>
      <td><select name="proclass" class="TextBoxT" id="select">
          <%=list_class()%>
        </select> <font color=red><%=classabout%></font></td>
    </tr>
    <tr class="text"> 
      <td valign="top"> 客房说明：</td>
      <td> <textarea name="proinfo" cols="75" rows="10" class="TextBoxT" id="proinfo"><%=proinfo%></textarea> 
      </td>
    </tr>
    <tr> 
      <td>&nbsp;</td>
      <td> <input type="submit" name="Submit" value="提交"> &nbsp;&nbsp;&nbsp; <input type="reset" name="Submit2" value="重置"> 
      </td>
    </tr>
  </form>
</table>
</body>
</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -