如何接受来自vbscript的字符数据列表(100分)

在vbscript中传递一个字符数据列表到delphi制作的automation中，在type libray的方法设置中，参数类型选哪个？

VBSCRIPT如下：
<script language="VBScript">
'Great thanks to Vladimir Romanov(Author of ReGet Pro)

On Error Resume Next
set JetCarCatch=CreateObject("JetCar.Netscape")
if err<>0 then
MsgBox("FlashGet not properly installed!"+ vbCrLf+"Please Install FlashGet again")
else
set links = external.menuArguments.document.links
ReDim params(links.length*2)
params(0)=external.menuArguments.document.Url
for i = 0 to links.length-1
params(i*2+1)=links(i).href
params(i*2+2)=links(i).innerText
next
JetCarCatch.AddUrlList params
end if
</script>
谢谢！

olevariant

谢谢~ trying...