Board logo

标题: 如何自动复制键盘所输入的字符到新的文本中 [打印本页]

作者: ttimber     时间: 2009-12-14 16:47    标题: 如何自动复制键盘所输入的字符到新的文本中
如题,也许说的不详细,举个例子更生动。
如我需要多次打开如下网址,但是其中有几个字符经常变动,如红色所示
http://www.cn-dos.net/forum/post.php?action=newthread&fid=23
我这次是23,下一次可能就是36
如何建立一个批片理命令,等待键入一个字符,然后回车,
可以把所键入的数字复制到需要替换的地方,然后打开新的网址
这个批处理命令如何实现?

谢谢!

作者: mountvol     时间: 2009-12-14 16:58
这个是基础:

@echo off
set /p strNum=输入字符:
start "" "http://www.cn-dos.net/forum/post.php?action=newthread&fid=%strNum%"
goto :eof


作者: ttimber     时间: 2009-12-16 08:49
真是个热心人
谢谢

作者: ttimber     时间: 2009-12-16 09:33
但是还有一个问题
如果我不需要打开新发浏览器
而是使用原有打开的浏览器
即我已经打开了一个浏览器
当我运行此命令时
在我打开的浏览器中打开网址
这个处理该如何实现?

作者: qinchun36     时间: 2009-12-16 11:31
方法一、修改你的浏览器的默认设置为总是在新标签中打开连接(针对自己浏览器网上去找,不详述)。


方法二、用我盗版的脚本,它会新开一个专门的IE浏览器,使得你输入的所有网站都在这个IE浏览器标签中打开,具体做法就是:

把下面的 VBScript 代码保存为 OpenURLInTab.vbs ,双击就能运行(这里面有无用的代码,但是注明出处是良好的行为习惯)



' 设定你要访问的网址的前一部分
urlHead = "http://www.cn-dos.net/forum/post.php?action=newthread&fid="

Const NAV_OPEN_IN_BACKGROUND_TAB = &H1000
sParam = "&reg;2009&nbsp;Reproduction&nbsp;&nbsp;<em>qinchun36 | CN-DOS.net</em><p>&copy;2007&nbsp;&nbsp;Original released at&nbsp;&nbsp;<a href='http://blogs.msdn.com/tonyschr/archive/2007/01/19/ie-automation-amp-tabs.aspx' target='_self'>Tony Schreiner's WebLog</a>"

Set oIE = CreateObject("InternetExplorer.Application")
oIE.Visible = true
oIE.Navigate2 "about:blank"
oIE.document.body.innerHTML = sParam
Do
sParam = InputBox("输入参数" & vbCrLf & vbCrLf & "(空值、取消、关闭输入框都可以结束输入)", "Goto CN-DOS.net", "23")
If sParam = "" Then WScript.Quit
oIE.Navigate2 urlHead & sParam, NAV_OPEN_IN_BACKGROUND_TAB
Loop


Last edited by qinchun36 on 2009-12-16 at 11:33 ]