Mayskii
|
 Posted: Mon Sep 25, 2006 11:03 Post subject: |
 |
|
Люди подскажите как сделать комментарий для сразу нескольких файлов.Вот что у меня получилось:
| Code: |
'==========================================================================
'
' VBScript Source File -- Created with SAPIEN Technologies PrimalScript 4.0
'
' NAME: GroupDescription.vbs
'
' AUTHOR: Artem Mayskii
' DATE : 25.09.2006
'
' COMMENT: Групповое создание комментариев
'
'==========================================================================
Option Explicit
Dim TCS, CopyFClip, Sel, FSO, TextStream, Clip, Descript, Sp
Set TCS = CreateObject("TCScript.Helper")
Sp = " "
Descript = "Описание"
Sel = TCS.GetSrcSelectedFiles(-1)
TCS.SendCommand("cm_CopyNamesToClip")
Clip = TCS.GetTextFromClip
Set FSO = CreateObject("Scripting.FileSystemObject")
Set TextStream = FSO.CreateTextFile("C:\descript.ion")
TextStream.WriteLine Clip & Descript
|
Но опять же комментарий создаётся только для одного файла  .
Что нужно ещё дописать?
P.S Кто нибудь обязательно спросит а что это за странная переменная Sp ?! 
Поскольку я не знаю как делать пробелы, я создал такую переменную но её я в скрипте ещё не задействовал. |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
