• 2999阅读
  • 1回复

求助,无法实现数据库更新?急~~~!!! [复制链接]

上一主题 下一主题
离线寒蝉
 
只看楼主 倒序阅读 0楼 发表于: 2005-05-25
<% id=trim(request.QueryString("id"))
    if request("action")="save" then
    com_name=request.form("com_name")
    INFOID=request.form("INFOID")
    Number1=request.form("Number")
    SEX=request.form("SEX")
    conperson=request.form("conperson")
    contel=request.form("contel")
    conemail=request.form("conemail")
    jobadd=request.form("jobadd")
    Duty=request.form("Duty")
    Duty=server.htmlencode(Duty)
    Duty=replace(Duty," "," ")
    Duty=replace(Duty,chr(13)&chr(10),"<Br>")
    Require=request.form("Require")
    Require=server.htmlencode(Require)
    Require=replace(Require," "," ")
    Require=replace(Require,chr(13)&chr(10),"<Br>")
    sxdate=request.form("sxdate0")&"-"&request.form("sxdate1")&"-"&request.form("sxdate2")
    set rs=server.CreateObject("adodb.recordset")
    rs.cursorlocation=aduseclient
    sql="select * from job where id="&id
    rs.open sql,conn,3,3
    rs("com_name")=com_name
    rs("INFOID")=INFOID
    rs("Number")=Number1
    rs("SEX")=SEX
    rs("conperson")=conperson
    rs("contel")=contel
    rs("conemail")=conemail
    rs("jobadd")=jobadd
    rs("Duty")=Duty
    rs("Require")=Require
    rs("sxdate")=sxdate
    rs("date")=date()
    rs.update
    rs.close
    Response.Write("<script language=javascript>alert('修改成功!');onclick=window.close();</script>")
  else
  set rs=server.createobject("adodb.recordset")
  rs.open "select * from job where id="&id,conn,1,1
%>
<table>
<form name=form1 action=?action=save method=post>
        <tr bgcolor="#FFFFFF">
          <td colspan="2"><input type="hidden" name="com_name" value="<%=rs("com_name")%>">
            <%=rs("com_name")%></td>
        </tr>
        <tr bgcolor=#ffffff>
          <td width="23%">招聘职位</td>
          <td width="77%"><input name="infoid" value="<%=rs("infoid")%>" maxlength=30>
    **</td>
        </tr>
        <tr bgcolor=#ffffff>
          <td>招聘人数</td>
          <td><input name="number" value="<%=rs("number")%>" maxlength=8>
    **</td>
        </tr>
        <tr bgcolor=#ffffff>
          <td>要求性别</td>
          <td><select name="sex">
            <option value="男"<%if rs("sex")="男" then%> selected<%end if%>>男</option>
            <option value="女"<%if rs("sex")="女" then%> selected<%end if%>>女</option>
            <option value="不限" <%if rs("sex")="不限" then%> selected<%end if%>>不限</option>
            </select></td>
        </tr>
        <tr bgcolor=#ffffff>
          <td>联系人</td>
          <td><input name="conperson" value="<%=rs("conperson")%>" type="text" maxlength="18">
    **</td>
        </tr>
        <tr bgcolor="#FFFFFF">
          <td>联系电话</td>
          <td><input name="contel" value="<%=rs("contel")%>" type="text" maxlength="11">
    **</td>
        </tr>
        <tr bgcolor="#FFFFFF">
          <td>E-mail</td>
          <td><input name="conemail" value="<%=rs("conemail")%>" type="text" maxlength="40"></td>
        </tr>
        <tr bgcolor="#FFFFFF">
          <td>工作地点</td>
          <td><input name="jobadd" value="<%=rs("jobadd")%>" type="text" maxlength="30">
    **</td>
        </tr>
        <tr bgcolor=#ffffff >
          <td>工作职责 </td>
          <td><textarea name=Duty cols=70 rows=5 onChange="this.value=this.value.substring(0, 10000);"><%=server.htmlencode(trim(rs("Duty")&" "))%></textarea></td>
        </tr>
        <tr bgcolor=#ffffff>
          <td>相关要求 </td>
          <td ><textarea name=Require cols=70 rows=5 onChange="this.value=this.value.substring(0, 10000);"><%=server.htmlencode(trim(rs("Require")&" "))%></textarea></td>
        </tr>
        <tr bgcolor=#ffffff>
          <td>截至日期</td>
          <td><select name="sxdate0" size="1">
                    <%for i=2005 to year(date)+2%>
                       <option value="<%=i%>" <%if year(rs("sxdate"))=i then%> selected <%end if%>><%=i%></option>
                       <%next%>
                     </select>年
            <select name="sxdate1" size="1">
                             <%for i=1 to 12%>
                             <option value="<%=i%>" <%if month(rs("sxdate"))=i then%> selected <%end if%>><%=i%></option>
                          <%next%>
                             </select>月
            <select name="sxdate2" size="1">
                             <%for i=1 to 31%>
                             <option value="<%=i%>" <%if day(rs("sxdate"))=i then%> selected <%end if%>><%=i%></option>
                          <%next%>
                             </select>
              日**</td>
        </tr>
        <tr bgcolor=#ffffff>
          <td colspan="2" align="center">
            <table width="145" height="20" border="0" cellpadding="0" cellspacing="0">
            <tr>
              <td width="88"><input name="imageField2" type="image" src="images/tj.gif" width="45" height="20" border="0"></td>
              <td width="57"><input name="Submit22" type="reset" value="重填"style="WIDTH:45"></td>
            </tr>
          </table></td>
        </tr>
        </form>
</table>
<%rs.close
end if%>
寒蝉
离线寒蝉
只看该作者 1楼 发表于: 2005-05-25
提示问题“BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。”
错误在“rs("com_name")=com_name”这不能执行
数据库结构id(主键),com_name,infoid,number,sexdate,duty,date,sex,require,conperson,contel,conemail,hit,jobadd
韭菜能否留下您的QQ,谢谢!
寒蝉
快速回复
限100 字节
 
上一个 下一个