<%@ Language=VBScript %>
<%if Session("weight")<>5 then 
Response.Redirect "error.asp?cause=4"
 end if
%>

<html>
<head>
<meta NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<LINK 
href="css/default.css" rel=stylesheet>

</head>
<body bgcolor="#FFF3C7">
<object runat="server" id="conn1" progid="adodb.connection"></object>
<%application.Lock
conn1.Open Application("p_jyzx")
Application.UnLock
%>
<script language="JavaScript">
function is_number(str)
{
	exp=/[^0-9]/g;
	if(str.search(exp) != -1)
	{
		return false;
	}
	return true;
}
function checkform(){
	
	if(form1.party_name.value=='')
	{
		alert("您还没有填写聚会主题！");
		form1.party_name.focus();
		return false;
	}
	if(form1.party_time.value=='')
	{
		alert("您还没有填写聚会时间！");
		form1.party_time.focus();
		return false;
	}
	if(form1.address.value=='')
	{
		alert("您还没有填写聚会地址！");
		form1.address.focus();
		return false;
	}
	if(form1.max_num.value=='')
	{
		alert("您还没有填写聚会人数！");
		form1.max_num.focus();
		return false;
	}
	if(!is_number(form1.max_num.value))
	{
		alert("聚会人数必须输入数字！");
		form1.max_num.focus();
		return false;
	}
	if(form1.contact.value.length<1)
	{
		alert("您还没有填写联系方式！");
		form1.contact.focus();
		return false;
	}
	if(form1.aa_expenses.value!='')
	{
	if(!is_number(form1.aa_expenses.value))
	{
		alert("AA制费用必须输入数字！");
		form1.aa_expenses.focus();
		return false;
	}
	}
	if(form1.party_content.value.length<1)
	{
		alert("您还没有填写聚会内容！");
		form1.party_content.focus();
		return false;
	}
	if(form1.remark.value.length<1)
	{
		alert("您还没有填写聚会备注！");
		form1.remark.focus();
		return false;
	}
	
	
	return true;
}
</script>

<%	
	set rs=server.CreateObject ("ADODB.recordset")
  sql="select * from party where id="&Request("id")
   rs.Open sql,conn1,3,2
	if rs.RecordCount<>0 then
	party_time=rs("party_time")
	party_name=rs("party_name")
	party_type=rs("party_type")
	address=rs("address")
	max_num=rs("max_num")
	province=rs("province")
	contact=replace(rs("contact"),"<br>",chr(10),1,-1,1)
	aa_expenses=rs("aa_expenses")
	other_expenses=rs("other_expenses")
	
	party_content=replace(rs("party_content"),"<br>",chr(10),1,-1,1)
	
	initiate_people=rs("initiate_people")
	
	end if
	
%>
<br>
<table cellSpacing="0" cellPadding="0" width="760" align="center" border="0">
  <tbody>
  <tr>
    <td height="30">　管理员页面-&gt; 网友聚会管理 -&gt; 聚会修改</td><td></td> 
        <td>&nbsp;&nbsp;</td>
