设为首页收藏本站
切换到宽版

 找回密码
 注册
搜索
批处理之家»论坛 › 批处理专区: BAT CMD DOS › BAT求助&讨论 › 用bat制作一个右下角弹窗会自动关闭
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发新帖
查看: 19102|回复: 9

[系统相关] 用bat制作一个右下角弹窗会自动关闭

[复制链接]
1049918599
发表于 2023-1-17 17:14:42 | 显示全部楼层 |阅读模式
在遇到指定命令的时候，比如打开某个软件，或者开机自启动，右下角蹦出一个自定义的弹窗，但不需要鼠标去点击，自己会关闭
回复

举报

谐夜落风
发表于 2023-1-17 17:50:40 | 显示全部楼层
本帖最后由 谐夜落风 于 2023-1-17 17:51 编辑

我想法是调用vbs（Visual Basic Sprint应该有这功能吧），但是我也未曾涉猎，只能看下面有没有高手懂了
纯用batch肯定不行，毕竟批处理是基于命令提示符的，除了start没法越过cmd的边界……
回复

举报

1049918599
 楼主| 发表于 2023-1-18 02:23:57 | 显示全部楼层
回复 2# 谐夜落风


    感谢，等等大佬看看
回复

举报

holley
发表于 2023-1-18 11:04:45 | 显示全部楼层
回复 2# 谐夜落风
这种？？
  1. nsw= createobject("htmlfile").parentWindow.screen.availWidth
  2. nsh= createobject("htmlfile").parentWindow.screen.availHeight
  3. Set WshShell = CreateObject("WScript.Shell")
  4. Dim OIE
  5. Set OIE = CreateObject("InternetExplorer.Application")
  6. With OIE
  7. .left=nsw-300
  8. .top=nsh
  9. .height=200
  10. .width=300
  11. .menubar=0
  12. .toolbar=0
  13. .statusBar=0
  14. .navigate "About:Blank"
  15. .visible=1
  16. End With
  17. 'wait a while until IE as finished to load
  18. Do while OIE.busy
  19. loop
  20. With OIE.document
  21. .Open
  22. .WriteLn "<HTML><HEAD>"
  23. .WriteLn "<TITLE>批处理之家</TITLE></HEAD>"
  24. .WriteLn "<BODY>"
  25. .WriteLn "<b>批处理之家 </b>"
  26. .WriteLn "<h1> <font color=red> 右下角弹窗! </h1>"
  27. .WriteLn "</BODY>"
  28. .WriteLn "</HTML>"
  29. .Close
  30. End With
  31. do while oie.top>nsh-oie.Height
  32. oie.top=oie.top-2
  33. Loop
  34. wscript.sleep 5000
  35. WshShell.run "taskkill /f /im iexplore.exe",vbhide
  36. Set WshShell = Nothing
复制代码
回复

举报

1049918599
 楼主| 发表于 2023-1-18 11:24:28 | 显示全部楼层
回复 4# holley


    大佬牛啊！不是这种，这个上传不了图片好麻烦
回复

举报

1049918599
 楼主| 发表于 2023-1-18 11:25:03 | 显示全部楼层
回复

举报

Batcher
发表于 2023-1-18 11:47:45 | 显示全部楼层
回复 5# 1049918599


如果需要上传文件，可以用阿里云盘或百度网盘。

如果需要上传截图，可以找个图床，例如：
http://bbs.bathome.net/thread-60985-1-1.html
回复

举报

1049918599
 楼主| 发表于 2023-1-18 13:09:05 | 显示全部楼层
回复 4# holley


    [img][/img]
回复

举报

1049918599
 楼主| 发表于 2023-1-18 13:09:16 | 显示全部楼层
回复 7# Batcher


感谢，已经上传
回复

举报

1049918599
 楼主| 发表于 2023-1-18 13:09:44 | 显示全部楼层
回复 8# 1049918599


    这种样式的最好了
回复

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-19 06:17 , Processed in 0.019683 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表