网页资讯视频图片知道文库贴吧地图采购
进入贴吧全吧搜索
asp吧 关注：33,674贴子：110,980
  • 4回复贴，共1页

看看下面的代码有什么问题,为什么添加数据超长,老是返回这个页面,怎

<%end if%>
<SCRIPT LANGUAGE="JavaScript">
<!--//
function check()
{
   if (document.register.gznum.value.length<1) 
alert("请输入工作经验年数！");
   else if (isNaN(register.gznum.value))
alert("工作经验栏只能填写数字！");
   else if (document.register.gzjl.value.length<1) 
alert("请输入详细工作经历！");
   else
document.register.submit();
}
//-->
</SCRIPT>
<META http-equiv=Content-Language content=zh-cn>
<META content="MSHTML 6.00.2716.2200" name=GENERATOR>
<META content=FrontPage.Editor.Document name=ProgId>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="../images/job.css" type=text/css rel=stylesheet></HEAD>
<BODY bgColor=#57b5c6 background=../images/bg.gif leftMargin=0 topMargin=0 marginwidth="0" marginheight="0">
<SCRIPT language=JavaScript src="../inc/validate.js"></SCRIPT>
<SCRIPT language=JavaScript src="../inc/companyreg.js"></SCRIPT>
<SCRIPT language=JavaScript src="../inc/f-index.js"></SCRIPT>
<SCRIPT language=JavaScript src="../inc/window.js"></SCRIPT>
<!--#include file="../job_head.asp"-->
<TABLE cellSpacing=0 cellPadding=0 width=777 align=center border=0>
<TR><TD height=3><IMG height=1 src="" width=1></TD></TR></TABLE>

<TABLE cellSpacing=0 cellPadding=0 width=777 align=center border=0>
  <TR> 
    <TD vAlign=top width=578> <!--#include file="../ad.asp" --> <TABLE cellSpacing=0 cellPadding=0 width="100%" align=center border=0>
        <TR> 
          <TD height=3><IMG height=1 src="" width=1></TD>
        </TR>
      </TABLE>
      <TABLE cellSpacing=0 cellPadding=0 width=560 border=0>
        <TR> 
          <TD> <TABLE cellSpacing=3 cellPadding=0 width="100%"
                  bgColor=#ffffff border=0>
              <TR> 
                <TD width=25 bgColor=#ff6600 height=25> <DIV align=center><IMG height=7
                        src="../images/arrow(1).gif"
                        width=7></DIV></TD>
                <TD width=525 bgColor=#666666> <FONT color=#ffffff>企业登陆</FONT></TD>
              </TR>
              <TR bgColor=#f6f6f6> 
                <TD colSpan=2 height=185> <TABLE cellSpacing=5 cellPadding=0 width="100%" border=0>
                    <TR> 
                      <TD vAlign=top height=880>
  
<% if modify<>"ture" then %>
<FORM name=register action=register2.asp method=post>
<%else%>
<FORM name="register" action="register2.asp?modify=ture" method="post">
                          <%end if%>
                          <table border="1" cellpadding="0" cellspacing="0" width="93%" height="258" bordercolor="#FFFFFF" bordercolorlight="#FFFFFF" bordercolordark="#FFFFFF">
                            <tr> 
                              <td width="100%" height="18" valign="bottom" bgcolor="#C6CEDE" bordercolor="#000000" bordercolorlight="#000000" bordercolordark="#FFFFFF"> 
                                <p align="center">=== 个人主要特长 ===</td>
                            </tr>
                            <tr> 
                              <td width="100%" height="124" valign="top" bgcolor="#F3F3F3"> 



                                <p align="center"><br>外语特长:
                                  <SELECT 
                  size=1 name=language>
                                    <OPTION value=无 <%if rs("language") ="无" then Response.Write "selected"%>>无 
                                    <OPTION value=英语 <%if rs("language") ="英语" then Response.Write "selected"%>>英语 
                                    <OPTION value=日语 <%if rs("language") ="日语" then Response.Write "selected"%>>日语 
                                    <OPTION value=法语 <%if rs("language") ="法语" then Response.Write "selected"%>>法语 
                                    <OPTION value=德语 <%if rs("language") ="德语" then Response.Write "selected"%>>德语 
                                    <OPTION value=俄语 <%if rs("language") ="俄语" then Response.Write "selected"%>>俄语 
                                    <OPTION value=朝鲜语 <%if rs("language") ="朝鲜语" then Response.Write "selected"%>>朝鲜语 
                                    <OPTION value=西班牙语 <%if rs("language") ="西班牙语" then Response.Write "selected"%>>西班牙语 
                                    <OPTION value=阿拉伯语 <%if rs("language") ="阿拉伯语" then Response.Write "selected"%>>阿拉伯语 
                                    <OPTION value=其它 <%if rs("language") ="其它" then Response.Write "selected"%>>其它</OPTION>
                                  </SELECT>
                                    
                                  <SELECT size=1 name=lanlevel>
                                    <OPTION value=无 <%if rs("lanlevel") ="无" then Response.Write "selected"%>>无 
                                    <OPTION value=四级  <%if rs("lanlevel") ="四级" then Response.Write "selected"%>>四级 
                                    <OPTION value=八级  <%if rs("lanlevel") ="八级" then Response.Write "selected"%>>八级 
                                    <OPTION value=六级  <%if rs("lanlevel") ="六级" then Response.Write "selected"%>>六级 
                                    <OPTION value=熟练  <%if rs("lanlevel") ="熟练" then Response.Write "selected"%>>熟练 
                                    <OPTION value=精通  <%if rs("lanlevel") ="精通" then Response.Write "selected"%>>精通 
                                    <OPTION value=良好  <%if rs("lanlevel") ="良好" then Response.Write "selected"%>>良好 
                                    <OPTION value=一般  
  <%if rs("lanlevel") ="一般" then Response.Write "selected"%>>一般</OPTION>
                                  </SELECT>
                                </p>
                                <p align="center">普通话程度:
                                  <SELECT 
                  size=1 name=pthua>
                                      <OPTION value=一般 <%if rs("computer") ="一般" then Response.Write "selected"%>>一般 
                                    <OPTION value=优秀 <%if rs("computer") ="优秀" then Response.Write "selected"%>>优秀 