<td>
      <a href="javascript:close()">关闭窗口</a></td> </tr>
 </tbody></table>

 <form action="party_after_update_party.asp" method="post" name="form1" onsubmit="return(checkform())">
 <input type="hidden" id="text1" name="id" value="<%=Request("id")%>">
 <table bgcolor="#ffcc33" border="0" cellPadding="2" cellSpacing="1" width="92%" align="center">
                          <tbody>
                                             
                          <tr bgcolor="#FFF3C7">
                            <td width="16%"><b>*主　　题：</b>： </td>
                            <td><input type="text" name="party_name" size="25" maxlength="50" value="<%=party_name%>">
                            </td></tr>                                 
                           
                           <%if party_type=2 then%>
                           <TR  bgcolor="#FFF8E1">   <TD><SPAN class=content><b>*聚会类别：</b></SPAN></TD>
							<TD><SELECT class=font1 name=party_type>
							 <OPTION selected 
							 value=2>旅游聚会</OPTION>
							 <OPTION value=4>地区聚会或其它</OPTION>  </td></tr>         
							<%else%> 
							<TR  bgcolor="#FFF3C7">   <TD><SPAN class=content><b>*聚会类别：</b></SPAN></TD>
							<TD><SELECT class=font1 name=party_type>
							 <OPTION
							 value=2>旅游聚会</OPTION>
							 <OPTION value=4 selected >地区聚会或其它</OPTION>  </td></tr>       
							<%end if%>                                           
                            <tr bgcolor="#FFF8E1">
                            <td width="16%"><b>*聚会时间：</b> </td>
                            <td><input type="text" name="party_time" size="25" MAXLENGTH="40" value="<%=party_time%>">
                            </td></tr>
                            <tr bgcolor="#FFF3C7">
                            <td vAlign="center"><b>所在省市：</b></td>
                            <td><select name="province" size="1"> 
                            <option selected value="<%=province%>"><%=province%></option>
                            <option value="北京">北京</option><option value="天津">天津</option><option value="上海">上海</option><option value="重庆">重庆</option><option value="河北省">河北省</option><option value="河南省">河南省</option><option value="黑龙江省">黑龙江省</option><option value="吉林省">吉林省</option><option value="辽宁省">辽宁省</option><option value="山东省">山东省</option><option value="内蒙古">内蒙古</option><option value="江苏省">江苏省</option><option value="安徽省">安徽省</option><option value="山西省">山西省</option><option value="陕西省">陕西省</option><option value="甘肃省">甘肃省</option><option value="浙江省">浙江省</option><option value="江西省">江西省</option><option value="湖北省">湖北省</option><option value="湖南省">湖南省</option><option value="贵州省">贵州省</option><option value="四川省">四川省</option><option value="云南省">云南省</option><option value="新疆">新疆</option><option value="宁夏">宁夏</option><option value="青海省">青海省</option><option value="西藏">西藏</option><option value="广西">广西</option><option value="广东省">广东省</option><option value="福建省">福建省</option><option value="海南省">海南省</option><option value="台湾省">台湾省</option><option value="香港">香港</option><option value="澳门">澳门</option><option value="美国">美国</option><option value="加拿大">加拿大</option><option value="澳大利亚">澳大利亚</option><option value="欧洲">欧洲</option><option value="其它国家">其它国家</option></select> </td></tr>
                            <tr bgcolor="#FFF8E1">
                            <td width="16%"><b>*聚会地点：</b> </td>
                            <td><input type="text" name="address" size="25" maxlength="40" value="<%=address%>">
                            </td></tr>                                 
                                                                                  
                              <tr bgcolor="#FFF3C7">
                            <td width="16%"><b>*拟邀请人数：</b> </td>
                            <td><input type="text" name="max_num" size="4" MAXLENGTH="4" value=<%=max_num%> >&nbsp;人，0表示不限
                            </td></tr>
                              <TR bgcolor="#FFF8E1">
							<TD><SPAN class=content><b>*联系方式</b></SPAN></TD>
							  <TD><SPAN class=content><FONT color=#228b22><TEXTAREA class=content cols=50 name=contact rows=3><%=contact%></TEXTAREA><BR>请务必留下具体的联系方式，电话或E-mail</FONT></SPAN></TD></TR>
							 <TR bgcolor="#FFF3C7">
								<TD><SPAN class=content><b>*开销支付方式</b></SPAN></TD>
								 <TD><SPAN class=content>AA制：<INPUT class=content maxLength=4 
									  name=aa_expenses value=<%=aa_expenses%> 
									 size=3>元/人&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;其它：<INPUT maxLength=50 
											 name=other_expenses value=<%=other_expenses%> ></SPAN></TD></TR>                                   
                                                                                           
                                                                                  
                            <tr bgcolor="#FFF8E1">
                            <td width="16%"><b>*活动内容：</b> </td>
                            <td><textarea class="p3" cols="62" name="party_content" rows="5" tabIndex="6" wrap="VIRTUAL"><%=party_content%></textarea>
                            </td></tr>
                           
    </table>
    <table border="0" cellPadding="2" cellSpacing="1" width="92%" align="center"><tbody>
                            <tr bgcolor="#FFF8E1">
                            <td align="center"><input type="submit" value="修 改" id="submit1" name="submit1"> 
                            </td></tr>
  </tbody></table>
</form>
</TD>
	</TR>
</TABLE>

</body>
</html>
