中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [已结]VB将变量字符串显示在弹出的选择框上
作者:
标题: [已结]VB将变量字符串显示在弹出的选择框上 上一主题 | 下一主题
ka56
中级用户





积分 234
发帖 129
注册 2006-11-28
状态 离线
『楼 主』:  [已结]VB将变量字符串显示在弹出的选择框上

Set objIE = CreateObject("InternetExplorer.Application"
objIE.Navigate("about:blank"
strURL = objIE.document.parentwindow.clipboardData.GetData("text"
objIE.Quit
set ws=createobject("wscript.shell"
a=msgbox("请注意:是否将*****添加入你的文档?",Byesno+32,"提示"
if a=vbyes then ws.run "添加联系方式.bat"



假如现在剪贴板里是"张翔 1352031284",如何将剪贴板的变量显示在弹出的选择框上.就是想找代码替换星号部分,,,得到的结果是:

请注意:是否将"张翔 1352031284"添加入你的文档?

选确定后,接着执行添加联系方式.bat



没学过VBS,又来麻烦论坛的虾虾了,先致礼下!

[ Last edited by ka56 on 2009-2-15 at 12:42 ]

2009-2-15 10:55
查看资料  发短消息 网志   编辑帖子  回复  引用回复
ka56
中级用户





积分 234
发帖 129
注册 2006-11-28
状态 离线
『第 2 楼』:  

汗~表情都出来了,部分就一个右括号""

2009-2-15 11:00
查看资料  发短消息 网志   编辑帖子  回复  引用回复
ka56
中级用户





积分 234
发帖 129
注册 2006-11-28
状态 离线
『第 3 楼』:  

a=msgbox("请注意:是否将"+strURL+"添加入你的文档?",Byesno+32,"提示" )

这样就行了,谢谢大家!~~

2009-2-15 12:41
查看资料  发短消息 网志   编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: