1.vbs 复制word一段内容到另一个word文档
你这个问题描述得有点偏差,应该是用于电脑操作考试的吧?我对这个问题的理解如下:1、打开vbs,点击"文件",选择"另存为",把名称那一条改为c.doc,然后点保存,c.doc就建好了(此时不要关闭这个文档)。
2、分别打开a、b文档(此时下面任务条上就同时打开了C、a、b三个文档),切换到a文档,选中a文档的第一段(要把段落符号一起选中,不然格式复制不下来),按鼠标右键,选择"复制",再切换到C文档,在光标闪烁处按鼠标右键,选"粘贴",a中的第一段就复制到C中了。再切换到b文档,选中第一段后,按复制,再切换到c文档,按粘贴……以此类推,在 a、b、C三个文档中来回切换,复制完后(要在C文档这个窗口),直接点保存就全保存到C中了。
然后关闭全部文档,a、b不用保存修改。
2.用VBS格式做个
理论与实际上都是可以的,但是实现以及操作起来太麻烦,以至于远远超过手动ctl+c和ctl+v的操作量。好吧,或许你不信,那我给你解释一下到底如何麻烦。
首先,复制的话,vbs脚本不能访问剪切板,要通过生成其它组件的对象来调用访问剪切板。这意味着什么呢?意味着你必须先把东西复制一下,然后再打开vbs脚本去读你复制在剪切板上的内容。可这时候如果手动操作的话已经可以粘贴了。但用vbs则只是刚刚读取复制的内容。怎么样?开始麻烦了吧。
其次,你要粘贴到哪呢?好吧,你说随便一个记事本,恩,没问题,如果是空的话,我以写模式打开写进去保存就ok了。可如果里面有内容呢?我是覆盖内容还是补充模式粘贴?如果你不往记事本而是word或者excel文件里面粘贴呢?又或者你复制的是图片或者其它影音文件呢?这都是vbs复杂操作,还不如手动处理的。
当然,我也不是说这样做不可以,而是如果单纯的一次两次的工作,你还不如手动做。倒是工作量频繁而巨大并且重复性强了,可以写个vbs脚本来实现。
说了这么多,我给你个简单的满足你功能的代码,你看看就明白了。
Set objHTML=CreateObject("htmlfile")
ClipboardText = objHTML.ParentWindow.ClipboardData.GetData("text")
MsgBox ClipboardText '这里弹出你复制的内容,别复制除文字外的东西啊
set fso = createobject("scripting.filesystemobject")
Set output = fso.OpenTextFile("c:\1.txt",2) '这里可以自定义你要粘贴的文件名
output.Write ClipboardText
output.Close
Set fso = Nothing
Set objHTML = nothing
其实这也不算粘贴了,只是从剪切板复制后把内容读出来写到一个记事本里。真正的粘贴其实也就是写操作。怎么样,这只是一个记事本,如果是excel或者网页上的文本框呢?呵呵,希望对您有帮助。全手打,!
回答补充:看你网站什么样了,其实或许可以换种方法,把数据保存到excel里面的,不过不知道你那边详细情况。 好吧,其实可以做一个循环,每5s把剪切板里的内容保存到excel里面去,前提就是你在5s内copy新的内容,不然等于又粘贴一遍旧的。
3.vbs Excel文件复制粘贴问题
Set excelApp = CreateObject("Excel.Application")With excelApp Set xwk = .Workbooks.Open("D:\1.xlsx") Set ywk = .Workbooks.Open("F:\5.xlsx") xwk.Worksheets("Sheet1").Cells.Copy ywk.Worksheets("Sheet5").Range("A1") ywk.Save ywk.Close xwk.Close .QuitEnd With。
4.简述在VBSCRIPT中,事件过程的调用方式有哪些
我知道的有两种
(假设调用方法为aaa(),事件驱动为onclick)
一种是:
<head>
<script language=vbscript>
sub aaa
end sub
</script>
</head>
<body>
<form>
<input type=button name="but" onclick=aaa()>
</form>
</body>
二是:
<head>
<script language=vbscript for=but event=onclick>
sub aaa
end sub
</script>
</head>
<body>
<form>
<input type=button name="but" onclick=aaa()>
</form>
</body>
三是:
<head>
<script language=vbscript>
sub but_onclick
end sub
</script>
</head>
<body>
<form>
<input type=button name="but" onclick=aaa()>
</form>
</body>
如果不用事件驱动的话调用方法是
call 过程名(实参)
或者 过程名 实参
5.word
Vbs 脚本编程简明教程之一—为什么要使用Vbs?在Windows 中,学习计算机操作也许很简单,但是很多计算机工作是重复性劳动,例如你每周也许需要对一些计算机文件进行复制、粘贴、改名、删除,也许你每天启动计算机第一件事情就是打开WORD,切换到你喜爱的输入法进行文本编辑,同时还要播放优美的音乐给工作创造一个舒心的环境,当然也有可能你经常需要对文本中的某些数据进行整理,把各式各样的数据按照某种规则排列起来……。
这些事情重复、琐碎,使人容易疲劳。第三方软件也许可以强化计算机的某些功能,但是解决这些重复劳动往往事倍功半,我也尝试过使用计算机语言编写程序来解决这些问题,但是随之而来的命令、语法、算法、系统框架和类库常常让我觉得这样是否有必要,难道就是因为猪毛比较难拔,所以我就要去学习机械,为自己设计一个拔猪毛机(?)吗?Vbs 是一种Windows 脚本,它的全称是:Microsoft Visual Basic Script Editon。
(微软公司可视化BASIC 脚本版),VBS 是Visual Basic 的的一个抽象子集,是系统内置的,用它编写的脚本代码不能编译成二进制文件,直接由Windows 系统执行(实际是一个叫做宿主host 的解释源代码并执行),高效、易学,但是大部分高级语言能干的事情,它基本上都具备,它可以使各种各样的任务自动化,可以使你从重复琐碎的工作中解脱出来,极大的提高工作效率。 我个人认为Vbs 脚本其实就是一种计算机编程语言,但是由于缺少计算机程序设计语言中的部分要素,对于事件的描述能力较弱,所以称为脚本,它最方便的地方就是提供了对COM 对象的简便支持。
那么什么是COM 对象呢?我这样理解,COM 对象就是一些具有特定函数功能项程序模块,他们一般以ocx 或者dll 作为扩展名,你只要找到包含有你需要的功能的模块文件,并在脚本中规范的引用,就可以实现特定的功能,也就是说Vbs 脚本就是调用现成的“控件”作为对象,用对象的属性和方法实现目的,完全免去了编写代码、设计算法等等麻烦。 说白了,我不是觉得拔猪毛麻烦么?我发觉xx 机(比如真空离心器)有一个功能可以实现脱毛,ok,我把它拿来给猪脱毛。
什么?大材小用?太浪费资源了?天哪,那是计算机芯片的事情,死道友不死贫道,反正我的事情是方便快速的解决了,这就行了。 最方便的是它甚至不需要专门的开发环境,在你的计算机中,只要有notepad,就可以编写Vbs脚本了,并且可以直接执行。
===============================Vbs 脚本编程简明教程之二—如何开始第一个Vbs 脚本?就像多数计算机教程一样,我们从“Hello World!”程序开始我们的练习。 什么?不知道是什么意思?就是说大部分的计算机程序设计教程开篇入门都是编写一个小程序,执行这个程序的结果就是在计算机的屏幕上或者dos 窗口中显示一行文字:Hello World!好了,我们开始吧。
打开你的“记事本”程序,在编辑窗口填写:msgbox "He llo World!"然后用鼠标单击“文件”菜单,单击“保存”,把“保存在”一栏设为桌面,在“文件名”一栏中填写kk。 vbs,单击“保存”就可以了。
然后最小化“记事本”窗口,在桌面上寻找你刚刚保存的kk。vbs,然后双击。
看到弹出的对话框了没有,单击“确定”,对话框消失了。难看了点,不过确实是你编写的第一个脚本程序。
说明之一:上面的操作中,保存位置放在桌面,仅仅是为了执行方便,你保存到其他的地方完全没有问题,只要你知道你保存在什么地方就可以了,什么?是废话,自己保存的当然知道保存在那里了。 不,自己保存的文件自己找不到的人我见的多了去了。
文件名你可以随意填写,不一定非要写kk,只要符合Windows 的文件命名规则就可以了,但是扩展名必须是vbs,什么?不知道什么是扩展名?就是文件名中“。 ”后的那部分,简单说,就是vbs 脚本文件命名时必须是:xxx。
vbs,其中xxx 你随意。说明之二:在记事本编辑窗口中写的这行是什么意思?Msgbox 是VBS 内建的函数,每一个函数都可以完成一定的功能,你只需要按照语法要求,在函数的相应部分填写相应的内容就可以了,这部分内容我们称为参数,当然函数执行的结果我们称为返回值,一个函数可以有返回值也可以没有,可以有参数也可以没有。
你不用了解函数是怎么运作的,只要了解这个函数能干什么就行了。Msgbox 语法:msgbox "对话框内容", , "对话框的标题"你不妨用记事本打开刚才的文件在编辑窗口中输入:msgbox "He llo World!" , , "系统提示"执行一下,看看效果和位置。
说明之三:如果执行失败,看看你的标点符号,所有的标点符号必须是在英文状态下输入的。当然,这个脚本实在是太简单了,甚至连最简单的交互都没有,所以你可以把脚本这样修改一下:Dim namename=Inputbox("请输入你的名字:","名称")Msgbox name, , "您的名字是"保存执行一下,看到弹出的对话框了么?填入你的名字,点确定,看到结果了吗?说明之一:第一句是定义变量,dim 是定义变量的语句其格式为:dim 变量1,变量2……,Vbs 只有一种变量类型,。
6.如何用VBS 将复制到粘贴板的文件添加到指定文件的第二行
Dim fsoDim objHTMLDim myfileSet fso = CreateObject("scripting.filesystemobject")Set objHTML=CreateObject("htmlfile") 'vbs难以自己访问剪切板,但是我们可以用强大的htmlfile或者internet等,调用它们的对象即可轻松访问剪切板ClipboardText = objHTML.ParentWindow.ClipboardData.GetData("text") Set myfile = fso.OpenTextFile("文件路径全名",2)'这里定义你自己的文件路径,文件一定要能用记事本读写的,不然会打不开myfile.SkipLinemyfile.Write ClipboardText '这里写你剪切板里的东西,不要拷贝一些莫名其妙的东西,比如图片啊或者带有非正式换行回车的字符串体,不然也会报错myfile.CloseSet myfile = NothingSet fso = NothingSet objHTML = Nothing具体思路就是这样,其他方面你可以自定义。
全手打。
7.VBS文件调用其他文件中的方法,该怎么解决
你在使用的php文件中,引入另外一个文件就行了。
比如我在newfile.php文件中写如下代码
1
2
3
4
5
include 'check.php';
$arr = array('a','b','c','d','e');
$num = 3;
$res = solit($arr, $num);
echo '';print_r($res);exit;
我在check.php文件中有一个solit方法,我直接引用就可以了。
转载请注明出处51数据库 » vbsword调用粘贴事件
__落花流水