Microsoft VBScript 运行时错误 错误 '800a000d'
　　
　　类型不匹配: 'HTMLEncode'
　　
　　/admin/adsmanage.asp，行 60
　　==================================================================================================
　　下面是代码：
　　<table width="97%" border="0" cellspacing="0" cellpadding="0">
　　 <tr>
　　 <td align="center"><span style="color:#FF3300">请在此编辑页面广告（非浮动、挂边、弹出的广告），可以任意编辑、任意排版图片、文字、FLASH等</span></td>
　　 </tr>
　　 <tr>
　　 <td>&nbsp;</td>
　　 </tr>
　　</table>
　　<!--#include file="inc/AdsManage_inc.asp"-->
　　<table width="97%" border="0" cellpadding="0" cellspacing="0">
　　 <tr>
　　 <td height="24" align="center" class="listtop">ID</td>
　　 <td align="center" class="listtop">广告位置</td>
　　 <td align="center" class="listtop">操作</td>
　　 </tr>
　　<%
　　 if i <> -1 then
　　 for j = 0 to i
　　%>
　　 <form name="Ads<%=Ads(0,j)%>" method="post" action="AdsManage.asp?action=save&ID=<%=Ads(0,j)%>">
　　 <tr onMouseOver="this.style.backgroundColor='#FBF9F4';" onMouseOut="this.style.backgroundColor='#FFFFFF'">
　　 <td height="24" align="center" class="listitem"><%=j%></td>
　　 <td class="listitem"><%=Ads(2,j)%></td>
　　 <td align="center" class="listitem"><input name="submit2" type="button" class="Button" value="编辑内容" onclick="window.location.href='adsmanage.asp?editID=<%=j%>#edit'" /></td>
　　 </tr>
　　</form>
　　<%
　　 next
　　 end if
　　%>
　　
　　</table>
　　<%
　　 dim editID
　　 editID = request.QueryString("editID")
　　 if editID <> "" then
　　 if i <> -1 then
　　 for j = 0 to i
　　 if cdbl(editID) = cdbl(j) then
　　%>
　　<table id="edit">
　　<form name="Ads<%=Ads(0,j)%>" method="post" action="AdsManage.asp?action=save&ID=<%=Ads(0,j)%>">
　　 <tr onMouseOver="this.style.backgroundColor='#FBF9F4';" onMouseOut="this.style.backgroundColor='#FFFFFF'">
　　 <td height="24" align="center" class="listitem"></td>
　　 <td align="center" class="listitem">
　　这是第60行 <input name="Adsurl<%=Ads(0,j)%>" type="hidden" class="input_text" value="<%=server.HTMLEncode(Ads(1,j))%>" />
　　 <iframe ID="Adsurl<%=Ads(0,j)%>" src="../ewebeditor.asp?id=Adsurl<%=Ads(0,j)%>&style=standard" frameborder="0" scrolling="no" width="550" HEIGHT="350"></iframe>
　　 </td>
　　 <td align="center" class="listitem"></td>
　　 </tr>
　　 <tr><td colspan="3"><input name="submit2" type="submit" class="Button" value="修改" /></td></tr>
　　</form>
　　</table>
　　<%
　　 end if
　　 next
　　 end if
　　 end if
　　%>