批处理之家 - Powered by Discuz! Board

标题: [其他] 【已解决】批处理弹出输入对话框中的消息内容怎么换行？ [打印本页]

作者: xiaolijian916 时间: 2015-11-13 10:08 标题: 【已解决】批处理弹出输入对话框中的消息内容怎么换行？

本帖最后由 pcl_test 于 2016-8-14 20:47 编辑

如附件所示：
   这是我想实现的效果，图片中采用“换行”方式是敲空格内容超过一行自动挤到下一行了，看起来像是换行的样式；
   我试了一下，each.或者\r\n都不是我要的结果，set "message=注意：\r\n选择数据库命令请输入[imp]/[exp]；\r\n....."；
   我的意思是将一行字符换分成多行显示，因为弹出输入框message属性只能写一行，：

我是新手不好意思哈，这是弹出框开始部分的代码：

::这里设置是否隐藏bat窗口,将"set hideform=False"改成"set hideform=True"即可.(False可以打印输入的内容到控制台)
set hideform=False

::对话框中要显示的内容
set "title=输入内容"

::对话框的提示信息
set "name=注意：                                                                                           1.数据库导入导出请输入[imp]或[exp]命令                                                        2.连接手机文件管理器请输入[IP]地址"
set "message=%name%"

::输入框中的内容(文本框默认服务器地址)
set "note=192.16.137.2"
复制代码

有哪位大神支支招，小弟感激不尽，不一定非要用vbs，只要能弹出框输入内容，提示内容可以换行就可以了。

作者: pcl_test 时间: 2015-11-13 18:05

@echo off
set "title=输入内容"
set "prompt=注意：""&chr(13)&""1.数据库导入导出请输入[imp]或[exp]命令""&chr(13)&""2.连接手机文件管理器请输入[IP]地址"
for /f "delims=" %%a in ('mshta VBScript:Execute("CreateObject(""Scripting.Filesystemobject"").GetStandardStream(1).Write(inputbox(""%prompt%"",""%title%""))"^)(close^)') do echo;%%a
pause
复制代码

作者: xiaolijian916 时间: 2015-11-14 23:43

回复 2# pcl_test

能不能稍微改进一下，把这个弹出框做成一个调用文件，需要的时候调用再弹出，并将输入的值返回。

作者: xiaolijian916 时间: 2015-11-14 23:55

回复 pcl_test

能不能稍微改进一下，把这个弹出框做成一个调用文件，需要的时候调用再弹出，并将 ...
xiaolijian916 发表于 2015-11-14 23:43

附件是我拼凑的代码。。

作者: pcl_test 时间: 2015-11-15 09:02

回复 3# xiaolijian916

难道2楼的代码不是这样吗？

作者: xiaolijian916 时间: 2015-11-15 20:37

回复 5# pcl_test

效果跟4楼附件的那样，生成临时调用文件，call 函数调用文件。

作者: 逍遥锋 时间: 2016-12-25 16:06

回复 2# pcl_test

老大，请给一个只有换行提示框的代码，不要输入框，万分感谢

作者: 逍遥锋 时间: 2016-12-25 16:08

回复 2# pcl_test

老大，能给一个BAT弹出提示框，里面的内容分行显示的代码吗？万分感谢！

作者: pcl_test 时间: 2016-12-25 17:02

回复 8# 逍遥锋

mshta vbscript:msgbox("第一行"^&vbCrLf^&"第二行"^&vbCrLf^&"第三行")(close)
pause
复制代码

powershell -sta "[void][Reflection.Assembly]::LoadWithPartialName('System.Windows.Forms');[Windows.Forms.MessageBox]::show(\"第一行`r`n第二行`r`n第三行\")"
pause
复制代码

powershell "(New-Object -ComObject Wscript.Shell).Popup(\"第一行`r`n第二行`r`n第三行\",0,\"\")"
pause
复制代码

作者: citygun 时间: 2018-6-28 23:47

回复 2# pcl_test 大大，我最近也在烦恼这个问题，看了你的例子茅塞顿开，根据这个示例怎么提取输入后的值大大能否给个示范。

作者: citygun 时间: 2018-6-28 23:47

pcl_test 发表于 2015-11-13 18:05

pcl_test 大大，我最近也在烦恼这个问题，看了你的例子茅塞顿开，根据这个示例怎么提取输入后的值大大能否给个示范。

欢迎光临批处理之家 (http://bbs.bathome.net/)