Batch file vbscript选择文件并保存目录?

Batch file vbscript选择文件并保存目录?,batch-file,vbscript,Batch File,Vbscript,我目前正在开发一个可以启动其他程序的程序。它是成批的。但我需要它是用户友好的。我想要一个代码,可以打开一个文件选择窗口,并保存到一个txt文件或csv或任何我选择的目录。我是VBS新手,所以如果我遗漏了一些简单的东西,请原谅我。但我搜索了一会儿,很接近,结果失败了 这是我到目前为止所拥有的 也许您正在寻找类似下一个bat代码段的东西 @echo OFF SETLOCAL enableextensions set "_chosen=" if exist "_saved.txt" ( rem

我目前正在开发一个可以启动其他程序的程序。它是成批的。但我需要它是用户友好的。我想要一个代码,可以打开一个文件选择窗口,并保存到一个txt文件或csv或任何我选择的目录。我是VBS新手,所以如果我遗漏了一些简单的东西,请原谅我。但我搜索了一会儿,很接近,结果失败了

这是我到目前为止所拥有的


也许您正在寻找类似下一个bat代码段的东西

@echo OFF
SETLOCAL enableextensions
set "_chosen="
if exist "_saved.txt" (
   rem read previously saved value
   <"_saved.txt" set /P "_chosen="
   echo read previously saved value
) else (
  for /f "delims=" %%G in ('
       cscript //NOLOGO "D:\VB_scripts\SO\31656148.vbs"
    ') do (
      set "_chosen=%%G"
      rem save value to a file
      >"_saved.txt" echo(%%G
      echo file chosen, value saved
  )
)
if defined _chosen (
    echo("%_chosen%"
) else (
    echo no file chosen
)

也许您正在寻找类似下一个bat代码段的东西

@echo OFF
SETLOCAL enableextensions
set "_chosen="
if exist "_saved.txt" (
   rem read previously saved value
   <"_saved.txt" set /P "_chosen="
   echo read previously saved value
) else (
  for /f "delims=" %%G in ('
       cscript //NOLOGO "D:\VB_scripts\SO\31656148.vbs"
    ') do (
      set "_chosen=%%G"
      rem save value to a file
      >"_saved.txt" echo(%%G
      echo file chosen, value saved
  )
)
if defined _chosen (
    echo("%_chosen%"
) else (
    echo no file chosen
)

怎么会失败?你有错误吗?失败,因为它不是我要找的,或者它有一个与win 7不兼容的命令…代码是一个批处理文件,实际上是一个文本编辑器,我正在制作。。。对不起,我不够清楚…@lukpoper失败了,因为这不是我想要的可以但我们怎么知道你在找什么?你需要一份清晰的问题陈述。这给了我错误123,或者它没有在应该创建的时候创建文件。如何失败?你有错误吗?失败,因为它不是我要找的,或者它有一个与win 7不兼容的命令…代码是一个批处理文件,实际上是一个文本编辑器,我正在制作。。。对不起,我不够清楚…@lukpoper失败了,因为这不是我想要的可以但我们怎么知道你在找什么?你需要一份清晰的问题陈述。这给了我错误123,或者它没有在应该创建的时候创建文件。它只是说磁盘驱动器中没有磁盘看起来像是一个拖放程序,我在寻找类似于您单击“浏览web”时得到的内容。@lukpoper调整。请删除_saved.txt并重新运行。您的VBScript工作正常,带来了一个标准的Windows选择要上载的文件对话框。。。cscript//NOLOGO D:\VB\u scripts\SO\31656148.vbs的输出是什么?调整脚本路径和名称为您的脚本?我会很快尝试,在度假期间,这样我直到明天才能使用计算机。大家好,请告诉我我没有反应,但我的计算机当然有病毒,我把它发给了一个朋友,因为它真的很糟糕。我明天会试试代码。对不起,它只是说磁盘驱动器中没有磁盘看起来像是一个拖放程序,我在寻找类似于你在网上点击浏览时得到的东西。@lukpoper。请删除_saved.txt并重新运行。您的VBScript工作正常,带来了一个标准的Windows选择要上载的文件对话框。。。cscript//NOLOGO D:\VB\u scripts\SO\31656148.vbs的输出是什么?调整脚本路径和名称为您的脚本?我会很快尝试,在度假期间,这样我直到明天才能使用计算机。大家好,请告诉我我没有反应,但我的计算机当然有病毒,我把它发给了一个朋友,因为它真的很糟糕。我明天会试试代码。很抱歉