⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 party_update_party.asp

📁 广东交友源程序
💻 ASP
字号:
🔍 
<%@ Language=VBScript %>
<%

if Session("weight")=0 then 
Response.Redirect "error.asp?cause=4"
 end if
%><link rel="stylesheet" href="../../images/css.css" type="text/css">
<body leftmargin="0" marginwidth="0" topmargin="0" marginheight="0">
<p align="center"><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
	
%>

<!--#include file="top.asp" --><TABLE WIDTH="770" BORDER=0 CELLSPACING=0 CELLPADDING=0 bgcolor="#FFF8E1" style="" align="center">
	<TR>
		<TD  class=border_1>

<br>
<table cellSpacing="0" cellPadding="0" width="92%" align="center" border="0">
  <tbody>
  <tr>
    <td height="30"><a href="../../default.asp">首页</a> -&gt; <a href="party_index.asp">非常网聚</a> -&gt; 聚会修改</td><td></td> 
                    <td>&nbsp;&nbsp;</td>
<td>
      <a href="party_2.asp?id=<%=Request("id")%>">返回上一页</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><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%> size="20" ></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>
<!--#include file="../../copyright.asp" -->
</body>
</html>

⌨️ 快捷键说明

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