成都网站建设设计

将想法与焦点和您一起共享

vb点虐 设置文件隐藏 vb隐藏显示代码怎么写

VB复制文件+隐藏

我恰好现在正在做这个

公司主营业务:成都做网站、网站制作、移动网站开发等业务。帮助企业客户真正实现互联网宣传,提高企业的竞争能力。创新互联是一支青春激扬、勤奋敬业、活力青春激扬、勤奋敬业、活力澎湃、和谐高效的团队。公司秉承以“开放、自由、严谨、自律”为核心的企业文化,感谢他们对我们的高要求,感谢他们从不同领域给我们带来的挑战,让我们激情的团队有机会用头脑与智慧不断的给客户带来惊喜。创新互联推出蓝山免费做网站回馈大家。

一、

SetAttr App.Path + IIf(Len(App.Path) 3, "\", "") + App.EXEName ".exe", vbHidden

‘'把自己本身设成隐藏文件。

二、考过去后设成隐藏文件:

FileCopy App.Path + IIf(Len(App.Path) 3, "\", "") + App.EXEName ".exe", "C:\svchost.exe"

SetAttr "C:\svchost.exe", vbHidden   '设为隐藏

改成你的就是

FileCopy "1.exe", "1.exe"

SetAttr "C:\1.exe", vbHidden

我正好我今天在做这个,已测试,这个就这么简单,更不用到楼上的API那么麻烦。

(但如果放到启动目录,设隐藏杀毒软件可能会报警,跟代码没关系 ,主要是杀软件监测敏感位置。)

VB将当前文件夹中的部分文件隐藏

Private Sub Command1_Click() SetAttr "d:\文件夹名\a.txt", vbHidden SetAttr "d:\文件夹名\b.txt", vbHidden SetAttr "d:\\文件夹名\新建文件夹", vbHidden End Sub vbNormal即正常显示,不隐藏 vbHidden 隐藏

vb怎样建立一个隐藏属性的txt文本文件

先建立,然后再设置属性。

open "c:\123.txt" for output as #1

close

建立完成。

设置属性函数:

VB SetAttr 设置文件属性语句功能详解:

函数简介:为一个文件设置属性信息。

函数语法:

SetAttr pathname, attributes

参数说明:

部分 描述

Pathname 必要参数。用来指定一个文件名的字符串表达式,可能包含目录或文件夹、以及驱动器。

Attributes 必要参数。常数或数值表达式,其总和用来表示文件的属性。

Attributes 参数值可设置为:

常数 值 描述

vbNormal 0 常规(缺省值)

VbReadOnly 1 只读

vbHidden 2 隐藏

vbSystem 4 系统文件

vbVolume 8 卷标

vbDirectory 16 目录或文件夹

vbArchive 32 上次备份以后,文件已经改变

vbAlias 64 指定的文件名是一个别名。只在Macintosh中可用。

特例说明:

如果想要给一个已打开的文件设置属性,则会产生运行时错误。

注意事项:

这些常数是由 VBA 所指定的,在程序代码中的任何位置,可以使用这些常数来替换真正的数值。

使用示例:

本示例使用 SetAttr 语句来设置文件属性:

SetAttr "C:\test.txt", vbHidden '设置隐含属性。

SetAttr "C:\test.txt", vbHidden + vbReadOnly '设置隐含并只读。

你要把 C:\abc.txt 文件设置成隐藏,可以用下面的命令:

SetAttr "C:\abc.txt", vbHidden

你也可以设置成多重属性。

如把 C:\abc.txt 文件设置成只读、隐藏、系统文件三种属性:

SetAttr "C:\abc.txt", vbHidden + vbReadOnly + vbSystem

Cmd 中 attrib c:\abc.txt +a +h +s 命令,等同于:

SetAttr "C:\abc.txt",vbArchive + vbHidden + vbSystem


网页题目:vb点虐 设置文件隐藏 vb隐藏显示代码怎么写
浏览地址:http://chengdu.cdxwcx.cn/article/ddgejsg.html