中国DOS联盟

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

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

中国DOS联盟论坛
现在时间是 2026-06-30 23:17
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 求dos版刷新桌面 查看 3,397 回复 17
楼 主 求dos版刷新桌面 发表于 2007-05-23 20:47 ·  中国 湖北 武汉 武昌区 电信
中级用户
★★
积分 301
发帖 135
注册 2007-05-15 16:49
19年会员
UID 88615
性别 男
状态 离线
Set WSHShell = WScript.CreateObject("WScript.Shell")
WSHShell.SendKeys "{F5}+{F10}e"

这是vbs版的,于是我写了下面的
echo Set WSHShell = WScript.CreateObject("WScript.Shell") >temp.vbs
echo WSHShell.SendKeys "{F5}+{F10}e">>temp.vbs
cscript temp.vbs
上面的代码全部执行成功,可是就是不能刷新桌面,它后台运行了
郁闷,要它安静运行,它就不安静,要它不安静运行,嘿,它偏偏安静的不得了
谁能给个dos 版的我

[ Last edited by wert123 on 2007-6-1 at 03:01 PM ]
2 发表于 2007-05-23 23:34 ·  中国 黑龙江 牡丹江 电信
中级用户
★★
积分 216
发帖 129
注册 2007-02-14 07:26
19年会员
UID 79469
性别 男
状态 离线
taskkill/f /im explorer.exe &&start C:\WINDOWS\explorer.exe
是这个东西吗?
3 发表于 2007-05-24 13:27 ·  中国 湖北 武汉 武昌区 电信
中级用户
★★
积分 301
发帖 135
注册 2007-05-15 16:49
19年会员
UID 88615
性别 男
状态 离线
taskkill这个是可以,不过桌面一下没有,一下又出来,会吓到一些菜鸟,还以为病毒
嵌入explorer.exe了呢
有点兴师动众的感觉,你再帮我想想好吗,麻烦大家帮我想想吧
4 发表于 2007-05-26 11:56 ·  中国 湖北 武汉 武昌区 电信
中级用户
★★
积分 301
发帖 135
注册 2007-05-15 16:49
19年会员
UID 88615
性别 男
状态 离线
难道问题幼稚了吗,怎么没人来

[ Last edited by wert123 on 2007-5-30 at 04:38 PM ]
5 发表于 2007-05-30 16:39 ·  中国 湖北 武汉 电信
中级用户
★★
积分 301
发帖 135
注册 2007-05-15 16:49
19年会员
UID 88615
性别 男
状态 离线
大家帮我看看吧
6 发表于 2007-05-30 20:15 ·  中国 湖北 武汉 电信
版主
★★★★★
积分 11,386
发帖 4,938
注册 2006-07-23 17:10
19年会员
UID 59080
状态 离线
试试这个 gpupdate /Force .
7 发表于 2007-05-30 20:28 ·  中国 新疆 乌鲁木齐 电信
高级用户
★★★
Autowalk
积分 845
发帖 375
注册 2007-03-03 01:58
19年会员
UID 80606
性别 男
状态 离线
Set WSHShell = WScript.CreateObject("WScript.Shell")
WSHShell.SendKeys "{F5}+{F10}e"

因为焦点不在桌面上,所以按F5无效
你好,脚本专家!
<a target=blank href=tencent://message/?uin=29654761&Site=www.111.com&Menu=yes><img border="0" SRC=http://wpa.qq.com/pa?p=1:29654761:5 alt="点击这里给我发消息"></a>
8 发表于 2007-05-31 17:23 ·  中国 湖北 武汉 电信
中级用户
★★
积分 301
发帖 135
注册 2007-05-15 16:49
19年会员
UID 88615
性别 男
状态 离线
gpupdate /Force
我查了一下帮助,这个命令好像是上传交互策略用的吧
我先把显示扩展名禁用了,再运行下面的代码,再运行上面的代码,桌面闪了下,我很兴奋,可是我的电脑上面的文件扩展名还没有出来,非要用右键菜单刷新才行,郁闷,我的电脑怎么不行啊,是不是以前中的病毒改了什么的啊
@echo off&color f0
reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced" /v HideFileExt /t reg_dword /d 0 /f


