asp下用fso生成js文件的代碼
更新時(shí)間：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%>
相關(guān)文章
asp adodb.stream對象的方法/屬性...2007-07-07
取得表單提交的所有數(shù)據(jù)...2006-08-08
asp實(shí)現(xiàn)限制一個(gè)ip只能訪問一次的方法
這篇文章主要介紹了asp實(shí)現(xiàn)限制一個(gè)ip只能訪問一次的方法，感興趣的小伙伴們可以參考一下2015-10-10
asp中COM組件中如何連接數(shù)據(jù)庫的代碼...2007-03-03
循環(huán)取值Request.QueryString的用法
2008-01-01
這篇文章主要介紹了asp批量添加修改刪除操作示例，包括js客戶端數(shù)據(jù)有效性驗(yàn)證，服務(wù)器端自己添加驗(yàn)證,需要的朋友可以參考下2017-03-03
隨機(jī)提取N條記錄 推薦...2007-02-02
asp中去除內(nèi)容HTML標(biāo)簽的三個(gè)function函數(shù)
asp中去除內(nèi)容HTML標(biāo)簽的三個(gè)function函數(shù)...2007-03-03
asp中常用的字符串安全處理函數(shù)集合(過濾特殊字符等)
在asp編寫中，我們需要注意特殊字符串的處理，防止被黑客利用。使用asp的朋友一定要參考下。2011-01-01
asp操作access提示無法從指定的數(shù)據(jù)表中刪除原因分析及解決
asp操作access時(shí)提示無法從指定的數(shù)據(jù)表中刪除這個(gè)問題相當(dāng)?shù)募郑谑撬阉髡砹艘恍?shí)用的解決方法，感興趣的你可以參考下本文2013-03-03