2022年5月
1 2 3 4 5 6 7
8 9 10 11 12 13 14
15 16 17 18 19 20 21
22 23 24 25 26 27 28
29 30 31        
無料ブログはココログ

« VBScriptのReplace()関数は、チョー遅い! | トップページ | VBScriptのReplace()関数の代替関数を作る。 »

2008年5月 2日 (金)

VBScriptのReplace()関数の代替にJScriptを使う。

ScriptControl経由でJScriptのStringオブジェクトのreplace()メソッドを使う。

a=String(1024*1024,"a")
t1=Timer
Set sc=CreateObject("ScriptControl")
sc.Language="JScript"
sc.AddCode "function replace(s,p,r){return s.replace(p,r);}"
b=sc.CodeObject.replace(a,"a","b")
MsgBox Timer-t1
' 0.625

わざわざ使うほどのことはないですが、HTMLやWSFなどならいいかも。

« VBScriptのReplace()関数は、チョー遅い! | トップページ | VBScriptのReplace()関数の代替関数を作る。 »