查人人中国名人网php全栈框架:程序帮助！请教高手！
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/03 10:42:27
错误类型：
Microsoft VBScript 运行时错误 (0x800A005E)
无效使用 Null: 'replace'
/shop/admin/kehu/daili.asp, 第 77 行
原代码如下
<%
i=1
do while not rs.eof and i<=rs.pagesize
%>
<tr valign="middle">
<td width="200" bgcolor="#f1f1f1">[<%= rs("id")%>]<a --------------77行href="daili_x.asp?xs=<%=request("xs")%>&txt=<%=request("txt")%>&page=<%=page%>&id=<%=rs("id")%>"><%=replace(rs("name"),"<","〈")%></a>[<%= rs("js2")%>/<%= rs("js")%>]</td>
<td width="70" align="center" bgcolor="#f1f1f1"><%=replace(rs("name2"),"<","〈")%></td>
<td width="250" bgcolor="#f1f1f1"><%=replace(rs("dz"),"<","〈")%>[<%= rs("rmb")%>/<%= rs("rmb2")%>]</td>
<td width="50" align="center" bgcolor="#f1f1f1"><a href="daili.asp?y=pass&keywords=<%=request("keywords")%>&xs=<%=request("xs")%>&id=<%=rs("id")%>&page=<%=page%>"><%if rs("pass")=1 then response.Write("已审") else response.Write("<font color='#FF6600'>未审</font>")%></a></td>
<td width="50" align="center" bgcolor="#f1f1f1"><a href=?y=del&keywords=<%=request("keywords")%>&xs=<%=request("xs")%>&id=<%=rs("id")%>&page=<%=page%>>删除</a></td>
</tr>
我是个菜鸟，你能给修改一下吗？多谢谢了！！
77行是？
Replace函数
描述
返回字符串，其中指定数目的某子字符串被替换为另一个子字符串。
语法
Replace(expression, find, replacewith[, compare[, count[, start]]])
Replace 函数的语法有以下参数：
参数 描述
expression 必选。 字符串表达式 包含要替代的子字符串。
find 必选。被搜索的子字符串。
replacewith 必选。用于替换的子字符串。
start 可选。expression 中开始搜索子字符串的位置。如果省略，默认值为 1。在和count 关联时必须用
count 可选。执行子字符串替换的数目。如果省略，默认值为 -1，表示进行所有可能的替换。在和 start 关联时必须用。
compare 可选。指示在计算子字符串时使用的比较类型的数值。有关数值，请参阅“设置”部分。如果省略,缺省值为 0 ,这意味着必须进行二进制比较。
设置
compare 参数可以有以下值：
常数 值 描述
vbBinaryCompare 0 执行二进制比较。
vbTextCompare 1 执行文本比较。
返回值
Replace 返回以下值：
如果 Replace 返回
expression 为零长度 零长度字符串 ("")。
expression 为 Null 错误。
find 为零长度 expression 的副本。
replacewith 为零长度 expression 的副本，其中删除了所有由 find 参数指定的内容。
start > Len(expression) 零长度字符串。
count 为 0 expression 的副本。
说明
Replace 函数的返回值是经过替换（从由 start 指定的位置开始到 expression 字符串的结尾）后的字符串，而不是原始字符串从开始至结尾的副本。
下面的示例利用 Replace 函数返回字符串:
Dim MyString
'二进制比较从字符串左端开始。返回 "XXYXXPXXY"。
MyString = Replace("XXpXXPXXp", "p", "Y")
'文本比较从第三个字符开始。返回 "YXXYXXY"。
MyString = Replace("XXpXXPXXp", "p", "Y", 3, -1, 1)