急求：如何使用replace将正文中的"替换成＂
正文中有",就会出现"处理URL时服务器出错",所以想替换成全角的＂,请指点,谢谢
一下是在这个论天里面看到的别人发的文章，这次贴出来，希望不会影响版权问题 
dim qu(9)
dim bu(9)
qu(0)="１"
qu(1)="２"
qu(3)="３"
qu(3)="４"
qu(4)="５"
qu(5)="６"
qu(6)="７"
qu(7)="８"
qu(8)="９"
qu(9)="０"
dim qu(9)
dim bu(9)
qu(0)="１"
qu(1)="２"
qu(3)="３"
qu(3)="４"
qu(4)="５"
qu(5)="６"
qu(6)="７"
qu(7)="８"
qu(8)="９"
qu(9)="０"
bu(0)="1"
bu(1)="2"
……………
这里就省略了
bu(9)="0"
Dim i
For i=0 to 9
replace(str,qu(i),bu(i))
Next
这样就可以了！！！
bu(1)="2"
……………
这里就省略了
bu(9)="0"
Dim i
For i=0 to 9
replace(str,qu(i),bu(i))
Next
这样就可以了！！！
