an Textfenster anhängen

1332
user1603548

Ich möchte kleine Textausschnitte an TXT-Dateien anhängen.

Wenn jemand ein System dafür hat, können Sie es gerne posten. Ich versuche es zu schaffen.

Unter http://sourceforge.net/p/launchy/discussion/451015/thread/abba414b gab es eine Diskussion über Launchy (die ich bereits verwendet habe - perfekt).

Sie fügen ein VBS-Skript zu einem Ordner hinzu, den Launchy indiziert, und klicken Sie dann einfach auf

am tab "meine dinge in der datei" eintragen

und die Arbeit ist erledigt.

Hier kommt Scritps

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 

Problem : Ich brauche die Qoutes um meinen Eintrag. Wäre besser, wenn ich nicht hätte.

Ich fand dieses Skript nach:

  1. googeln Textfenster anhängen
  2. Lesen http://lifehacker.com/284127/take-launchy-beyond-application-launching
  3. Lesen http://benkraal.wordpress.com/2007/05/16/launchy-append-text-to-a-file-from-anywhere/
  4. Landung auf der oben verlinkten Sourceforge-Diskussion

Bonus, wenn ich den Pfad der TXT-Datei ändern kann, z. B. von \ Dropbox \ FolderA zu \ Dropbox \ FolderB, und das Skript bleibt erhalten.

1
Ich habe launchy nicht so oft benutzt, da es mir anscheinend fehlte, Dinge zu indexieren, die ich brauchte, als ich es versuchte. Sie sollten jedoch wissen, dass "echo linetoappend >> c: \ blah \ file.txt" ein Befehl ist, den Sie von cmd ausführen können (start ... run..cmd), das eine Zeile an eine Datei anfügt. barlop vor 9 Jahren 0
Möglicherweise möchten Sie, dass die vbs-Datei zwei Parameter übernimmt, von denen einer der Dateiname und der andere die anzuhängende Zeile ist. Die Person an diesem Link wollte nur einen Parameter, also mehrere Skripts mit unterschiedlichen Namen, die jeweils einen Parameter enthalten. Er schrieb auch einen mit zwei Parametern. barlop vor 9 Jahren 0
Dieser Link hat den Pfad `strTextFile =" C: \ home \ todo.txt ". Es ist nicht klar, was Sie dort ändern möchten. Ändere es einfach barlop vor 9 Jahren 0

1 Antwort auf die Frage

0
JosefZ

Um doppelte Anführungszeichen um Ihren Eintrag zu vermeiden, dh at my things in the fileanstelle von at "my things in the file"Sie zu schlagen, können Sie anstelle von Folgendes Code-Snippet verwenden objFile.WriteLine objArgs(0):

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