用ASP+FSO生成JS文件


复制代码 代码如下:
<!--#include file="conn.asp"-->
<%
set js = server.CreateObject("ADODB.RecordSet")
sql="select top 10 * from article order by id desc"
set js = conn.Execute (Sql)
do while not js.eof
title=js("title")
addate=js("addate")
foolcat = foolcat + "<li><a href=""/"& js("id")&".htm"">" &title&" "&addate&"</a></li><br>"
js.movenext
loop
'生成JS文件
foolcat = "" + foolcat + ""
foolcat = "document.write('" & foolcat & "')"
FolderPath = Server.MapPath("./")
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set fout = fso.CreateTextFile(FolderPath&"\top10.js")
fout.WriteLine foolcat
'关闭连接
fout.close
set fout = nothing
js.close
set js = nothing
conn.close
set conn=nothing
%>



相关阅读:
VBS.Runauto脚本病毒分析篇
把某个目录下所有txt中第三行第四个数字相加
分析MySQL的数据类型以及建库策略
javascript option onclick事件ie解决方案 兼容ie,firefox
利用C#实现分布式数据库查询
通过sql语句将blob里的char取出来转成数字保存在其它字段
Validation服务器控件:CompareValidator控件
javascript中"/"运算符常见错误
mysql 的load data infile
Windows 2008之活动目录权限管理服务
向大师们学习Javascript(视频与PPT)
查看Linux操作系统下的网络连接状态命令
JavaScript 学习笔记(十一)
ASP计算str2在str1中出现的次数
快速导航

Copyright © 2016 phpStudy |