批处理文件的图形用户界面？

Question

批处理文件的图形用户界面？

user-interfacewindows-7interfacebatch-file

3

我有一个批处理文件，是一个非常简单的程序，可以启动网站，类似迷你的Web浏览器体验，具有打开程序等命令。如何为此制作界面或GUI？而不必完全手动更改我的代码。这是我代码的示例：

:start
@echo off
COLOR 1E
cls
echo Welcome to Wannow Dashboard.  This is the main page.
echo Type in the number to be redirected to your desired location.
echo 1. Useful Websites
echo 2. Programs     
echo Wannow Dashboard created by Brad Wannow

set/p var1=
if %var1% == 1 goto Websites
if %var1% == 2 goto program
pause
exit

:websites
COLOR 1E
cls
echo Welcome to Wannow Dashboard: Websites. Select a command, type in number to be redirected.
echo 1. www.Pandora.com
echo 2. www.Google.com
echo 3. Aventa Blackboard
echo 4. Other
@echo OFF 

@echo %time% 
ping -n 1 -w 1 127.0.0.1 1>nul        
echo Wannow Dashboard

当然，还有很多代码，但这就是我的程序编写方式，还有一些启动命令和用户输入等等。

- user1683444

直接批处理文件中不支持图形命令。我建议您查看VBScript或PowerShell。 - SeanC

那么我的代码是否必须完全更改，而且事情不会再像以前一样工作？我该如何将上面的代码转换为VBScript并添加图形？ - user1683444

有许多指南 - 这是 vbscript 的帮助文件。是的，它会有所不同。Echo Hello World 将变成 msgbox("Hello World")，而输入将看起来像 inputbox("What is your name?")（在非常基本的水平上）。 - SeanC

好的，谢谢。我希望他们可以自动将我的代码转换成.vbs，转换后它将会是什么样子呢？ - user1683444

https://www.vistax64.com/vb-script/177754-create-menu.html#post826436 有一个带菜单的示例脚本。 - SeanC

显示剩余2条评论

1个回答

网页内容由stack overflow 提供, 点击上面的

可以查看英文原文，
原文链接

- SeanC · Accepted Answer

图形化命令在纯批处理文件中不可用。我建议您查看vbscript或powershell。

有许多指南-这是vbscript的帮助文件。是的，它会有所不同。Echo Hello World将变成msgbox("Hello World")，输入将类似于inputbox("What is your name?")（在非常基本的级别上）

没有自动转换，除非您拥有Visual Studio，否则没有免费的集成开发人员，但notepad ++似乎是首选编辑器，因为它具有语法突出显示

从here，一个带菜单的示例脚本

'-----------------------------------------------------------------
' Name: Menu Template Script
' By: Harvey Colwell
' CopyRight: (c) Jul 2000, All Rights Reserved!
'
'*****************************************************************
Option Explicit

Dim oFS, oWS, oWN

Set oWS = WScript.CreateObject("WScript.Shell")
Set oWN = WScript.CreateObject("WScript.Network")
Set oFS = WScript.CreateObject("Scripting.FileSystemObject")

'----------
' Script SetUp
'----------

'----------
' Main
'----------
Select Case InputBox ( _
"Enter menu item number then Click Ok. . ." & vbCrlf & vbCrlf & _
" [1] Item 1" & vbCrlf & _
" [2] Item 2" & vbCrlf & _
" [3] Item 3" & vbCrlf & _
" [4] Item 4", _
"Main Menu")

Case "1"
Call sub1()
Case "2"
Call sub2()
Case "3"
Call sub3()
Case "4"
Call sub4()
Case Else
WScript.Echo "You entered an invalid menu choice!"

End Select

'----------
' Clean Up
'----------

Call CleanUp

'-----------------------------------------------------------------
' Subroutines
'*****************************************************************

'---------------------
Sub CleanUp()
Set oWS = Nothing
Set oWN = Nothing
Set oFS = Nothing
WScript.Quit
End Sub

'---------------------
Sub sub1()
WScript.Echo "You selected Menu Item 1"
End Sub

'---------------------
Sub sub2()
WScript.Echo "You selected Menu Item 2"
End Sub

'---------------------
Sub sub3()
WScript.Echo "You selected Menu Item 3"
End Sub

'---------------------
Sub sub4()
WScript.Echo "You selected Menu Item 4"
End Sub

'-----------------------------------------------------------------
' Functions
'*****************************************************************
'---------------------

'***************************************