阅读:149回复:4

关于带参数命令直通车写法的求助

楼主#
更多 发布于:2025-10-21 22:57
有一个vbs代码,用命令直通车运行该代码,可以从一个指定文件中提取某行内容进行输入。命令行的参数是一个数字,代表提取文件中对应数字的行数。命令直通车是这样的:wwfqtfjjvb $[★人无千日好]$GO(wscript$_mydoc\command\yfyna.vbs$_1),这表示从 诗词文件中将第1行复制出来粘贴到目标程序上。以前输出是没有问题的。现在没反应了。如果将命令直通车写成:wwfqtfjjvb $[★人无千日好]$GO(wscript$_mydoc\command\yfyna.vbs$_$1),vbs程序会出现提示行4,字符1,类型不匹配‘c’,800A000D 的错误提示。求助:如果在命令直通车后带数字参数,比如1,现在应该怎样写编码呢?


附:vbs代码如下:



set fso=createobject("scripting.filesystemobject") c=wscript.arguments(0)
set file=fso.opentextfile("D:\csq\yong\mb\诗词.txt")For i = 1 to c-1
file.ReadLineNext
s = file.ReadLinefile.Close

Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate("about:blank") objIE.document.parentwindow.clipboardData.SetData "text", s
objIE.quit

set WshShell=createobject("wscript.shell")WshShell.sendkeys "^{v}"
沙发#
发布于:2025-10-21 23:41
你之前的写法是对的,不清楚你以前是什么时候,确定没换操作系统吗
板凳#
发布于:2025-10-22 09:54
小小输入法的处理没有问题。你可能是换了或升级了操作系统,ie已经不能再用了。
set fso=createobject("scripting.filesystemobject")
c=wscript.arguments(0)
set file=fso.opentextfile(".yong\\诗词.txt")
For i = 1 to c-1
        file.ReadLine
Next
        s = file.ReadLine
file.Close

wscript.Echo s

用这个脚本,和管道直通车,兼容性更好,速度更快
$[第一句]$GO(|cscript$_//Nologo$_.yong\test.vbs$_1)
地板#
发布于:2025-10-22 11:17
dgod:小小输入法的处理没有问题。你可能是换了或升级了操作系统,ie已经不能再用了。
set fso=createobject("scripting.filesystemobject")
c=wscript.arguments(0)
set ...
回到原帖
谢谢周大!我的系统是从Windows10逐步升级过来的,现在的版本号是Windows11 25H2 26220.6972。
现在改用您的vbs代码和管理直通车调用成功了。
但我还没弄懂管道直通车中的“//Nologo“是什么意思——测试了一下,没有这个“//Nologo“,上面会带有版本一行版本信息。
4楼#
发布于:2025-10-22 11:21
cshiq:谢谢周大!我的系统是从Windows10逐步升级过来的,现在的版本号是Windows11 25H2 26220.6972。
现在改用您的vbs代码和管理直通车调用成功了。
但我还没弄懂管道直通车中的“//Nologo“是什么意思。
回到原帖
这是cscript.exe这个程序的参数
游客

返回顶部