[ Last edited by wert123 on 2007-6-2 at 10:48 AM ]
9 发表于 2007-05-31 17:32 ·  中国 湖北 武汉 电信
中级用户
★★
积分 301
发帖 135
注册 2007-05-15 16:49
19年会员
UID 88615
性别 男
状态 离线
Originally posted by zhoushijay at 2007-5-30 08:28 PM:
Set WSHShell = WScript.CreateObject("WScript.Shell")
WSHShell.SendKeys "{F5}+{F10}e"

因为焦点不在桌面上,所以按F5无效

说的很对,真是一针见血啊
那你能用dos帮我把焦点弄到桌面上吗,大家一起来帮帮我吧
10 发表于 2007-06-01 12:19 ·  中国 江苏 南京 电信
银牌会员
★★★
积分 1,513
发帖 554
注册 2005-12-30 00:50
20年会员
UID 48180
性别 男
状态 离线
11 发表于 2007-06-01 12:22 ·  中国 新疆 乌鲁木齐 电信
高级用户
★★★
Autowalk
积分 845
发帖 375
注册 2007-03-03 01:58
19年会员
UID 80606
性别 男
状态 离线
baomaboy 每次都能找到最有效的解决办法, ^^
你好,脚本专家!
<a target=blank href=tencent://message/?uin=29654761&Site=www.111.com&Menu=yes><img border="0" SRC=http://wpa.qq.com/pa?p=1:29654761:5 alt="点击这里给我发消息"></a>
12 发表于 2007-06-01 14:59 ·  中国 湖北 武汉 电信
中级用户
★★
积分 301
发帖 135
注册 2007-05-15 16:49
19年会员
UID 88615
性别 男
状态 离线
@echo off&color f0
echo Dim WshSHell,FSO >temp.vbs
echo Set WshSHell = WScript.CreateObject("WScript.Shell") >>temp.vbs
echo Set FSO = CreateObject("Scripting.FileSystemObject") >>temp.vbs
echo scfFileName="zm.scf" >>temp.vbs
echo scfFilePath=fso.GetSpecialFolder(1) >>temp.vbs
echo Set NewFile = FSO.CreateTextFile(FSO.BuildPath(scfFilePath ,scfFileName), True) >>temp.vbs
echo NewFile.WriteLine("") >>temp.vbs
echo NewFile.WriteLine("Command=2") >>temp.vbs
echo NewFile.WriteLine("IconFile=explorer.exe,3") >>temp.vbs
echo NewFile.WriteLine("") >>temp.vbs
echo NewFile.WriteLine("Command=ToggleDesktop") >>temp.vbs
echo NewFile.Close >>temp.vbs
echo wscript.sleep(200) >>temp.vbs
echo wshshell.run "zm.scf" >>temp.vbs
echo wshshell.SendKeys "{F5}+{F10}e">>temp.vbs
echo wscript.sleep(200) >>temp.vbs
echo wscript.quit >>temp.vbs
@temp.vbs

生成的temp.vbs能行,dos版就不行了,扩展名还是显示不出来
哎,也许我的电脑真是不行了,看来又要重装系统了

[ Last edited by wert123 on 2007-6-1 at 03:07 PM ]
13 发表于 2007-06-01 16:55 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
scf默认是NeverShowExt

所以你不管怎么设置那个显示扩展名它本来就是不显示……

还有显示桌面可以……

Dim objSHA
Set objSHA = CreateObject("Shell.Application")
objSHA.ToggleDesktop
Set objSHA = Nothing
就ok……理论上就2行……
14 发表于 2007-06-01 19:16 ·  中国 广东 茂名 电信
初级用户
积分 42
发帖 23
注册 2006-02-13 04:23
20年会员
UID 50270
状态 离线
RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
my3439955 +2 2007-06-13 15:02
我是allyesno 帐号忘记密码了 妈的
15 发表于 2007-06-01 22:00 ·  中国 吉林 长春 电信
初级用户
积分 52
发帖 27
注册 2006-10-27 16:42
19年会员
UID 68509
性别 男
状态 离线
记号...
论坛跳转: