Показать сообщение отдельно
Старый 27.05.2004, 13:58     # 1
djon72
Guest
 
Сообщения: n/a

VB: Скрипт выдает ошибку

Господа спецы, выручайте! Скрипт от Мангуста для передачи закачки флэшгет для оперы выдает ошибку. В чем проблема? Текст ниже:

Dim desc
desc=""
ref=""
if WScript.Arguments.Count>1 then
desc=WScript.Arguments(1)
end if
if WScript.Arguments.Count>2 then
ref=WScript.Arguments(2)
end if
AddLink WScript.Arguments(0), desc, ref

Sub AddLink(ByVal Url, ByVal Info, ByVal Refer)
set JetCarCatch=CreateObject("JetCar.Netscape")
JetCarCatch.AddUrl Url, Info, Refer
end sub