复制代码代码如下：<！ - ＃includefile =“ conn.asp” - >
<％
setjs = server.createobject（“ adodb.recordset”）
sql =“ selecttop10*fromarticleOrderByidDesc”
setjs = conn.execute（sql）
dowhilenotjs.eof
title = js（“标题”）
addate = js（“ addate”）
foolcat = foolcat+“ <li> <ahref =”“/”＆js（“ id”）＆“。htm”>“”＆title＆“＆”＆addate＆“＆” </a> </a> </li> <br> <br> <br>
js.movenext
环形
'生成js文件
foolcat =“”+foolcat+“”
foolcat =“ document.write（'”＆foolcat＆“'）”
folderPath = server.mappath（“ ./”）
setfso = server.createobject（“ scripting.filesystemobject”）
setFout = fso.createTextfile（folderPath＆“/top10.js”）
fout.writelinefoolcat
'关闭连接
fout.close
setfout = nothing
JS.Close
setjs =没有
conn.close
setConn =没有
％>