Relative path column in branch view
Moderators: white, Hacker, petermad, Stefan2
Relative path column in branch view
The branch view is quite great to find the most recently updated files in a large tree. I use it quite often.
What i would like to have is a custom column view that shows me the relative path of the files. I can show the path, but i can't seem to find the relative path in any plugin. (it already shows in the taskbar for one file, so it should be possible...)
Any ideas?
TIA!
What i would like to have is a custom column view that shows me the relative path of the files. I can show the path, but i can't seem to find the relative path in any plugin. (it already shows in the taskbar for one file, so it should be possible...)
Any ideas?
TIA!
Calvin
-----------------
Disclaimer: Any errors in spelling, tact, or fact are transmission errors.
-----------------
Disclaimer: Any errors in spelling, tact, or fact are transmission errors.
try Script Content plugin
-------
'fullpath.vbs
content=filename
--------
script.ini
[Script]
Section=fullpath
[fullpath]
Script=fullpath.vbs
LongName=1
-------
'fullpath.vbs
content=filename
--------
script.ini
[Script]
Section=fullpath
[fullpath]
Script=fullpath.vbs
LongName=1
Don't know why the forum don't like my posting, but if I try to send it, I get only the short message
"Please visit our site www.ghisler.com!" .
So I have UUE-encoded it ... Sorry for the inconvenience:
"Please visit our site www.ghisler.com!" .
So I have UUE-encoded it ... Sorry for the inconvenience:
Code: Select all
begin 644 RelPath_Posting.txt
M3&5V)W,@<V-R:7!T(&=I=F5S('1H92!A8G-O;'5T92!F:6QE<&%T:"!A<R!R
M97-U;'0N($DG86T@869R86ED+"!T:&%T(&ET(&ES('-O;65W:&%T(&-O;7!L
M:6-A=&4@=&\@9V5T('1H92!R96QA=&EV92!P871H(&EN(&$@8W5S=&]M(&-O
M;'5M;B!I;B!B<F%N8V@@=FEE=RX@2&5R92!I<R!O;F4@<V]L=71I;VXN+BX@
M:70@=V]R:W,L(&)U="!I="!I<R!F87(@9G)O;2!B96EN9R!N:69T>3H-"@T*
M6V)=4')E8V]N9&ET:6]N<ULO8ET-"@T*6V)=,&$N6R]B72!(879E('1H92!4
M0W-C<FEP="!A9&1O;B!I;G-T86QL960N#0H-"EMB73!B+ELO8ET@2&%V92!T
M:&4@4V-R:7!T5T18('!L=6=I;B!I;G-T86QL960N#0H-"@T*6V)=26YS=&%L
M;&%T:6]N6R]B70T*#0I;8ETQ+ELO8ET@4V%V92!T:&ES(&)A=&-H(&9O<B!$
M3U,@=&\@/%)E;%!A=&@N8F%T/CH-"EMC;V1E74!%8VAO($]&1@T*16-H;R`E
M,3Y#.EQT;7!<4F5L4&%T:%)O;W0N='AT#0I#.EQ0<F]G<F%M;65<5&]T86Q#
M;61<5&]O;'-<5$-38W)I<'1<5$-38W)I<'0N97AE("]R=6X@0SI<4')O9W)A
M;6UE7%1O=&%L0VUD7%1O;VQS7%1#4V-R:7!T7%-C<FEP='-<4F5L4&%T:"YT
M8W-;+V-O9&5=#0I0<F]B86)L>2!Y;W4@;75S="!C:&%N9V4@=&AE('!A=&AS
M('1O(#Q40W-C<FEP="YE>&4^(&%N9"!T;R!Y;W5R(#Q38W)I<'1S7#X@9&ER
M96-T;W)Y+@T*#0I;8ETR+ELO8ET@4V%V92!T:&ES('-C<FEP="!F;W(@5$-S
M8W)I<'0@=&\@/%)E;%!A=&@N=&-S/CH-"EMC;V1E72\O(%!O<W1#;60H8VU?
M4W)C0W5S=&]M5FEE=TXI(&1O97-N)W0@=V]R:R!F;W(@3CXY#0HO+R!C;5]3
M<F-#=7-T;VU6:65W.3TR.#([(%-O=7)C93H@0W5S=&]M(&-O;'5M;G,@,3(-
M"@T*4&]S=$-M9"@R.#(I.PT*4&]S=$-M9"AC;5]$:7)"<F%N8V@I.ULO8V]D
M95T-"E!R;V)A8FQY('EO=2!M=7-T(&-H86YG92!T:&4@;G5M8F5R(&]F('1H
M92!C;VUM86YD+B`H06-C;W)D:6YG('1O('1H92!N=6UB97(@;V8@=&AE(&-U
M<W1O;2!C;VQU;6X@<V5T+"!W:&EC:"!Y;W4@;&EK92!T;R!U<V4@:6X@8G)A
M;F-H('9I97<@86YD('=H:6-H('=I;&P@8V]N=&%I;B!A(&-O;'5M;B!F;W(@
M=&AE(%-C<FEP=%=$6"!R97-U;'0N*0T*#0I;8ETS+ELO8ET@4V%V92!T:&ES
M('-C<FEP="!F;W(@4V-R:7!T5T18('1O(#Q296Q0871H+G9B<SXZ#0I;8V]D
M95U$:6T@9G-O+"!F#0H-"E-E="!F<V\@/2!#<F5A=&5/8FIE8W0H(E-C<FEP
M=&EN9RY&:6QE4WES=&5M3V)J96-T(BD-"E-E="!F(#T@9G-O+D=E=$9I;&4H
M(D,Z7'1M<%Q296Q0871H4F]O="YT>'0B*0T*#0IR96QP871H(#T@;&5F="AF
M:6QE;F%M92P@;&5N*&9I;&5N86UE*2`M(&QE;BAF<V\N1V5T1FEL94YA;64H
M9FEL96YA;64I*2D-"G)E;'!A=&@@/2!-:60H<F5L<&%T:"P@9BYS:7IE("T@
M,2D-"F-O;G1E;G0@/2!R96QP871H#0H-"E-E="!F<V\];F]T:&EN9PT*4V5T
M(&8];F]T:&EN9ULO8V]D95T-"@T*6V)=-"Y;+V)=($-R96%T92!A(&)U='1O
M;B!I;B!Y;W5R(&)U='1O;B!B87(Z#0I;8V]D95U#;VUM86YD.B!#.EQ0<F]G
M<F%M;65<5&]T86Q#;61<4&QU9VEN<UQ38W)I<'171%A<4F5L4&%T:"YB870-
M"E!A<F%M971E<CH@)5!;+V-O9&5=#0I0<F]B86)L>2!Y;W4@;75S="!C:&%N
M9V4@=&AE('!A=&@@=&\@/%)E;%!A=&@N8F%T/BX-"@T*6V)=-2Y;+V)=($%D
M9"!A(&-O;'5M;B!W:71H(&-O;G1E;G0@(EL]<V-R:7!T+G)E<W5L=%TB('1O
M('1H92!C=7-T;VT@8V]L=6UN('-E="P@=VAI8V@@>6]U(&QI:V4@=&\@=7-E
M(&9O<B!B<F%N8V@@=FEE=R`H86YD('=I8V@@>6]U(&AA=F4@<F5F97)E9"!I
M;B`\4F5L4&%T:"YT8W,^("AS=&5P(#(N*2DN(`T*#0H-"EMB755S86=E6R]B
M70T*#0I#;&EC:R!T:&4@8G5T=&]N+"!W:&EC:"!Y;W4@:&%V92!C<F5A=&5D
M(&EN('-T97`@-"X-"@T*#0I;8EU%>'!L86YA=&EO;ELO8ET-"@T*5&AE(&)U
M='1O;B!C86QL<R!T:&4@1$]3(&)A=&-H(#Q296Q0871H+F)A=#XN(%1H:7,@
M8F%T8V@@=W)I=&5S('1H92!N86UE(&]F('1H92!C=7)R96YT('!A=&@@*"50
M*2!T;R!T:&4@9FEL92`\4F5L4&%T:%)O;W0N='AT/B!A;F0@8V%L;',@=&AE
M(%1#<V-R:7!T('-C<FEP="`\4F5L4&%T:"YT8W,^+@T*#0H\4F5L4&%T:"YT
M8W,^('-E=',@=&AE('9I97<@=&\@>6]U<B!P<F5F97)E9"!C=7-T;VT@8V]L
M=6UN('9I97<@86YD('-W:71C:&5S('1O(&)R86YC:"!V:65W+@T*#0H\4F5L
M4&%T:"YV8G,^(&ES="!A=71O;6%T:6-A;&QY(&-A;&QE9"!F;W(@96%C:"!E
M;G1R>2!I;B!T:&4@8G)A;F-H('9I97<N#0I)="!G971S('1H92!F=6QL(&9I
M;&5P871H("A[1')I=F4Z7%)O;W10871H7%!A=&A<1FEL92Y%>'1]+"!A=F%I
M;&%B;&4@:6X@(F9I;&5N86UE(BDL#0IC=71S(&]F9B!T:&4@9FEL96YA;64@
M*'M&:6QE+D5X='TL(&1O;F4@=VET:"!F:7)S="!L:6YE(&EN(#Q296Q0871H
M+G9B<SX@8F5G:6YN:6YG('=I=&@@(G)E;'!A=&@@/2`N+BXB*2P-"F-U=',@
M;V9F('1H92`B<F]O="(@<&%T:"`H>T1R:79E.EQ2;V]T4&%T:%Q]+"!D;VYE
M('=I=&@@<V5C;VYD(&QI;F4@8F5G:6YN:6YG('=I=&@@(G)E;'!A=&@@/2`N
M+BXB*2!A;F0-"G)E='5R;G,@=&AE(')E;&%T:79E('!A=&@@>U!A=&A<?2!T
6;R!T:&4@8W5S=&]M(&-O;'5M;BX-"@``
`
end
sum -r/size 62069/2632
You did use the very nasty string "Root dot txt", so I took the freedom to change the extension .txt to .lst what should work the same way (Please correct me if I'm wrong) and quoted your post here for better readability of this thread:van Dusen wrote:Don't know why the forum don't like my posting, but if I try to send it, I get only the short message
"Please visit our site www.ghisler.com!" .
Hope that someone soon will teach that security robot.Lev's script gives the absolute filepath as result. I'am afraid, that it is somewhat complicate to get the relative path in a custom column in branch view. Here is one solution... it works, but it is far from being nifty:
Preconditions
0a. Have the TCscript addon installed.
0b. Have the ScriptWDX plugin installed.
Installation
1. Save this batch for DOS to <RelPath.bat>:Probably you must change the paths to <TCscript.exe> and to your <Scripts\> directory.Code: Select all
@Echo OFF Echo %1>C:\tmp\RelPathRoot.lst C:\Programme\TotalCmd\Tools\TCScript\TCScript.exe /run C:\Programme\TotalCmd\Tools\TCScript\Scripts\RelPath.tcs
2. Save this script for TCscript to <RelPath.tcs>:Probably you must change the number of the command. (According to the number of the custom column set, which you like to use in branch view and which will contain a column for the ScriptWDX result.)Code: Select all
// PostCmd(cm_SrcCustomViewN) doesn't work for N>9 // cm_SrcCustomView9=282; Source: Custom columns 12 PostCmd(282); PostCmd(cm_DirBranch);
3. Save this script for ScriptWDX to <RelPath.vbs>:4. Create a button in your button bar:Code: Select all
Dim fso, f Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFile("C:\tmp\RelPathRoot.lst") relpath = left(filename, len(filename) - len(fso.GetFileName(filename))) relpath = Mid(relpath, f.size - 1) content = relpath Set fso=nothing Set f=nothing
Probably you must change the path to <RelPath.bat>.Code: Select all
Command: C:\Programme\TotalCmd\Plugins\ScriptWDX\RelPath.bat Parameter: %P
5. Add a column with content "[=script.result]" to the custom column set, which you like to use for branch view (and wich you have refered in <RelPath.tcs> (step 2.)).
Usage
Click the button, which you have created in step 4.
Explanation
The button calls the DOS batch <RelPath.bat>. This batch writes the name of the current path (%P) to the file <RelPathRoot.lst> and calls the TCscript script <RelPath.tcs>.
<RelPath.tcs> sets the view to your prefered custom column view and switches to branch view.
<RelPath.vbs> ist automatically called for each entry in the branch view.
It gets the full filepath ({Drive:\RootPath\Path\File.Ext}, available in "filename"),
cuts off the filename ({File.Ext}, done with first line in <RelPath.vbs> beginning with "relpath = ..."),
cuts off the "root" path ({Drive:\RootPath\}, done with second line beginning with "relpath = ...") and
returns the relative path {Path\} to the custom column.
sheepdog
"A common mistake that people make when trying to design something
completely foolproof is to underestimate the ingenuity of complete fools."
Douglas Adams
completely foolproof is to underestimate the ingenuity of complete fools."
Douglas Adams
Ich bin in einer finst'ren Sekte,
die in mir die Erkenntnis weckte,
dass unsre kurze Daseinsfrist
mehr Spaß macht, wenn man böse ist...
I didn't know about this potential security hole, which could be exploited by using "nasty words"
Sheepdog, thank you very much for cleaning up my posting and your assistance!
die in mir die Erkenntnis weckte,
dass unsre kurze Daseinsfrist
mehr Spaß macht, wenn man böse ist...
I didn't know about this potential security hole, which could be exploited by using "nasty words"
Sheepdog, thank you very much for cleaning up my posting and your assistance!
It seems there is a robot who tries to find hacking scripts by their usage of 'nasty words'. So once you could prevent your posting from being saved by using "ftp=". If you know about it you can deal with it. But it's really annoying.van Dusen wrote:I didn't know about this potential security hole, which could be exploited by using "nasty words"
You're welcome.Sheepdog, thank you very much for cleaning up my posting and your assistance!
sheepdog
BTW nice lyrics.
"A common mistake that people make when trying to design something
completely foolproof is to underestimate the ingenuity of complete fools."
Douglas Adams
completely foolproof is to underestimate the ingenuity of complete fools."
Douglas Adams
- majkinetor
- Senior Member
- Posts: 369
- Joined: 2005-11-20, 10:36 UTC
- Location: Belgrade, Serbia
- Contact:
Now I understood what is a relative path
Here is one more variant of a script for Script content plugin, it uses the Script Helper beta10 for it's work.
Here is one more variant of a script for Script content plugin, it uses the Script Helper beta10 for it's work.
Code: Select all
'relpath.vbs
Dim fso, f, tcs
Set fso = CreateObject("Scripting.FileSystemObject")
Set tcs = CreateObject("TCScript.Helper")
f = tcs.GetSrcPath
relpath = left(filename, len(filename) - len(fso.GetFileName(filename)))
relpath = Mid(relpath, Len(f)+1)
content = relpath
Set fso=nothing
Set tcs=nothing