JavaScript отключён. Чтобы полноценно использовать наш сайт, включите JavaScript в своём браузере.

Ответить в теме

Сообщение: [QUOTE="vavun, post: 222977, member: 7888"] Закон подлости: по факту нужен только DuckDuckGo, и именно он не работает, как нужно ) Еще хотел спросить: а для чего [code]"explorer ""https://google.ru/search?ie=UTF-8&hl=ru&q=" & Arg & """"[/code] А не просто [code]"https://google.ru/search?ie=UTF-8&hl=ru&q=" & Arg & ""[/code] ? Так оно даже отзывается немного шустрее Вопрос с duckduckgo решил при помощи [COLOR=#0000ff]LCase[/COLOR] [code=vbnet] On Error Resume Next if WScript.Arguments.Count = 0 then WScript.Quit Arg = WScript.Arguments(0) Arg = LCase(Arg) Arg = Mid(Arg, InStrRev(Arg, "\") + 1) Arg = Replace(Arg, " ", "%20") set ShellApp = CreateObject("Shell.Application")'*/ CreateObject("WScript.Shell").Run "https://duckduckgo.com/?q=" & Arg & "" [/code] [/QUOTE]