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"

SoftShellWeb:台湾(台北)VPS年付49美元起,荷兰VPS年付24美元起

SoftShellWeb是一家2019年成立的国外主机商,商家在英格兰注册,提供的产品包括虚拟主机和VPS,其中VPS基于KVM架构,采用SSD硬盘,提供IPv4+IPv6,可选美国(圣何塞)、荷兰(阿姆斯特丹)和台湾(台北)等机房。商家近期推出台湾和荷兰年付特价VPS主机,其中台湾VPS最低年付49美元,荷兰VPS年付24美元起。台湾VPSCPU:1core内存:2GB硬盘:20GB SSD流量...

GigsGigsCloud 春节优惠2022 指定云服务器VPS主机85折循环优惠码

GigsGigsCloud商家在之前介绍的还是比较多的,因为之前我一直有几台机器在使用,只是最近几年网站都陆续转型删除掉不少的网站和闲置域名,包括今年也都减少网站开始转型自媒体方向。GigsGigsCloud 商家产品还是比较有特色的,有提供香港、新加坡等亚洲机房的云服务器、VPS和独立服务器等。第一、新春优惠活动优惠码:CNY2022-15OFF截止到正月初二,我们可以使用上述优惠码在购买指定G...

Friendhosting全场VDS主机45折,虚拟主机4折,老用户续费9折

Friendhosting发布了今年黑色星期五促销活动,针对全场VDS主机提供45折优惠码,虚拟主机4折,老用户续费可获9折加送1个月使用时长,优惠后VDS最低仅€14.53/年起,商家支持PayPal、信用卡、支付宝等付款方式。这是一家成立于2009年的老牌保加利亚主机商,提供的产品包括虚拟主机、VPS/VDS和独立服务器租用等,数据中心可选美国、保加利亚、乌克兰、荷兰、拉脱维亚、捷克、瑞士和波...

createtextfile为你推荐
南宁虚拟空间南宁自由空间在哪里?网络视频下载器万能网络视频下载器 1.34怎么用比思论坛永久域名不知道为什么 比思论坛的网站打不开 怎么办呐flash序列号Flash软件 的序列号是什么?particular教程有没有制作花瓣飘落的AE教程distinct是什么意思SQL数据库DISTINCT是什么意思飞信发信息要钱吗用飞信发短信要钱吗?全峰快递官网全峰快递转件后怎么查询测试post请列出计算机上电自检(POST)的基本过程是什么?android权限大全android 6.0哪些权限需要请求
cn域名 bluevm ix主机 贵州电信宽带测速 云鼎网络 java空间 ca4249 谁的qq空间最好看 183是联通还是移动 卡巴斯基破解版 创建邮箱 免费邮件服务器 空间租赁 东莞服务器托管 万网空间 lamp是什么意思 lamp什么意思 阿里云邮箱申请 卡巴斯基官网下载 闪讯网 更多