[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
xjiain

Rank: 1

帖子
34 
积分
65 
技术
0  
捐助
0  
注册时间
2011-6-9 
1楼 跳转到 » 正序看帖
打印
tT
发表于 2011-8-2 16:00 | 只看该作者

[己解决]批处理可否检测自己是否已经在运行？

本帖最后由 xjiain 于 2011-8-4 16:56 编辑

想在开始执行前，检测自己是否正在运行了，免得重复执行。
1

评分人数

    • CrLf: 感谢给帖子标题标注[已解决]字样PB + 2
收藏 分享
我来学习。

cjiabing

Rank: 8Rank: 8

帖子
1726 
积分
4476 
技术
95  
捐助
0  
注册时间
2008-12-21 
8楼
发表于 2011-8-4 02:04 | 只看该作者
回复 7# CUer


   
  1. @echo off

  2. for /f "tokens=1 delims=[]" %%a in ('cmd /c "wmic process where name="cmd.exe" get CommandLine" ^| find /i "%~f0" ^| find /i /n "%~f0"') do set /a num=%%a-1

  3. echo 本程序一共打开了 %num% 个。 

  4. pause
复制代码
1

评分人数

    • CrLf: 乐于助人技术 + 1
寂寞是黑白的，但黑白不是寂寞，是永恒。BAT 需要的不是可能，而是智慧。

TOP

CUer

Rank: 5Rank: 5

帖子
522 
积分
1037 
技术
61  
捐助
0  
注册时间
2010-4-30 
7楼
发表于 2011-8-3 22:53 | 只看该作者
回复 4# cjiabing


进程不合适吧，我随便打开一个cmd窗口，再去双击那个bat，这样不是会误判吗？

TOP

tmplinshi

Rank: 7Rank: 7Rank: 7

帖子
1023 
积分
3120 
技术
230  
捐助
160  
注册时间
2010-12-22 
6楼
发表于 2011-8-3 13:25 | 只看该作者
回复 3# CUer


那就这样：
  1. @echo off

  2. 

  3. :: --------------------- 检测自己是否已运行 ---------------------

  4. set title=##1##

  5. 

  6. title %title%

  7. 

  8. set /fi=/fi "imagename eq cmd.exe" /fi "windowtitle eq %title%"

  9. tasklist /nh %/fi% 2>nul | more +2 | findstr . >nul && (

  10.     echo 已经运行。按任意键退出...

  11.     pause >nul

  12.     exit /b

  13. )

  14. :: --------------------- / 检测自己是否已运行 ---------------------

  15. 

  16. pause
复制代码
不管复制到哪里，改成什么名，都只能运行自己一次。
1

评分人数

    • CrLf: 乐于助人技术 + 1

TOP

xjiain

Rank: 1

帖子
34 
积分
65 
技术
0  
捐助
0  
注册时间
2011-6-9 
5楼
发表于 2011-8-3 13:02 | 只看该作者
我把BAT编译成了EXE。
代码中加入了这一段代码。
set runing=0
for /f "tokens=1" %%a in ('tasklist /FO TABLE /NH') do (
if /i "%~dp0%%a"==%0 set /a runing+=1
)
if "%runing%" GTR "1"  exit
我来学习。

TOP

cjiabing

Rank: 8Rank: 8

帖子
1726 
积分
4476 
技术
95  
捐助
0  
注册时间
2008-12-21 
4楼
发表于 2011-8-3 00:52 | 只看该作者
本帖最后由 cjiabing 于 2011-8-3 02:56 编辑

不好用“set title=[%~f0]”，需要用固定模式的。原因正如楼上所言！
指定窗口存在则退出。

  1. :loop

  2. ::假如不存在某个进程名称就返回，否则等待给进程结束。

  3. 

  4. for /f "tokens=1" %%a in ('tasklist /fi "IMAGENAME eq QQ.exe" /FO TABLE /NH') do if /i "%%a"=="QQ.exe" (ping /n 2 127.0.1>nul&goto :loop)

  5. goto :eof
复制代码

参考：批处理与进程
寂寞是黑白的，但黑白不是寂寞，是永恒。BAT 需要的不是可能，而是智慧。

TOP

CUer

Rank: 5Rank: 5

帖子
522 
积分
1037 
技术
61  
捐助
0  
注册时间
2010-4-30 
3楼
发表于 2011-8-2 23:55 | 只看该作者
类似设计模式中的单例模式？呵呵，有意思。
不过2楼主版主的方法应该还不算单例模式，我把bat复制到另外一个目录，就能启动两个了吧。
不知道楼主的具体要求到哪个层次。

TOP

tmplinshi

Rank: 7Rank: 7Rank: 7

帖子
1023 
积分
3120 
技术
230  
捐助
160  
注册时间
2010-12-22 
2楼
发表于 2011-8-2 18:06 | 只看该作者 
  1. @echo off

  2. :: --------------------- 检测自己是否已运行 ---------------------

  3. set title=[%~f0]

  4. 

  5. set /fi=/fi "imagename eq cmd.exe" /fi "windowtitle eq %title%"

  6. tasklist %/fi% 2>nul | findstr . >nul && (

  7.     echo "%~f0" 已经运行。按任意键退出...

  8.     pause >nul

  9.     exit /b

  10. )

  11. 

  12. title %title%

  13. :: --------------------- / 检测自己是否已运行 ---------------------

  14. 

  15. pause
复制代码

TOP

返回列表