asp下用fso生成js文件的代碼
更新時間：2008年06月24日 23:47:54 作者：
asp下使用fso生成js代碼的方法
<%sub fsojs()%>
<%
Set fso= Server.CreateObject("Scripting.FileSystemObject")
set fd=fso.createtextfile(server.MapPath("../category.js"),true)
'開始操作
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from dept_category",conn,1,1
str="var onecount;"&vbcrlf&"onecount=0;"&vbcrlf&"subcat = new Array();"
for i=1 to rs.recordcount
str=str&vbcrlf&"subcat["&(i-1)&"] = new Array('"&rs("category")&"','"&rs("parentid")&"','"&rs("categoryid")&"');"
rs.movenext
Next
str=str&vbcrlf&" onecount="&rs.recordcount&";"&vbcrlf
fd.writeline str
%>
<%end sub%>
<%
Set fso= Server.CreateObject("Scripting.FileSystemObject")
set fd=fso.createtextfile(server.MapPath("../category.js"),true)
'開始操作
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from dept_category",conn,1,1
str="var onecount;"&vbcrlf&"onecount=0;"&vbcrlf&"subcat = new Array();"
for i=1 to rs.recordcount
str=str&vbcrlf&"subcat["&(i-1)&"] = new Array('"&rs("category")&"','"&rs("parentid")&"','"&rs("categoryid")&"');"
rs.movenext
Next
str=str&vbcrlf&" onecount="&rs.recordcount&";"&vbcrlf
fd.writeline str
%>
<%end sub%>
相關文章
asp adodb.stream對象的方法/屬性...2007-07-07
取得表單提交的所有數(shù)據(jù)...2006-08-08
這篇文章主要介紹了asp實現(xiàn)限制一個ip只能訪問一次的方法，感興趣的小伙伴們可以參考一下2015-10-10
asp中COM組件中如何連接數(shù)據(jù)庫的代碼...2007-03-03
循環(huán)取值Request.QueryString的用法
2008-01-01
這篇文章主要介紹了asp批量添加修改刪除操作示例，包括js客戶端數(shù)據(jù)有效性驗證，服務器端自己添加驗證,需要的朋友可以參考下2017-03-03
隨機提取N條記錄 推薦...2007-02-02
asp中去除內(nèi)容HTML標簽的三個function函數(shù)
asp中去除內(nèi)容HTML標簽的三個function函數(shù)...2007-03-03
asp中常用的字符串安全處理函數(shù)集合(過濾特殊字符等)
在asp編寫中，我們需要注意特殊字符串的處理，防止被黑客利用。使用asp的朋友一定要參考下。2011-01-01
asp操作access提示無法從指定的數(shù)據(jù)表中刪除原因分析及解決
asp操作access時提示無法從指定的數(shù)據(jù)表中刪除這個問題相當?shù)募郑谑撬阉髡砹艘恍嵱玫慕鉀Q方法，感興趣的你可以參考下本文2013-03-03