关于动网论Microsoft VBScript 运行时错误 错误 ’800a01a8’ 解决办法
<p>今天打开论坛发现竟然出现了 Microsoft VBScript 运行时错误 '800a01a8'！！！</p><p>到网上一查，发现动网论坛 出现Microsoft VBScript 运行时错误 '800a01a8'这种错误并非个别现象。于是找了2种解决方案，放在这里以方便自己和**使用动网论坛的站长碰到Microsoft VBScript 运行时错误 '800a01a8'这种错误时可以很快的解决问题。</p><p><font face="Verdana">问题现象:<br/>Microsoft VBScript 运行时错误 错误 '800a01a8'</font></p><p><font face="Verdana">已碰到的这种情况包括：<br/></font></p><p><font face="Verdana">Microsoft VBScript 运行时错误 错误 '800a01a8' </font></p><p><font face="Verdana">缺少对象: 'Application(...).documentElement.selectSingleNode(...)' </font></p><p><font face="Verdana">/inc/Dv_ClsMain.asp，行 474 </font></p><p>打开的动网论坛分页的时候出现下面这个错误提示:</p><p>msxml3.dll<font size="2"><font face="Tahoma"></font><font face="宋体">错误 '80004005'</font><font face="Tahoma">
</font></font></p><p><font face="宋体" size="2">所需的属性没有一个有效的值。 </font></p><p><font face="宋体" size="2">/index.asp</font><font face="宋体" size="2">，行 382</font>
</p><p>Microsoft VBScript 运行时错误 错误 '800a01a8' 缺少对象: '' /inc/Dv_ClsMain.asp，行 1097</p><p>解决办法是:</p><p>1.先清理缓存~打开admin/ReloadForumCache.asp文件,在Function GetallCache()上面添加一句Call delallcache()然后运行这个文件</p><p>最后再把这个文件改回来就ok了，主要是清理了一下缓存，当然用下面的第2种方法cleancache.asp文件清除缓存也可以解决动网的 '800a01a8' 错误！</p><p>2.运行动网论坛的CleanCache.asp，清理缓存后解决问题</p><p>一下附动网论坛CleanCache.asp的源代码:</p><p><%<br/>'-------------------------------------------<br/>' Dvbbs System Update Software Tools<br/>' ClearCache File <br/>' 动网先锋 <br/>' ScriptEditor Fssunwin<br/>' 2005-03-25<br/>'-------------------------------------------<br/>Call RemoveAllCache()</p><p>Sub RemoveAllCache()<br/>Dim cachelist,i<br/>Call InnerHtml("UpdateInfo","<b>开始执行清理当前站点缓存</b>：")<br/>Cachelist=split(GetallCache(),",")<br/>If UBound(cachelist)>1 Then<br/> For i=0 to UBound(cachelist)-1<br/> DelCahe Cachelist(i)<br/> Call InnerHtml("UpdateInfo","更新 <b>"&cachelist(i)&"</b> 完成")<br/> Next<br/> Call InnerHtml("UpdateInfo","更新了"& UBound(cachelist)-1 &"个缓存对象<br>")<br/>Else<br/> Call InnerHtml("UpdateInfo","<b>当前站点全部缓存清理完成。</b>。")<br/>End If<br/>End Sub</p><p>Function GetallCache()<br/>Dim Cacheobj<br/>For Each Cacheobj in Application.Contents<br/> GetallCache = GetallCache & Cacheobj & ","<br/>Next<br/>End Function</p><p>Sub DelCahe(MyCaheName)<br/>Application.Lock<br/>Application.Contents.Remove(MyCaheName)<br/>Application.unLock<br/>End Sub</p><p>Sub InnerHtml(obj,msg)<br/>Response.Write "<li>"&msg&"</li>"<br/>Response.Flush<br/>End Sub<br/>%></p><p>至此动网论坛出现的Microsoft VBScript 运行时错误 '800a01a8'完全解决。论坛可以访问了。</p> <p>如果过一段时间，还出现这种问题,那就是下面的原因：</p><p>跟服务器设置及硬件配置有关.当然最重点还是这个版本较吃内存,硬件配置差的话,重启机子时间设定短些哈,也可试下服务器装黄金内存等软件.</p>
页:
[1]