|
wl00560
银牌会员
积分 1384
发帖 709
注册 2005-10-29
状态 离线
|
『楼 主』:
(已解决)如何用VBSCript输出符号?
比如我想用VBSCript在Word中输入《》这个的符号,应该如何写脚本?
[ Last edited by wl00560 on 2009-11-20 at 22:21 ]
|
|
2009-11-20 15:12 |
|
|
523066680
银牌会员
SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
『第
2 楼』:
终于看到wloo560来这边拉,虽然我不会,不过还是帮你找找资料
在 script_center.chm 电子书教程里,有关于vbs对word和excel的操作
目录为: microsoft office \ microsoft word
其中一例
Append Text to a Word Document
Description
Demonstration script that appends the current date to the existing Microsoft Word document C:\Scripts\Word\Testdoc.doc.
Quote: | Const END_OF_STORY = 6
Const MOVE_SELECTION = 0
Set objWord = CreateObject("Word.Application")
objWord.Visible = True
Set objDoc = objWord.Documents.Open("c:\scripts\word\testdoc.doc")
Set objSelection = objWord.Selection
objSelection.EndKey END_OF_STORY, MOVE_SELECTION
objSelection.TypeParagraph()
objSelection.TypeParagraph()
objSelection.Font.Size = "14"
objSelection.TypeText "" & Date()
objSelection.TypeParagraph()
objSelection.TypeParagraph()
objSelection.Font.Size = "10" |
|
|
综合型编程论坛
我的作品索引 |
|
2009-11-20 17:19 |
|
|
523066680
银牌会员
SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
『第
3 楼』:
试了一下,好像路径只能是绝对路径,刚刚用当前文件搞直接"test.doc" 出错了
|
综合型编程论坛
我的作品索引 |
|
2009-11-20 17:23 |
|
|
wl00560
银牌会员
积分 1384
发帖 709
注册 2005-10-29
状态 离线
|
『第
4 楼』:
呵呵,你好,谢谢啦……
看了一下,你这个脚本好像是如何对Word操作……
我的问题没那么复杂,我就是想用VBS输出《》这两个字符,Word也可,记事本也可,命令行也行,都没有关系……
刚才搜了一下,好像要用粘贴的办法。我现在想问的是:VBS有没有直接输出汉字或符号的函数?
|
|
2009-11-20 17:28 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
5 楼』:
WSH.Echo "《》<>汉字?"
|
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore |
|
2009-11-20 17:47 |
|
|
523066680
银牌会员
SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
『第
6 楼』:
原来是这样子呀。郁闷呢。
写入文本的话,估计还是要用文件创建对象创建文件,然后用写入对象写入了
|
综合型编程论坛
我的作品索引 |
|
2009-11-20 18:06 |
|
|
asnahu
初级用户
积分 99
发帖 53
注册 2006-8-18
状态 离线
|
『第
7 楼』:
中文的书名号?
wscript.echo chr(-24137)
wscript.echo chr(-24138)
|
|
2009-11-20 18:58 |
|
|
wl00560
银牌会员
积分 1384
发帖 709
注册 2005-10-29
状态 离线
|
『第
8 楼』:
刚才试了一下,5楼与7楼的方法只能写在对话框中……
我现在想写入文本,而不是对话框……
|
|
2009-11-20 20:48 |
|
|
523066680
银牌会员
SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
『第
9 楼』:
原来如此,就是要写入文本嘛。……………绕了好久,都是你,一开始拿
word话事而不是txt ……
set fs=createobject("scripting.filesystemobject")
set newtext=fs.createtextfile("a.txt")
newtext.write "《》"
newtext.close
-----------------------
还有就是vbs中借用cmd命令……
[ Last edited by 523066680 on 2009-11-20 at 21:46 ]
|
综合型编程论坛
我的作品索引 |
|
2009-11-20 21:43 |
|
|
wl00560
银牌会员
积分 1384
发帖 709
注册 2005-10-29
状态 离线
|
『第
10 楼』:
不好意思,我只是随便举了个例子,呵呵……
问题解决,谢谢啦……
|
|
2009-11-20 22:20 |
|