|
主题:admin目录下出现rad955B8.tmp文件是什么问题 [收藏主题] | 转到: |
支持(0) | 反对(0) 顶端 底部 |
同时网站根目录还行也多了些文件有个叫log.asp内容是
<!--#include file="conn.asp"---> <!--#include file="ks_cls/kesion.commoncls.asp"---> <div id="msg"> 消息... </div> <% dim ks:set ks=new publiccls dim rsc,n n=0 dim rs:set rs=server.CreateObject("adodb.recordset") rs.open "select content,title from ks_bloginfo where content is not null",conn,1,3 do while not rs.eof n=n+1 if n mod 10 =0 then response.write "<script>document.getElementById('msg').innerHTML='正在转换日志" & rs(1) & "';</script>" end if rs(0)=KS.Htmlcode(rs(0)) rs.update rs.movenext response.flush loop rs.close closeconn response.write "<script>document.getElementById('msg').innerHTML='恭喜,所有内容转换完毕!';</script>" response.write "恭喜,所有内容转换完毕!" %> |
|
支持(0) | 反对(0) 顶端 底部 |
content.asp文件里的内容
<!--#include file="conn.asp"---> <!--#include file="ks_cls/kesion.commoncls.asp"---> <div id="msg"> 消息... </div> <% dim ks:set ks=new publiccls dim rsc,n n=0 set rsc=server.CreateObject("adodb.recordset") rsc.open "select channeltable,basictype from ks_channel where basictype=1 or basictype=3 or basictype=2 or basictype=7 or basictype=5 or basictype=8 order by channelid",conn,1,1 do while not rsc.eof response.write "正在转换表<font color=red>" & rsc(0) & "</font>的内容字段!<br/>" dim rs:set rs=server.CreateObject("adodb.recordset") if rsc(1)=1 then rs.open "select articlecontent,title from " & rsc(0) & " where articlecontent is not null",conn,1,3 elseif rsc(1)=2 then rs.open "select picturecontent,title from " & rsc(0) & " where picturecontent is not null",conn,1,3 elseif rsc(1)=3 then rs.open "select downcontent,title from " & rsc(0) & " where downcontent is not null",conn,1,3 elseif rsc(1)=5 then rs.open "select prointro,title from " & rsc(0) & " where prointro is not null",conn,1,3 elseif rsc(1)=7 then rs.open "select moviecontent,title from " & rsc(0) & " where moviecontent is not null",conn,1,3 else rs.open "select gqcontent,title from " & rsc(0) & " where gqcontent is not null",conn,1,3 end if do while not rs.eof n=n+1 if n mod 20 =0 then response.write "<script>document.getElementById('msg').innerHTML='正在转换文档" & rs(1) & "';</script>" end if if not isnull(rs(0)) and rs(0)<>"" then rs(0)=KS.Htmlcode(rs(0)) rs.update end if rs.movenext response.flush loop rs.close rsc.movenext loop rsc.close set rsc=nothing closeconn response.write "<script>document.getElementById('msg').innerHTML='恭喜,所有内容转换完毕!';</script>" response.write "恭喜,所有内容转换完毕!" %> |
|
支持(0) | 反对(0) 顶端 底部 |
<上一主题 | 下一主题 > |