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"

美国G口/香港CTG/美国T级超防云/物理机/CDN大促销 1核 1G 24元/月

[六一云迎国庆]转盘活动实物礼品美国G口/香港CTG/美国T级超防云/物理机/CDN大促销六一云 成立于2018年,归属于西安六一网络科技有限公司,是一家国内正规持有IDC ISP CDN IRCS电信经营许可证书的老牌商家。大陆持证公司受大陆各部门监管不好用支持退款退现,再也不怕被割韭菜了!主要业务有:国内高防云,美国高防云,美国cera大带宽,香港CTG,香港沙田CN2,海外站群服务,物理机,...

亚州云-美国Care云服务器,618大带宽美国Care年付云活动服务器,采用KVM架构,支持3天免费无理由退款!

官方网站:点击访问亚州云活动官网活动方案:地区:美国CERA(联通)CPU:1核(可加)内存:1G(可加)硬盘:40G系统盘+20G数据盘架构:KVM流量:无限制带宽:100Mbps(可加)IPv4:1个价格:¥128/年(年付为4折)购买:直达订购链接测试IP:45.145.7.3Tips:不满意三天无理由退回充值账户!地区:枣庄电信高防防御:100GCPU:8核(可加)内存:4G(可加)硬盘:...

白丝云-美国圣何塞4837/德国4837大带宽/美西9929,26元/月起

官方网站:点击访问白丝云官网活动方案:一、KVM虚拟化套餐A1核心 512MB内存 10G SSD硬盘 800G流量 2560Mbps带宽159.99一年 26一月套餐B1核心 512MB内存 10G SSD硬盘 2000G流量 2560Mbps带宽299.99一年 52一月套餐...

createtextfile为你推荐
存储区域网络什么是存储局域网?组建它需要哪些内容?excel大写金额在Excel中如何输入数字直接显示大写金额?pps官网pps官方网站下载pps官方正式版下载网站无处不在的意思心无所住是什么意思无处不在的意思人山无处不花枝的意思是什么医院排队系统请问医院采血排队的设备系统是独立的吗?za是哪个国家的奥洛菲是哪个国家的erp系统教程ERP系统怎样操作,有教学视频吗?空间导航怎么设置QQ空间个性导航微盟价格做微盟平台的销售怎么样,有前景吗
域名服务器 便宜域名注册 淘宝二级域名 免费申请域名和空间 主机屋 godaddy优惠码 info域名 debian源 服务器架设 免费ftp站点 韩国网名大全 京东商城0元抢购 个人域名 bgp双线 河南m值兑换 刀片服务器的优势 域名评估 可外链网盘 网络空间租赁 cdn加速是什么 更多