2025-12-15 18:10:14
广告
不感兴趣
开通SVIP免广告
                                    <OPTION value=良好 <%if rs("computer") ="良好" then Response.Write "selected"%>>良好 
                                    <OPTION value=较差 <%if rs("computer") ="较差" then Response.Write "selected"%>>较差</OPTION>
                                  </SELECT>
                                    计算机能力: 
                                  <SELECT size=1 name=computer>
                                 <OPTION value=标准 <%if rs("pthua") ="标准" then Response.Write "selected"%>>精通 
                                    <OPTION value=一般 <%if rs("pthua") ="一般" then Response.Write "selected"%>>一般 
                                    <OPTION value=较差 <%if rs("pthua") ="较差" then Response.Write "selected"%>>较差 
                                    </OPTION> 
                                  </SELECT>
                                </p>
                                <p align="center">其他主要特长:<br><font color="#FF0000">(限50字以内)</font><br><%if modify<>"ture" then 
  kothertc=""
  else
  kothertc=replace(rs("othertc"),"<br>",chr(13))
              kothertc=replace(kothertc," "," ")%>
                                  <%end if%>
                                  <textarea rows="6" name="othertc" cols="34"><%=kothertc%></textarea></p></td>
                            </tr>
                            <tr> 
                              <td width="100%" height="18" valign="bottom" bgcolor="#C6CEDE" bordercolor="#000000" bordercolorlight="#000000" bordercolordark="#FFFFFF"> 
                                <p align="center">=== 相关工作经历 === </td>
                            </tr>
                            <tr> 
                              <td width="100%" height="108" valign="top" bgcolor="#F3F3F3"> 
                                <p align="center"><br>工作经验:至今相关工作经验共有
                                  <INPUT 
                  maxLength=2 size=2 name=gznum value="<%=rs("gznum")%>">
                                  年</p>
                                <p align="center">详细工作经历:<BR>
                                  按照格式<font color="#FF0000">xx年xx月 至 xx年xx月 xx职务
                                  xx公司}</font>填写 
                                  <%if modify<>"ture" then 
  kgzjl=""
  else
  kgzjl=replace(rs("gzjl"),"<br>",chr(13))
              kgzjl=replace(kgzjl," "," ")%>
                                  <%end if%>
                 <textarea rows="11" name="gzjl" cols="48"><%=kgzjl%></textarea></p><p align="center"> 
                                  <% if modify<>"ture" then %>
                                  <input name="button2" type="submit" onclick="javascript:history.go(-1)" value="上一步">
                                  <input name="button2" type="submit" value="下一步"><br><%else%>



                                  <input name="button2" type="submit" value="更 新"><br><%end if%>
                              </td>
                            </tr>
                          </table>
                        </form>
  </TD>
                    </TR>
                  </TABLE></TD>
              </TR>
            </TABLE>
            <TABLE cellSpacing=0 cellPadding=0 width="100%" align=center border=0>
              <TR> 
                <TD bgColor=#666666 height=3><IMG height=1 src=""
        width=1></TD>
              </TR>
            </TABLE>
            <TABLE cellSpacing=0 cellPadding=0 width="100%" align=center
            border=0>
              <TR> 
                <TD height=3><IMG height=1 src=""
          width=1></TD>
              </TR>
            </TABLE></TD>
        </TR>
      </TABLE></TD>
    <TD vAlign=top width=199>
      <!--#include file="right.asp"-->
    </TD>
  </TR>
</TABLE>

<TABLE cellSpacing=3 cellPadding=0 width=777 align=center bgColor=#ffffff
border=0>

  <TR>
    <TD bgColor=#f6f6f6 height=80>
      <DIV align=center>
</DIV></TD></TR></TABLE></CENTER></DIV>
</BODY></HTML>
<% gzjl=htmlencode2(request("gzjl"))
if gzjl="" then Response.End
language=request("language")
lanlevel=request("lanlevel")
pthua=request("pthua")
computer=request("computer")
othertc=htmlencode2(request("othertc"))
gznum=request("gznum")

if othertc="" then othertc="无其他特长" end if
if gzjl="" then gzjl="我还没有什么工作经验,寻求锻炼的机会" end if

Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from person where uname='"&uname&"'"
rs.open sql,conn,3,3
rs("gznum")=gznum
rs("gzjl")=gzjl
rs("language")=language
rs("lanlevel")=lanlevel
rs("pthua")=pthua
rs("computer")=computer
rs("othertc")=othertc
rs.update
rs.close
if modify<>"ture" then
Response.Redirect "register3.asp" 
else
Response.Redirect "modify.asp" 
end if %>



我已经解决 谢谢


扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！
  • 4回复贴，共1页
分享到: