vbs 使用 微软word中的range（对象或属性），总是出错，高手请回答

set objword=createobject("word.application")
objword.visible=true
set objdoc=objword.documents.open("c:\1.doc")
objword.activedocument.rang( (Start:=0, End :=ActiveDocument. Words(2). End)) .bole=ture
说明：c:\1.doc 是一个word文档。执行此程序总是提示出错，本次提示：第4行36字符缺少），烦请高手解答。
我觉得从vba转到vbs总是没有办法处理range的函数的属性问题，谁知道有处理办法吗？