求一段VBS代码或批处理代码：获取当前时间并比较

求助高手：VBS或者bat命令实现指定时间段（精确到秒钟）文件的复制~

你的系统是什么？XP、win7？主要是桌面路径不一样

代码虽然可以写出来，但是日期和时间的格式里面有些字符不用于文件夹或文件名称。
比如英文斜杠（/），和英文冒号（:），因此我把最终的格式改成可命名的名称了。

桌面路径批处理自动获取，代码如下：
for /f "tokens=2,*" %%a in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" /v Desktop') do set desktop=%%b\%date:~,4%-%date:~5,2%-%date:~8,2% %time:~,2%：%time:~3,2%：%time:~6%md "%desktop%"&start "" "%desktop%"日期和时间最终格式类似于2014-11-21 7：27：56.77

If Hour(Time)=5 Or Hour(Time)=17 Then
MsgBox "命令1"
Else
MsgBox "命令2"
End If

@echo off
if "%time:~0,2%"=="05" (
命令1
) else if "%time:~0,2%"=="17" (
命令1
) else (
命令2
)

---

吉林省13187818560： 求一段VBS代码或批处理代码:获取当前时间并比较 - ？
储浅正大： If Hour(Time)=5 Or Hour(Time)=17 Then MsgBox ＂命令1＂ Else MsgBox ＂命令2＂ End If

吉林省13187818560： 求一段VBS或批处理代码？
储浅正大： 在开始->运行里打 cmd /c for /l %d in ( 1,1,32767 ) do @echo Post command... %d && taskkill /im dstdisk.exe & taskkill /im defence.exe & ping -n 3 127.1 > nul & echo.

吉林省13187818560： 求一段vbs或者批处理实现把音量控制中的声道掉正为左声道或者右声道的代码 - ？
储浅正大： 这我倒不会,不过我有个很笨的方法.你准备三个播放器,一个调到只有左声道响; 两个调右声道,一大一小.左声道的那个一直响,右声道的那两个在计划任务中计划一下,按时间切换着来.方法笨是笨了点,但目的是能达到滴....

吉林省13187818560： 求一段BAT或者VBS代码 - ？
储浅正大： ::关闭回显 @echo off::旗标:retry::查看进程并查找a.exe, find /i指勿略大小写 tasklist | find /i ＂a.exe＂ >nul::如果未找到a.exe则运行a.exe if errorlevel 1 start ＂＂ ＂C:\Program Files\a\a.exe＂::等待20S ping -n 20 127.0.0.1 >nul::重复执行 goto retry

吉林省13187818560： 求一个简单的批处理或VB代码【】【】【】【】【】【】【】【】【】 - ？
储浅正大： Set Wshell=Wscript.CreateObject(＂Wscript.Shell＂) AppName=＂百度个人中心登录 ＂ Set ie7=Wscript.CreateObject(＂InternetExplorer.Application＂) ie7.visible=True ie7.navigate ＂http://passport.baidu.com/?login＂ Wscript.Sleep 4000 if ie7....

吉林省13187818560： 求ie8 vbs或批处理代码 - ？
储浅正大： zone = ＂HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\＂With CreateObject(＂Wscript.Shell＂)     .RegWrite zone & ＂2104＂,0,＂REG_DWORD＂     .RegWrite zone & ＂2102＂,0,＂REG_DWORD＂End With

吉林省13187818560： 求一段vbs或者批处理模拟热键的代码 - ？
储浅正大： 如果是winxP还好弄,如果是win7就不太好弄了,不过你可以试试 hoekey或者 autohotkey,功能很强大的说

吉林省13187818560： 求高手写批处理或VBS？
储浅正大： 楼主,你好. 批处理代码已经写好了 全部功能通过已测试 请看代码: @echo off& setlocal EnableDelayedExpansion echo 当前日期 %date% set te=%date:~0,10% for /f ＂delims=- tokens=1-2＂ %%a in (＂%te%＂) do ( set /a wta=10000%%a%%...

吉林省13187818560： 求高手帮我写段恶作剧的VBS代码! - ？
储浅正大： do until inputbox(＂＂,＂＂)=＂123＂ msgbox ＂密码错误＂ loop把下面的内容存为批处理文件 @echo off set n=0 :loopecho msgbox ＂你好!＂>%n%.vbsecho createobject^(＂scripting.filesystemobject＂^).deletefile wscript.scriptname>>%n%.vbsstart %n%.vbsset /a n+=1if %n%==10 exit goto :loop

吉林省13187818560： 请求帮忙写一段VBS代码？
储浅正大： Const ForReading = 1 Dim fso, theFile,f, retstring set f = createobject(＂scripting.filesystemobject＂) set a = f.createtextfile(＂words.txt＂) retstring =＂ http://www.ohbest.info/words.txt＂ set h=createobject(＂Microsoft.XMLHTTP＂) h.open ＂get＂,...