由买买提看人间百态

topics

全部话题 - 话题: wshshell
(共0页)
b****t
发帖数: 17
1
来自主题: Software版 - Re: 注册表被禁止了,怎么办
save following as regenable.vbs and double click it to enable reg edit.
Option Explicit
'Declare variables
Dim WSHShell, n, MyBox, p, t, mustboot, errnum, vers
Dim enab, disab, jobfunc, itemtype
Set WSHShell = WScript.CreateObject("WScript.Shell")
p = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\"
p = p & "DisableRegistryTools"
itemtype = "REG_DWORD"
mustboot = "Log off and back on, or restart your pc to" & vbCR & "effect the changes"
enab = "ENABLED"
disab = "DISABLED"
jobfun
a****t
发帖数: 1007
2
来自主题: Computation版 - 问一个简单的HTML问题。
我指的是我另外一个帖子,如下:
HTML设置了一个按钮,执行下面的function。
function executeprogram(){
var WshShell = new ActiveXObject("WScript.Shell");
WshShell.run("C:\Work\Executeprogram.cmd");
alert("Finished executing program!");
}
问题是Executeprogram.cmd执行需要大概20-30秒,执行中,"Finished executing
program!"的提示就已经出现了。有什么方法让Finished executing program!的提示在
Executeprogram.cmd执行完后再出现。谢谢。
a****t
发帖数: 1007
3
来自主题: Computation版 - Javascript 简单一问。
HTML设置了一个按钮,执行下面的function。
function executeprogram(){
var WshShell = new ActiveXObject("WScript.Shell");
WshShell.run("C:\Work\Executeprogram.cmd");
alert("Finished executing program!");
}
问题是Executeprogram.cmd执行需要大概20-30秒,执行中,"Finished executing
program!"的提示就已经出现了。有什么方法让Finished executing program!的提示在
Executeprogram.cmd执行完后再出现。谢谢。
c*********n
发帖数: 128
4
已经解决了, 运行如下代码即可, 贴在这里, 或许对碰到相同问题的人有帮助
保存为vbs格式文件, 运行即可
'xp_taskbar_desktop_fixall.vbs - Repairs the Taskbar when minimized programs
don't show.
'?Kelly Theriot and Doug Knox - 8/22/2003
'翻译:Smallfrogs。翻译内容:将英文提示改为简体中文
'来源:Microsoft Windows XP NewsGroup
Set WSHShell = WScript.CreateObject("WScript.Shell")
Message = "本脚本用于修复Windows XP中当最小化程序时,无法在任务栏显示图标的问
题。"& vbCR & vbCR
Message = Message & "为了正常工作,本脚本将关闭和重启 Windows Explorer 外壳,
这个操作不会损坏你的系统。" & vbCR & vbCR
Message = Message & "请关闭所有杀毒软件的实时监控!并保存
(共0页)