Microsoft VBScript 运行时错误 错误 '800a005e'

无效使用 Null: 'replace'

/system/admin/view_company.asp，行 84

（下面第一行就是行 84 ）

      <td class="font" align="center" valign="middle" height="26" width="84" bgcolor="#DBE7F2"><%=replace(rs("date"),right(rs("date"),8),"")%></td>
      <td class="font" align="center" valign="middle" height="26" width="270" bgcolor="#C1D6EA"><font color=<%=rs("color")%>><%=left(rs("company"),20)%></font></td>
      <td class="font" align="center" valign="middle" height="26" bgcolor="#DBE7F2" width="126"><%=left(rs("tel"),20)%><font color="#FF6633" class="font"></font></td>
      <td class="font" align="center" valign="middle" height="26" width="43" bgcolor="#C1D6EA"><a href="del_company.asp?id=<%=rs("id")%>&amp;type=<%=request("type")%>"" class="linkfont">删除</a></td>
      <td class="linkfont" align="center" valign="middle" height="26" width="65" bgcolor="#DBE7F2"><a href="change_company.asp?id=<%=rs("id")%>" class="linkfont" target="_blank" >详细资料</a></td>
    </tr>
    <%
                rs.movenext
            next
  %>
    <tr>
      <td colspan="5" align="right" class="font">
               <%
            out("共 " & rs.pagecount & " 页 &nbsp;&nbsp;")
            out("当前第 " & PageNo & " 页 &nbsp;&nbsp;")
      %>
        <a href="view_company.asp?pageno=1&amp;type=<%=request("type")%>" class="linkfont">首页</a>
        <a href="view_company.asp?pageno=<%=pageno-1%>&amp;type=<%=request("type")%>" class="linkfont">上一页</a>
        <a href="view_company.asp?pageno=<%=pageno+1%>&amp;type=<%=request("type")%>" class="linkfont">下一页</a>
        <a href="view_company.asp?pageno=<%=rs.pagecount%>&amp;type=<%=request("type")%>" class="linkfont">尾页</a>
        &nbsp; </td>
    </tr>
    <%
        else
  %>
    <tr>
      <td colspan="5" class="font">
        <div align="center">没有数据!</div>
      </td>
    </tr>
    <%
        end if
        rs.close
        set rs=nothing
  %>
  </table>
</FORM>
</body>
</html>

好像有个格式化时间的函数

Replace函数的参数不能有Null空值，楼主的错误提示就是这个意思。

<%=replace(rs("date"),right(rs("date"),8),"")%>
改为：
<%=replace(rs("date"),right(rs("date"),8)," ")%>空值要在"" 间按下空格键

如果我没猜错的话，楼主是想获得时间字段的日期内容吧
如：将2007-1-11 21:09:35转为2007-1-11
2007-1-11 21:09:35的时间还好，如果是2007-1-11 9:09:35这样的时间呢，后项后面就不是8位了吧
建议采用以下方法
将<%=replace(rs("date"),right(rs("date"),8),"")%>改为
<%=(year(rs("date")) & "-" & month(rs("date")) & "-" & day(rs("date")))%>

formatdatetime(now(),2)  用这个函数这个函数。我也第一次，很不错。取出时间，列格式为2009-10-16

这个才是最简单实用的