vbScript 的简单问题:如何在window_onload中调整object 的宽度？？

[y_h_song]

程序如下：
<object id=ch1 classid=CLSID:0002E500-0000-0000-C000-000000000046 style="width:49%;height:350" VIEWASTEXT></object>
<script language=vbs>
sub window_onload()
...
...
end
</script>
我想在window_onload事件中来动态调整"ch1"的宽度，应该怎么写语句啊？？
我这样写不行啊：
ch1.width=200%或者ch1.width=1000
谢谢高手支招！！

[y_h_song]

在线等待啊!!!好心人支下招吧!

[y_h_song]

补充一下：
sub window_onload()
dim recordNums '数据库记录的个数
...
...
end
我想通过变量recordNums的大小来调整"ch1"对象的宽度：如果recordnums＜２０，则
让宽度显示占页面的100%
否则每增加一个记录：则显示宽度为：100%+5%，
具体怎样写代码呢？
谢谢！

[y_h_song]

没人知道??