📄 regsta1.asp
字号:
<%@ LANGUAGE = VBScript.Encode %>
<%Option Explicit%>
<!--#include file="functions.asp"-->
<!--#include file="con-the-hhlong.asp"-->
<%Response.Expires = 0%>
<%
dim objRS,sql,fuid
dim sortid
dim thispath,IsErr
sortid = Request.QueryString("sortid")
IsErr = 0
sql = "select * from pathform where thispath like '%" & chr(44) & sortid & "'"
Set objRS = objConn.Execute(sql)
if objRS.EOF then
IsErr = 1
else
thispath = "<a href=""shop.asp?sortid=" & sortid & """>首页∷" & Replace(objRS("pathname"),chr(255),"∷") & "</a>"
end if
'objConn.Close()
'Set objRS = nothing
'Set objConn = nothing
if IsErr <> 0 then
Response.Write("<font color=""red"">首页及一级分类下不能有单独的网站存在！</font>")
Response.End
end if
%>
<html>
<head>
<title>信息发布：第一步</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="happycss.css" type="text/css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
if (restore) selObj.selectedIndex=0;
}
//-->
</script>
</head>
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0">
<%
sortid = Request.QueryString("sortid")
%>
<%
Set objRS = Server.CreateObject("ADODB.RecordSet")
sql = "select * from sort where ID = " & sortid & " order by id DESC"
objRS.Open sql, objConn, 3, 1
fuid=objRS("parentID")
objConn.Close()
Set objRS = nothing
Set objConn = nothing
%>
<!--#include file="include-top3.htm"-->
<SCRIPT language=JavaScript>
<!--
function FrontPage_Form1_Validator(theForm)
{
if (theForm.title.value == "")
{
alert("温馨小提示：信息标题还没有填：）");
theForm.title.focus();
return (false);
}
if (theForm.comments.value == "")
{
alert("温馨小提示：没有内容的信息是不能发布的。");
theForm.comments.focus();
return (false);
}
if (theForm.name.value == "")
{
alert("温馨小提示：简单填一下您的联系地址吧！");
theForm.name.focus();
return (false);
}
if (theForm.infoname.value == "")
{
alert("温馨小提示：联系人！");
theForm.infoname.focus();
return (false);
}
if (theForm.regsitearea.value == "")
{
alert("温馨小提示：留个电话好方便联系呀");
theForm.regsitearea.focus();
return (false);
}
if (theForm.email.value == "")
{
alert("温馨小提示：邮箱你忘记写了");
theForm.email.focus();
return (false);
}
var checkOK = "0123456789abcdefghijklmnopqrstuvwxyz@.-";
var checkStr = theForm.email.value;
var allValid = true;
var decPoints = 0;
var allNum = "";
for (i = 0; i < checkStr.length; i++)
{
ch = checkStr.charAt(i);
for (j = 0; j < checkOK.length; j++)
if (ch == checkOK.charAt(j))
break;
if (j == checkOK.length)
{
allValid = false;
break;
}
if (ch != ".")
allNum += ch;
}
if (!allValid)
{
alert("温馨小提示：邮箱写错了");
theForm.email.focus();
return (false);
}
if (theForm.email.value !== "")
{
var checkOK2 = theForm.email.value;
var checkStr2 = "@.";
var allValid2 = true;
var decPoints2 = 0;
var allNum2 = "";
for (i = 0; i < checkStr2.length; i++)
{
ch2 = checkStr2.charAt(i);
for (j = 0; j < checkOK2.length; j++)
if (ch2 == checkOK2.charAt(j))
break;
if (j == checkOK2.length)
{
allValid2 = false;
break;
}
if (ch2 != ".")
allNum2 += ch2;
}
if (!allValid2)
{
alert("温馨小提示：邮箱写错了");
theForm.email.focus();
return (false);
}
}
if (theForm.regsitearea.value == "")
{
alert("请写入联系电话!");
theForm.regsitearea.focus();
return (false);
}
if (theForm.diqu.value == "")
{
alert("请写入授课城区!");
theForm.diqu.focus();
return (false);
}
if (theForm.nianji.value == "")
{
alert("请写入学员年级!");
theForm.nianji.focus();
return (false);
}
if (theForm.shijian.value == "")
{
alert("请写入授课时间!");
theForm.shijian.focus();
return (false);
}
return (true);
}
//-->
</SCRIPT>
<p align="center"><font size="3">填写分类信息资料</font></p>
<table width="560" border="0" align="center">
<tr>
<td> <form action="regsta2.asp" method="post" name="FrontPage_Form1" onsubmit="return FrontPage_Form1_Validator(this)" id="name=FrontPage_Form1">
<input type="hidden" name="sortid" value="<%=sortid%>">
<input type="hidden" name="fuid" value="<%=fuid%>">
<input type="hidden" name="pathname" value="<%=Server.HTMLEncode(thispath)%>">
<p><b>
<%if session("txtId")="" then%>
（您现在是用<font color="#FF0000">非会员</font>身份发布信息，信息发布后将不可修改；建议<a href=user/Register_1.asp target=_blank>注册成会员</a>后发布，会员发布的信息是可以修改并可以管理其它人给您的留言……）<br>
<%end if%>
<%if session("txtId")<>"" then%>
<font color="#ff0000"><%=session("txtId")%></font> 欢迎您发布信息！
<%end if%>
</b><a href="default.asp/Submit-city.asp" target="_blank"><br>
</a><b> 您正在将您的信息发布在以下分类：</b></p>
<blockquote>
<center>
<table width="100%" border="0" cellspacing="0" cellpadding="3">
<tr>
<td><b><font size="3"><%=thispath%></font></b></td>
</tr>
</table>
</center>
</blockquote>
<br>
<table width="100%" border="0" cellspacing="0" cellpadding="2">
<tr>
<td width="27%"><b><font color="#FF0000">*</font>信息标题：</b></td>
<td width="73%"> <input maxlength="20" name="title" size="40" value="">
<font color="#FF0000">20个字以内（包括标点）</font> </td>
</tr>
<tr>
<td width="27%"><b><font color="#FF0000">*</font>信息类型</b><b>：</b></td>
<td width="73%"> <select name="lang" size="1">
<option value="供应信息" selected>供应信息</option>
<option value="求购信息">求购信息</option>
<option value="代理合作">代理合作</option>
<option value="其它信息">其它信息</option>
</select>
<b><font color="#FF0000">*</font>有效期
<select name="infotime" id="infotime" >
<option value="7" selected>一星期</option>
<option value="30">一个月</option>
<option value="365">一年</option>
</select>
</b></td>
</tr>
<tr>
<td width="27%" valign="top"><b><font color="#FF0000">*</font>信息内容：</b><br>
<font color="#FF0000">（500字以内）</font> </td>
<td width="73%"> <textarea name="comments" cols="60" rows="10"></textarea>
</td>
</tr>
<tr>
<td width="27%"><b><font color="#FF0000">*</font>联系地址<b></b>：</b></td>
<td width="73%"><input type="text" name="name" maxlength="30"> <font color="#FF0000">30个字以内</font>
</td>
</tr>
<tr>
<td width="27%"><b><font color="#FF0000">*</font>所在区域<b></b>：</b></td>
<td width="73%"><select name="infoqy" id="infoqy" >
<option value="天河区" selected>天河区</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>
<td><b><font color="#FF0000">*</font>联系人<b></b>：</b></td>
<td><input name="infoname" type="text" id="infoname" maxlength="10">
<font color="#FF0000">10个字以内</font> </td>
</tr>
<tr>
<td><b><font color="#FF0000">*</font>联系电话<font color="#FF0000"></font>：</b></td>
<td><input name="regsitearea" type="text" onKeyPress="if ((event.keyCode < 45 || event.keyCode > 57)&&event.keycode!='-') event.returnValue = false;" maxlength="50">
<font color="#FF0000">只能是数字<b>（固定电话、手机、小灵通）</b></font></td>
</tr>
<tr>
<td><b><font color="#FF0000">*</font>您的Email：</b></td>
<td><input type="text" name="email" maxlength="50"> <font color="#FF0000">请认真填写</font></td>
</tr>
<tr align="center" bgcolor="#ECECEC">
<td height="25" colspan="2"><strong>以下信息可选填</strong></td>
</tr>
<tr>
<td valign="top"><b>网站网址</b><b>：</b></td>
<td><input name="url" size="30" value="http://"> </td>
</tr>
<tr>
<td valign="top"><b>公司名称</b><b><font color="#FF0000"></font>：</b></td>
<td><input maxlength="30" name="regsitename" size="30" value="无">
<font color="#FF0000">30个字以内</font> </td>
</tr>
<tr>
<td valign="top"><b>公司信息：</b><br> <font color="#FF0000">（300字以内）</font>
</td>
<td><textarea name="regsiteabout" cols="60" rows="6">无</textarea></td>
</tr>
</table>
<b>
<%if session("txtId")="" then%>
（<font color="#FF0000">非会员</font>发布信息，不可以上传图片；建议<a href=user/Register_1.asp target=_blank>注册成会员</a>后发布）<br>
<%end if%>
<%if session("txtId")<>"" then%>
</b>
<table width="100%" border="0" cellspacing="0" cellpadding="2">
<tr>
<td width="21%"><b>相关图片：</b></td>
<td width="79%"><input name="logo" type="text" id="logo" size="28">
会员可以自己上传图片，大小不超过<strong><font color="#FF0000">50K</font></strong><br>
<font color="#666666">*也可以是网上的图片例如：<font color="#993333">http://www.gzci.com/2008images/logo.gif</font></font></td>
</tr>
<tr>
<td> </td>
<td><iframe name="ad" frameborder=0 width=100% height=40 scrolling=no src="picture.asp"></iframe></td>
</tr>
</table>
<b>
<%end if%>
</b>
<blockquote>
<p>
<center>
</center>
<center>
<p>
<input name=".submit" type="submit" value=" 发 布 ">
<input name=".reset" type="reset" value=" 重 填 ">
</p>
</center>
</blockquote>
<p align="center">
<center>
</center>
</form></td>
</tr>
</table>
<br>
<!--#include file="buttom.asp" -->
</body> </html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -