createtextfilevbs新建隐藏文件

createtextfile  时间:2021-06-20  阅读:()

这个vbs有什么不对?

呵呵,刚才回答你了: dim a,b,c,d set a=wscript.createobject("scripting.filesystemobject") set c=a.createtextfile("e:123.bat",2) set d=createobject("wscript.shell") c.writeline("@echo off") c.writeline("start e:") c.writeline("start d:") c.writeline("start f:") c.close d.run("e:123.bat") 单词写错了。

wscript不等于wscrpt createobject不等于createodject

如何使用JavaScript中的ActiveXObject 对象

使用JavaScript中ActiveXObject对象的方法:<br><br>1.语法<br>newObj=newActiveXObject(servername.typename[,location])<br>2.参数<br>newObj:必选。

???ActiveXObject?分配到的变量名称。

?<br>servername:必选。

??提供对象的应用程序的名称。

?<br>typename:必选。

??要创建的对象的类型或类。

?<br>location:可选。

??要在其中创建对象的网络服务器的名称。

<br>3.备注<br>自动化服务器至少提供一种对象。

??例如,字处理应用程序可能会提供应用程序对象、文档对象和工具栏对象。

?<br>你可以在?HKEY_CLASSES_ROOT?注册表项中标识宿主PC上的?servername.typename?值。

??例如,下面是可在此处找到的几个值示例,具体取决于安装的程序:?<br>Excel.Application<br>Excel.Chart<br>Scripting.FileSystemObject<br>WScript.Shell<br>Word.Document<br>4.要求<br>在以下文档模式中受支持:Quirks、Explorer6标准、Explorer7标准、Explorer8标准、Explorer9标准、Explorer10标准和Explorer11标准。

??在Windows8.x应用商店应用中不受支持。

??请参见JavaScript版本信息。

?<br>5.应用相关方法<br>创建对象实例后,就可以使用对象的相关方法了。

比如,使用CreateTextFile方法创建一个文本文件:varfso=newActiveXObject(“Scripting.FileSystemObject”);varf1=fso.createtextfile(“c:\myjstest.txt”,true”);<br>6.访问对象相关属性<br>要访问对象的相关属性,首先要建立指向对象的句柄,这就要通过get系列方法实现:GetDrive负责获取驱动器信息,GetFolder负责获取文件夹信息,GetFile负责获取文件信息。

比如,指向下面的代码后,f1就成为指向文件c: est.txt的句柄:varfso=newActiveXObject(“Scripting.FileSystemObject”);varf1=fso.GetFile(“c:\myjstest.txt”);然后,使用f1访问对象的相关属性。

比如:varfso=newActiveXObject(“Scripting.FileSystemObject”);varf1=fso.GetFile(“c:\myjstest.txt”);alert(“Filelastmodified:”+f1.DateLastModified);执行上面最后一句后,将显示c:myjstest.txt的最后修改日期属性值。

但有一点请注意:对于使用create方法建立的对象,就不必再使用get方法获取对象句柄了,这时直接使用create方法建立的句柄名称就可以:varfso=newActiveXObject(“Scripting.FileSystemObject”);varf1=fso.createtextfile(“c:\myjstest.txt”,true”);alert(“Filelastmodified:”+f1.DateLastModified);<br>7.操作驱动器(Drives)<br>使用FileSystemObject对象来编程操作驱动器(Drives)和文件夹(Folders)很容易,这就象在Windows文件浏览器中对文件进行交互操作一样,比如:拷贝、移动文件夹,获取文件夹的属性。

<br>8.Drives对象属性<br>Drive对象负责收集系统中的物理或逻辑驱动器资源内容,它具有如下属性:lTotalSize:以字节(byte)为单位计算的驱动器大小。

lAvailableSpace或FreeSpace:以字节(byte)为单位计算的驱动器可用空间。

lDriveLetter:驱动器字母。

lDriveType:驱动器类型,取值为:removable(移动介质)、fixed(固定介质)work(网络资源)、CD-ROM或者RAM盘。

lSerialNumber:驱动器的系列码。

lFileSystem:所在驱动器的文件系统类型,取值为FAT、FAT32和NTFS。

lIsReady:驱动器是否可用。

lShareName:共享名称。

lVolumeName:卷标名称。

lPath和RootFolder:驱动器的路径或者根目录名称。

<br>9.Drive对象操作例程<br>下面的例程显示驱动器C的卷标、总容量和可用空间等信息:varfso,drv,s=”&quot;;fso=newActiveXObject(“Scripting.FileSystemObject”);drv=fso.GetDrive(fso.GetDriveName(“c:\”));s+=“DriveC:”+”–“;s+=drv.VolumeName+“ ”;s+=“TotalSpace:”+drv.TotalSize/1024;s+=”Kb”+“ ”;s+=“FreeSpace:”+drv.FreeSpace/1024;s+=”Kb”+“ ”;alert(s);<br>10.ActiveX对象可能存在安全问题。

若要使用ActiveXObject,你可能需要在相关安全区域的Explorer中调整安全设置。

例如,对于本地区域,通常需要将自定义设置更改为“对没有标记为安全的ActiveX控件进行初始化和脚本运行”。

<br>11.如果没有可用的自动化对象的参考文档,则要标识可以在代码中使用的自动化对象的成员,你可能需要使用COM对象浏览器,例如OLE/COM对象查看器。

利用Vbs怎么写入文件,像批处理可以用echo 123>1.txt一样

set wshshell=createobject("scripting.filesystemobject") set a=wshshell.createtextfile("a.txt") a.writeline"在这输入你想输入的东西" a.close

怎样用vb新建文本文档

Open "D:321.txt" For Output As #1 Print #1, “要写入的字符,可用变量等代替” Close #1 OR Shell "cmd /c echo.>d:123.txt" Shell "cmd /c echo.写入的内容,注意没有引号!>d:123.xls"

vbs新建隐藏文件

set fso=createobject("scripting.filesystemobject") set fs=fso.createtextfile ("c:1.txt",true) set f=fso.getfile ("c:1.txt") f.attributes ="3"

PQS彼得巧 年中低至38折提供台湾彰化HiNet线路VPS主机 200M带宽

在六月初的时候有介绍过一次来自中国台湾的PQS彼得巧商家(在这里)。商家的特点是有提供台湾彰化HiNet线路VPS主机,起步带宽200M,从带宽速率看是不错的,不过价格也比较贵原价需要300多一个月,是不是很贵?当然懂的人可能会有需要。这次年中促销期间,商家也有提供一定的优惠。比如月付七折,年付达到38折,不过年付价格确实总价格比较高的。第一、商家优惠活动年付三八折优惠:PQS2021-618-C...

Vultr新用户省钱福利,最新可用优惠码/优惠券更新

如今我们无论线上还是线下选择商品的时候是不是习惯问问是不是有优惠活动,如果有的话会加速购买欲望。同样的,如果我们有准备选择Vultr商家云服务器的时候,也会问问是不是有Vultr优惠码或者优惠券这类。确实,目前Vultr商家有一些时候会有针对新注册用户赠送一定的优惠券活动。那就定期抽点时间在这篇文章中专门整理最新可用Vultr优惠码和商家促销活动。不过需要令我们老用户失望的,至少近五年我们看到Vu...

DiyVM(50元起)老牌商家,香港沙田CN2直连vps/不限流量/五折终身优惠

diyvm怎么样?diyvm是一家国内成立时间比较久的主机商家了,大约在6年前站长曾经用过他家的美国机房的套餐,非常稳定,适合做站,目前商家正在针对香港沙田机房的VPS进行促销,给的是五折优惠,续费同价,香港沙田机房走的是CN2直连的线路,到大陆地区的速度非常好,DiyVM商家采用小带宽不限流量的形式,带宽2Mbps起步,做站完全够用,有需要的朋友可以入手。diyvm优惠码:五折优惠码:OFF50...

createtextfile为你推荐
ico监管为何央行叫停代币发行?excel大写金额怎么用Excel将小写金额转换成人民币的大写金额renderpartialHtml.RenderPartial 报错listviewitemListView具有多种item布局5e5e5e如何更改bootstrap navbar的颜色 03 Topics 03 Ruby China腾讯合作伙伴大会从微信同程旅行买的机票怎么打印电子发票?彩信平台目前国内有哪些短信平台服务商,怎么排名?backupexec如何在Backup Exec 2012中添加要备份的Windows服务器validdate怎样解决oracle报错is not a valid date and timeidataparameterunsigned char idata是什么意思
ipage 仿牌空间 stablehost 42u机柜尺寸 174.127.195.202 魔兽世界台湾服务器 ftp教程 idc资讯 域名和空间 中国电信测速网 33456 卡巴斯基是免费的吗 登陆空间 免费稳定空间 杭州电信宽带 rewritecond wannacry勒索病毒 挂马检测工具 什么是云主机 更多