добавить в текстовые окна

1261
user1603548

Я хочу добавить небольшие фрагменты текста в текстовые файлы.

Если у кого-то есть система для этого, не стесняйтесь опубликовать ее. Я пытаюсь создать это.

На http://sourceforge.net/p/launchy/discussion/451015/thread/abba414b было обсуждение этого вопроса с использованием Launchy (который я уже использовал - отлично).

Вы добавляете скрипт vbs в папку, которую индексирует Launchy, а затем просто нажимаете

на вкладке "мои вещи в файле" введите

и работа сделана.

Скриптс приходит сюда

at.vbs

Const ForAppending = 8 Dim strTextFile Set objArgs = WScript.Arguments strTextFile = "C:\home\todo.txt" Set objFSO = CreateObject("Scripting.FileSystemObject") If objFSO.FileExists(strTextFile) Then Set objFile = objFSO.OpenTextFile(strTextFile, ForAppending) Else Set objFile = objFSO.CreateTextFile(strTextFile) End If objFile.WriteLine objArgs(0) objFile.Close

Проблема : мне нужны квоты вокруг моего входа. Было бы лучше, если бы я этого не сделал.

Я нашел этот скрипт после:

  1. поиск в Google Добавить текстовые окна
  2. чтение http://lifehacker.com/284127/take-launchy-beyond-application-launching
  3. чтение http://benkraal.wordpress.com/2007/05/16/launchy-append-text-to-a-file-from-anywhere/
  4. посадка на обсуждение Sourceforge, связанное выше

Бонус, если я могу изменить путь к текстовому файлу, скажем, с \ Dropbox \ FolderA на \ Dropbox \ FolderB и сценарий по-прежнему не поврежден.

1
Я не пользовался стартапом так, как мне казалось, он упускал индексирование того, что мне было нужно, когда я его пробовал Но вы должны знать, `echo linetoappend >> c: \ blah \ file.txt` - это команда, которую вы можете запустить из cmd (start ... run..cmd) который добавляет строку в файл. barlop 9 лет назад 0
Возможно, вы захотите, чтобы файл vbs принимал 2 параметра, один из которых является именем файла, а другой - строкой для добавления. Человек по этой ссылке хотел иметь только один параметр, и поэтому несколько сценариев с разными именами, каждый из которых принимает один параметр. Он также написал один с двумя параметрами. barlop 9 лет назад 0
Эта ссылка имеет путь `strTextFile =" C: \ home \ todo.txt "`, не ясно, что вы хотите изменить там. Просто поменяй barlop 9 лет назад 0

1 ответ на вопрос

0
JosefZ

To elude double quotes around your entry, i.e. to hit at my things in the file instead of at "my things in the file" you may use next code snippet in place of objFile.WriteLine objArgs(0):

strResult = "" For ii = 0 to objArgs.Count - 1 strResult = strResult & CStr( objArgs( ii)) & Space( 1) Next objFile.WriteLine Rtrim( strResult)

Похожие вопросы