中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-05 10:27
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [视频]同名的文件?这是怎么实现的? 查看 766 回复 11
楼 主 [视频]同名的文件?这是怎么实现的? 发表于 2007-07-11 17:45 ·  中国 山东 淄博 联通
中级用户
★★
积分 272
发帖 99
注册 2006-06-02 09:12
20年会员
UID 56414
状态 离线
下载视频,其实这是个脑筋急转弯


//补充
谢谢大家的关注,这里的文件名相同确实是相同的,并没有采取l和1的办法.确实有一个程序在后台监控,这个程序我是编译出来的,也可以用脚本实现,但是它在监控什么呢.答案我想在十楼之后公布

[ Last edited by my3439955 on 2007-7-14 at 03:05 AM ]
2 发表于 2007-07-12 01:23 ·  中国 广东 佛山 电信
高级用户
★★
我思故我在
积分 512
发帖 228
注册 2007-01-21 10:31
19年会员
UID 77225
性别 男
状态 离线
怪哉!真实乎?特效乎?

看了十几遍也想不出所以然,这种脑筋急转弯到底有没有谱呢?my3439955兄,别掉

人胃口了,快快把答案吐出来~
我确实是只菜鸟,而且这里X人太多,所以我不敢装X。谁要再说我装X,我就XXOO他。
3 发表于 2007-07-12 01:35 ·  中国 广东 佛山 电信
高级用户
★★
我思故我在
积分 512
发帖 228
注册 2007-01-21 10:31
19年会员
UID 77225
性别 男
状态 离线
我猜第一、二个文本是将其中的字母“l”改为了数字"1",但是同名文件怎么解释呢?

难道他在后面加了空格?虽然隐藏了后缀名了,但是看起来不像。莫非有程序在后台

运行监控,一旦发现“同名文件”这个文件就改为类似畸形目录一般?
我确实是只菜鸟,而且这里X人太多,所以我不敢装X。谁要再说我装X,我就XXOO他。
4 发表于 2007-07-12 15:30 ·  新西兰
新手上路
积分 12
发帖 5
注册 2007-07-11 15:54
19年会员
UID 93722
性别 女
状态 离线
"同名的" 是文件名
5 发表于 2007-07-12 20:05 ·  中国 福建 厦门 电信
初级用户
积分 30
发帖 15
注册 2007-06-13 21:29
19年会员
UID 91233
性别 男
状态 离线
是不是后台有个监控发现同名文件就改变第二文件的扩展名,但还用同样的图标?
6 发表于 2007-07-12 22:00 ·  中国 湖北 潜江 电信
高级用户
★★★
积分 894
发帖 411
注册 2007-02-17 12:15
19年会员
UID 79697
性别 男
状态 离线
如果字符完全相同, 那一定是扩展名的问题. 不然为什么不显示扩展名.何况在 Windows 下, 字母大小不同也不行.
@set c= 不知则觉多,知则觉少,越知越多,便觉越来越少. --- 知多少.
@for,/l,%%i,in,(1,1,55)do,@call,set/p=%%c:~%%i,1%%<nul&ping/n 1 127.1>nul


7 发表于 2007-07-13 13:29 ·  中国 四川 绵阳 江油市 电信
高级用户
★★★
积分 502
发帖 327
注册 2006-12-30 06:01
19年会员
UID 74981
性别 男
状态 离线
好耍不实用
8 发表于 2007-07-14 02:18 ·  中国 上海 松江区 电信
新手上路
积分 3
发帖 2
注册 2007-06-09 22:43
19年会员
UID 90834
性别 男
状态 离线
看了几遍还是没搞清
9 发表于 2007-07-14 09:19 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
'这里只是演示下,可能不和视频的效果不完全一样,不过根
'据这个原理再加工下是可以做到上面的效果。
'运行代码前运行:%ComSpec% /c assoc.abc=txtfile
'作用是关联abc扩展名与txt相同,那么图标就不一样了。

' By slore@cn-dos
Set FSO = CreateObject("Scripting.FileSystemObject")
Do
If FSO.FileExists("新建 文本文档.txt") Then
If Not FSO.FileExists("新建 文本文档.abc") Then
FSO.MoveFile "新建 文本文档.txt","新建 文本文档.abc"
End If
Wscript.Quit
End If
Loop
Set FSO = Nothing
10 发表于 2007-07-14 12:03 ·  中国 广东 广州 广东金万邦科技投资有限公司(新一代数据中心)IDC机房(BGP)
高级用户
★★
论坛上抢劫的
积分 551
发帖 246
注册 2006-09-21 12:35
19年会员
UID 63270
状态 离线
有点意思!!
11 发表于 2007-07-14 12:18 ·  中国 山东 淄博 联通
中级用户
★★
积分 272
发帖 99
注册 2006-06-02 09:12
20年会员
UID 56414
状态 离线
Re slore:

这真是一个好办法,我改变了一下年一的脚本实验了一下,完全可以做到视频的效果,而且这个方法比我的要好,我想.

上面的脚本循环中每次最好加上WScript.Sleep 10来延时一下,否则可能造成CPU利用率一直100%.还有文件的路径需要加上.

关于上面提到扩展名的问题,不必使用abc了,直接使用log就可以了.它的图标默认就是记事本图标.

解秘啦:

我做的视频中,文件的重名是出现在桌面上的.不知道大家注意没有,Windows的桌面包括两部分,一部分是当前用户,一部分是所有用户.系统在C盘的话,那么对应以下两个路径:"C:\Documents and Settings\Administrator\桌面"和:"C:\Documents and Settings\All Users\桌面",其中Administrator要替换成你当前的用户名.All Users的桌面文件夹里的东西出现在所有用户桌面上,Administrator的桌面文件夹里的东西出现在Administrator的桌面上.

就是这样了,在桌面上右击新建文件是在当前用户桌面上新建的.我创建一个后台监控程序监视一些个文件名,如果出现那么就把它移动到所有用户桌面,然后再新建一个哪怕是同名的,也不会出现问题了.

我的"同名"文件扩展名是相同的,但是在除桌面的其他文件夹就无法实现了(启动文件夹也可以).9楼的办法可以适用于所有文件夹,但是一个前提是用户的系统隐藏了以知的扩展名.
12 发表于 2007-07-14 13:17 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
循环的问题^我这个是创建一次后改名就退出了……说了只是演示下效果没怎么加工。
论坛跳转: