关于使用剪贴板和 stdIn 和 stdOut 的 VBScript 问题

编程问答 2022-05-27

问题描述

我有一个 HTA，它使用 VBScript 来完成大量琐碎的重复性任务。我得到的最新重复性任务是将不计其数的 MAC 地址输入到一个不接受自动输入的不同系统中。但是，它们都是小写的，而大写的人希望它们以大写形式输入。使用来自 Use clipboard from VBScript 和 VBScript,Text to Clipboard to Paste in Any Field 的答案，我能够将这段代码完美地组合在一起。

'copy the current Clipboard contents into a variable called txtClipBoard
txtClipBoard = CreateObject("htmlfile").Parentwindow.ClipboardData.GetData("text")

'Assign the value of the LowerCase text field to txtClipBoard
txtLowerCase.value = txtClipBoard

'Prepare VBS to push data to the clipboard
Set WshShell = CreateObject("WScript.Shell")
Set oExec = WshShell.Exec("clip")
Set oIn = oExec.stdIn

'Push the uppercase value into the clipboard
oIn.WriteLine UCase(txtLowerCase.value)

'Put the Uppercase value in the second UpperCase text field.
txtUpperCase.value = UCase(txtLowerCase.value)

Lower2Upper

我从我的来源复制（Crtl-C）MAC。然后，单击粘贴/复制按钮运行上面的子例程，使用 IE 方法将 MAC“粘贴”到小写文本字段以访问剪贴板，然后使用 WScript.Shell 方法将大写版本放入剪贴板。我的问题是关于在 WScript.Shell 中使用 stdIn。进一步挖掘，我发现了一个 stdOut 方法。我想知道是否有办法坚持在 WScript 对象中执行此例程。我尝试了几条不同的线路，但我不明白到底发生了什么，也没有找到向我解释的好资源。我可以使用 stdIn / stdOut 函数来操作剪贴板以获得我需要的结果而不是抓取 IE 命令吗？

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

clipboardclipboardhtastdinstdinstdinstdoutstdoutvbscriptvbscriptvbscript