通过Inputbox按给定名称创建一个文件夹

Question

我发现这个脚本可以创建一个文件夹，但我想创建一个通过InputBox命名的文件夹。

第1步：当我点击VBscript文件时，会弹出输入框。

第2步：弹出后，我需要在文件夹名称的位置给出我需要创建文件夹的位置

如果可能，请告诉我。

Dim oFSO
Set oFSO = CreateObject("Scripting.FileSystemObject")

' Create a new folder
oFSO.CreateFolder **"C:\MyFolder"**

' Copy a file into the new folder
' Note that the destination folder path must end with a path separator (\)
oFSO.CopyFile "\\server\folder\file.ext", "C:\MyFolder\"

Answer 1

这样的东西？

folder=InputBox("Please enter the folder name","Folder")
Set oFSO = CreateObject("Scripting.FileSystemObject")
oFSO.CreateFolder folder