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

Rank: 1

帖子
33 
积分
55 
技术
0  
捐助
0  
注册时间
2012-9-22 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2012-9-28 12:52 | 只看该作者

[其他] [已解决]求助隐藏批处理自身的代码

本帖最后由 yuan37 于 2013-7-10 11:28 编辑

搜了一下，网上有很多隐藏批处理自身的代码，试了都不行，还是黑框闪了一下，
有没有运行自身批处理时没有黑框出现的，先谢。
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2
收藏 分享

bingxing8000

Rank: 2

帖子
95 
积分
139 
技术
1  
捐助
0  
注册时间
2011-4-15 
2楼
发表于 2012-9-28 13:33 | 只看该作者
用VBS，调用bat就可以了
赞成“拿来主义”，但是鄙视“伸手党”

TOP

0123456789

Rank: 1

帖子
37 
积分
41 
技术
1  
捐助
0  
注册时间
2012-9-22 
3楼
发表于 2012-9-28 13:36 | 只看该作者
Set ws = CreateObject("Wscript.Shell")   
ws.run "cmd /c D:\1.bat",vbhide
把上面的代码写入记事本，另存为vbs文件，代码里D:\1.bat是你的bat的路径
这样就隐藏了。
1

评分人数

TOP

bingxing8000

Rank: 2

帖子
95 
积分
139 
技术
1  
捐助
0  
注册时间
2011-4-15 
4楼
发表于 2012-9-28 13:40 | 只看该作者 
  1. Set ws = CreateObject("Wscript.Shell")   

  2. ws.run "cmd /c D:\1.bat",0
复制代码
把vbhide 改为0也可以
代码里D:\1.bat也可以改为DOS命令
赞成“拿来主义”，但是鄙视“伸手党”

TOP

yuan37

Rank: 1

帖子
33 
积分
55 
技术
0  
捐助
0  
注册时间
2012-9-22 
5楼
发表于 2012-9-28 17:15 | 只看该作者
多谢楼上三位帮忙，马上试试!

TOP

ny350101

Rank: 2

帖子
101 
积分
158 
技术
1  
捐助
0  
注册时间
2010-3-9 
6楼
发表于 2012-10-1 02:08 | 只看该作者
4楼，如果DOS命令为多条怎么写？

TOP

angelbd

Rank: 1

帖子
32 
积分
34 
技术
0  
捐助
0  
注册时间
2012-9-23 
7楼
发表于 2012-10-1 07:02 | 只看该作者
严重关注，本人也习惯多条命令依次连写，如何最优化？
天道酬勤、地道酬善、人道酬诚、商道酬信、业道酬精。

TOP

apang

Rank: 8Rank: 8

帖子
2085 
积分
14204 
技术
665  
捐助
0  
注册时间
2011-11-27 
8楼
发表于 2012-10-1 08:56 | 只看该作者
回复 6# ny350101 
  1. Set ws = CreateObject("Wscript.Shell")   

  2. ws.run "cmd /c copy C:\a.txt D:\ & copy C:\a.txt E:\",0
复制代码

TOP

ny350101

Rank: 2

帖子
101 
积分
158 
技术
1  
捐助
0  
注册时间
2010-3-9 
9楼
发表于 2012-10-1 11:24 | 只看该作者
回复 8# apang


    如果是这样的代码如何写？
  1. @echo off

  2. setlocal enabledelayedexpansion

  3. for /f "delims=\" %%i in ('fsutil fsinfo drives^|find /v ""') do (

  4.     set var=%%i

  5.     set drive=!var:~-2!

  6.     fsutil fsinfo drivetype !drive!|find "固定">nul && (

  7.     if exist !drive!\RECYCLER rd/s/q !drive!\RECYCLER >nul 2>nul

  8.     if exist !drive!\Recycled rd/s/q !drive!\Recycled >nul 2>nul

  9.     )

  10. )

  11. taskkill /f /im explorer.exe >nul

  12. start "" "explorer.exe"
复制代码

TOP

返回列表