你的方法能够输出正确的数据!
但是:
new array("值1","值2")
在"值1"的后面有一个逗号,在值2的后面没有逗号,这个怎么实现呢?

str=Replace(str,",_ITEMA","")
str=Replace(str,",_ITEMB","")

最后两句把最后一个值后面的逗号去掉了

双引号的版本：另外说明点，javascript里面，双引号和单引号都可以用来表示字符串，所以没必要一定要用双引号。这里用单引号表示反而比较清晰
str="sendRPCDone(frameElement,""adsf"",new Array(,_ITEMA),new Array(,_ITEMB),new Array(""""))"
do until rs.eof
   str=Replace(str,",_ITEMA",""""+rs("spbh")+""",_ITEMA")
   str=Replace(str,",_ITEMB",""""+rs("spmch")+""",_ITEMB")
   rs.moveNext
loop
str=Replace(str,",_ITEMA","")
str=Replace(str,",_ITEMB","")

说明：在VBScript里，如果需要在字符串表达式里书写双引号，就是这样写成两个双引号""，类似是javascript里的转义字符\"

[此贴子已经被作者于2006-10-20 18:19:24编辑过]

真是太谢谢你啦，，，偶像！