Показать полную графическую версию : [решено] VBS: Объединение аргументов в одну строку
Привет, такая задача.
Вот у меня есть скрипт, и я его запускаю с разным количеством аргументов.
Cnt = WScript.Arguments.Count
For i = 0 To Cnt - 1
MsgBox WScript.Arguments(i)
'sss = Array(WScript.Arguments(i))
'ddd = join(sss)
' MsgBox ddd
Next
Как мне объединить весь этот массив аргументов в одну строку?
Как мне объединить весь этот массив аргументов в одну строку? »
Это не массив, это коллекция. А зачем объединять в одну строку?
Option Explicit
Dim strArgument, strArguments
strArguments = ""
For Each strArgument In WScript.Arguments
strArguments = strArguments & " " & strArgument
Next
strArguments = Mid(strArguments, 2)
WScript.Echo "[" & strArguments & "]"
WScript.Quit 0
Iska, да вот сегодня появилась задача, и тут я забуксовал. Это всего лишь, часть скрипта.
Спасибо, за помощь.
Паразит, дык, зачем? Интересно. Мне, вот, как-то ни разу не понадобилось.
Я хочу создать скрипт, чтобы переносить папки с определёнными условиями.
И мне нужны были имена этих папок, чтобы конструировать строку, куда я хотел их перемещать.
Паразит, покажете здесь потом?
Честно говоря, задача уже неактуальна. Я решил по другому делать.
Ещё раз, спасибо, Вам за помощь.
© OSzone.net 2001-2012
vBulletin v3.6.4, Copyright ©2000-2025, Jelsoft Enterprises Ltd.