Batya

|
Posted: Wed Sep 23, 2009 15:23 Post subject: |
|
|
sa wrote: | Может сценарий тоже можно "прикрутить" к дереву каталогов, а не к файловой панели, чтобы вызывать его не несколько раз, а однократно? |
Code: | '===========================================================
' Помещает в буфер обмена строки из файла-списка,
' переданного первым параметром, как единую строку
' разделенную значением второго параметра
'===========================================================
Option Explicit
Dim TCS, FSO
Set TCS = CreateObject("TCSCRIPT.Helper")
Set FSO = CreateObject("Scripting.FileSystemObject")
TCS.SetTextToClip Replace(FSO.OpenTextFile(WScript.Arguments(0)).ReadAll, vbNewLine, WScript.Arguments(1))
Set TCS = Nothing
Set FSO = Nothing |
Для данного случая параметры: _________________ Нет, я не сплю. Я просто медленно моргаю. |
|