Very interesting how you solved that!

Очень интересно, как вы это решили!
Moderators: Hacker, petermad, Stefan2, white
Very interesting how you solved that!
Code: Select all
C+8=em_ExportEverythingWindow
Code: Select all
[em_ExportEverythingWindow.exe]
button=
cmd=Path\To\ExportEverythingWindow.exe
menu=Path\To\ExportEverythingWindow.exe
How will potentially new code (it is not there now, as I understand it in the current version of the script) determine whether the correct column is currently available/present in the Everything interface? Only by name, imho? But *probably* this is in my unreasonable opinion only.Perhaps you could give a specific example of what you meant exactly (so that I can understand it too)?
Have you managed to transfer the search results from Everything to Total Commander yet?
I don't understand this either. Even theoretically.with EverythingColumnPositions (default: 2,1), e.g. to “Path”, “Name, etc.(!)” WITHOUT affecting the transfer result!
The AHK script checks whether the columns “Name” and “Path” exist in Everything – I have tested this.AntonyD wrote: 2025-05-06, 20:08 UTC How will potentially new code (it is not there now, as I understand it in the current version of the script) determine
whether the correct column is currently available/present in the Everything interface? Only by name, imho?
Please take a look at this post and check the lines mentioned in the AHK script:AntonyD wrote: 2025-05-06, 20:08 UTC ... I realized that in my Russian interface I cannot achieve the desired opening of Total
with the result of the search in the Everything.
Please filter or search the script for the term “EverythingColumnPositions” (without quotation marks)...AntonyD wrote: 2025-05-06, 20:08 UTCWe can see that the code polls the value of EXACTLY these columns and from these positions.with EverythingColumnPositions (default: 2,1), e.g. to “Path”, “Name, etc.(!)”
WITHOUT affecting the transfer result!
And I have the dates of modification and creation in these positions.
Well, where do they come from: the path and the name in a such case?
Code: Select all
; Transfer Everything GUI results to TC
; Authors: Horst.Epp & Ovg
; Last modified: 04.10.2022 (Updated for TC 10.52 RC1)
; https://www.ghisler.ch/board/viewtopic.php?t=75439 ...... Open Everything GUI results with TC LOADLIST
; https://www.ghisler.ch/board/viewtopic.php?t=75417 ...... LOADLIST command and UTF8 file lists
; https://www.voidtools.com/forum/viewtopic.php?f=4&t=10594 Send ResultsList to Total Commander
; Build AutoHotkey_L
; Build x64
; Build Kill=true
; Build Zip=false
; Build Run=true
#NoEnv
;#Persistent
#SingleInstance Force
SetBatchLines, -1
; Create / read .ini file settings
SetTitleMatchMode, RegEx
iniFile := RegExReplace(A_ScriptFullPath, "(ahk|exe)$", "ini")
if not (FileExist(iniFile)) {
iniContent :="
(( LTrim
[General]
; DestinationFile
; Where to save the output (full path to DestinationFile.txt)
; EverythingColumnPositions (Default: 2,1)
; The columns 'Name' and 'Path' must be visible in the Everything GUI Window
; The first value is the position of the 'Path' column
; The second value is the position of the 'Name' column
; CloseEverything (Default 1 for yes)
; Should Everything GUI window be closed after transfering to TC
; UseInstance (Empty for default instance)
; Name of the Everything instance to be used for closing the GUI
; The contents of the following lines must be adjusted if necessary, e.g. path and parameter adjustments.
;********************************************************************************************************
DestinationFile = C:\totalcmd\EV-Results\EV-Results.txt
EverythingColumnPositions=2,1
AddEndSlash =1
CloseEverything =0
UseInstance =
Everything = C:\Everything\Everything64.exe
TotalCmd = C:\totalcmd\TOTALCMD64.EXE
;********************************************************************************************************
)"
FileAppend, % iniContent, % iniFile, UTF-16
}
IniRead, DestinationFile, % iniFile, General, DestinationFile, %A_Space%
IniRead, EverythingColumnPositions, % iniFile, General, EverythingColumnPositions, 2`,1
IniRead, AddEndSlash, % iniFile, General, AddEndSlash, 1
IniWrite, %AddEndSlash%, % iniFile, General, AddEndSlash
IniRead, CloseEverything, % iniFile, General, CloseEverything, 1
IniWrite, %CloseEverything%, % iniFile, General, CloseEverything
IniRead, UseInstance, % iniFile, General, UseInstance, %A_Space%
IniWrite, %UseInstance%, % iniFile, General, UseInstance
IniRead, Everything, % iniFile, General, Everything, "C:\Everything\Everything64.exe"
IniRead, TotalCmd, % iniFile, General, TotalCmd, "C:\totalcmd\TOTALCMD64.EXE"
DestinationFile := ResolveEnvVars(DestinationFile)
EverythingColumnPositions := StrReplace(EverythingColumnPositions, " ")
; Force error if none is given (or path doesn't exist)
SplitPath, DestinationFile, , dstPath
if (DestinationFile = "" || !InStr(FileExist(dstPath), "D")) {
Msgbox, 16, Fatal error, Destination file definition is missing or illegal named !
Return
}
if (EverythingColumnPositions = "" || !InStr(EverythingColumnPositions, ",")) {
EverythingColumnPositions := "2,1"
}
columnArray := StrSplit(EverythingColumnPositions, ",")
hWnd := WinExist("ahk_exe Everything(?:\d\d)*\.exe")
if hWnd
{
ControlGet, winContent, List, , SysListView321, % "ahk_id" hWnd
if (winContent)
{
fullContent := ""
; Loop over row(s)
Loop, Parse, winContent, `n
{
rowID := A_Index
path := ""
name := ""
full := ""
Bad := 2
; Loop over column(s)
Loop, Parse, A_LoopField, % A_Tab
{
colID := A_Index
content := A_LoopField
If (colID > columnArray[1] And colID > columnArray[2])
{
Break
}
Else
{
If (colID = columnArray[1])
{
; If !RegExMatch(content,"i)^[a-z]:|\\\.*?\\")
If !RegExMatch(content,"i)^(?:[a-z]:|\\\.*?\\)")
{
Break
}
path := content
Bad -= 1
If !RegExMatch(path,"\\$")
{
path := path . "\"
}
}
Else if (colID = columnArray[2])
{
If content is Space
{
Break
}
name := content
Bad -= 1
}
}
}
If (Bad == 0)
{
full := path . name
If InStr(FileExist(full), "D")
{
if (AddEndSlash == 1)
{
if !RegExMatch(full,"\\$")
{
full := full . "\"
}
}
Else
{
If RegExMatch(full,"\\$")
{
full := SubStr(full,1,StrLen(full)-1)
}
}
}
fullContent .= full "`n"
}
}
fullContent := RegExReplace(fullContent,"\R$","")
If (FileExist(DestinationFile))
FileDelete, % DestinationFile
FileAppend, % fullContent, % DestinationFile, UTF-16
DestinationDir := SubStr(DestinationFile,1,InStr(DestinationFile, "\",,-1))
Run %TotalCmd% /O /T /S LOADLIST:%DestinationFile%
If (CloseEverything) {
run %Everything% -instance "%UseInstance%" -close
}
}
Else
; Empty search result
{
Msgbox, 16,, Search result is Empty, Nothing to do ...
}
; No Everything window visible
} Else {
Msgbox, 16, Fatal error, Everything window does not exist!
}
SetTitleMatchMode, 1
return
; ==================================
; = GOTO: FUNCTIONS - ResolveEnvVars
; ==================================
; http://www.autohotkey.com/board/topic/40115-func-envvars-replace-environment-variables-in-text/#entry310601
ResolveEnvVars(str) {
if sz := DllCall("ExpandEnvironmentStrings", "uint", &str, "uint", 0, "uint", 0)
{
VarSetCapacity(dst, A_IsUnicode ? sz * 2 : sz)
if DllCall("ExpandEnvironmentStrings", "uint", &str, "str", dst, "uint", sz)
return dst
}
return str
}
Code: Select all
[General]
; DestinationFile
; Where to save the output (full path to DestinationFile.txt)
; EverythingColumnPositions (Default: 2,1)
; The columns 'Name' and 'Path' must be visible in the Everything GUI Window
; The first value is the position of the 'Path' column
; The second value is the position of the 'Name' column
; CloseEverything (Default 1 for yes)
; Should Everything GUI window be closed after transfering to TC
; UseInstance (Empty for default instance)
; Name of the Everything instance to be used for closing the GUI
Code: Select all
; The contents of the following lines must be adjusted if necessary, e.g. path and parameter adjustments.
;********************************************************************************************************
DestinationFile = C:\totalcmd\EV-Results\EV-Results.txt
EverythingColumnPositions=2,1
AddEndSlash =1
CloseEverything =0
UseInstance =
Everything = C:\Everything\Everything64.exe
TotalCmd = C:\totalcmd\TOTALCMD64.EXE
;********************************************************************************************************
Code: Select all
UseEverything=1
Everything=C:\Everything\Everything64.exe -startup
Code: Select all
🔲 Store settings and data in %APPDATA%\Everything
✅ Start Everything on system startup
✅ Everything Service
Code: Select all
alpha_instance=1
Code: Select all
<IF:$result-count:==1,"1 item",<TEXT:$result-count:,"#,###"> items> (<TEXT:$file-result-count:,"#,###"> files, <TEXT:$folder-result-count:,"#,###"> folders)
Code: Select all
1 item (1 of [if:$folder-selection-count:,[text:$folder-result-count:,"#,###"] folders,[text:$file-result-count:,"#,###"] files])[if:$file-selection-count:," | Extension: "$extension:] | Size:$s | Date Modified: $m | Date Created: $c | Date Accessed: $a | Path: $f
Code: Select all
Selected <IF:$selection-count:==$result-count:,"all",<TEXT:$selection-count:,"#,###"> of> <TEXT:$result-count:,"#,###"> items (<IF:$file-result-count:,<IF:$file-selection-count:==$file-result-count:,"all",<TEXT:$file-selection-count:,"#,###"> of> <TEXT:$file-result-count:,"#,###">,no> files, <IF:$folder-result-count:,<if:$folder-selection-count:==$folder-result-count:,"all",<TEXT:$folder-selection-count:,"#,###"> of> <TEXT:$folder-result-count:,"#,###">,no> folders) | Size: <IF:$total-selection-size:!=$total-result-size:,<FORMATSIZE:$total-selection-size:,0> of ><FORMATSIZE:$total-result-size:,0><IF:$total-result-size:<=1024, (<if:$total-selection-size:!=$total-result-size:,<TEXT:$total-selection-size:,"#,###" of ><TEXT:$total-result-size:,"#,###" bytes)>
Code: Select all
$s?{$s - }$v$i?{ - ($i)}[if:isadmin:," - [Administrator]"]
Code: Select all
$s?{$s }$f?{$f }$t$i?{ ($i)} [if:isadmin:,"[Administrator]"]
Code: Select all
$t $v$i?{ - ($i)}#if:<#isadmin:, - [Administrator]>
Code: Select all
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Tools\AutoHotkey\Skripte\EV_SearchResults_to_TC-panel\SEND_EV-RESULTS_to_TC-panel_(A)_CloseEverything-0_TAB-Search_result_(A).exe
%COMMANDER_PATH%\Tools\AutoHotkey\Skripte\EV_SearchResults_to_TC-panel\SEND_EV-RESULTS_to_TC-panel_(A)_CloseEverything-0_TAB-Search_result_(A).exe
Compiled AHK script 4.10.2022 || Send EV search results to TC|WITHOUT View mode || Run %TotalCmd% /O /T /S LOADLIST:%DestinationFile%|Tab "Search result:" in TC || Everything window remains open|https://www.ghisler.ch/board/viewtopic.php?p=471285#p471285
%COMMANDER_PATH%\Tools\AutoHotkey\Skripte\EV_SearchResults_to_TC-panel\
-1
Code: Select all
TOTALCMD#BAR#DATA
%COMMANDER_EXE% /O /T /S LOADLIST:%COMMANDER_PATH%\EV-Results\EV-Results.txt
wciconex.dll,3
ATTENTION: Only the CONTENT of EV-Results.txt is displayed with this button!!!|Before that, the search result must be transferred from EV to TC via AHK script!|%COMMANDER_EXE% /O /T /S LOADLIST:%COMMANDER_PATH%\EV-Results\EV-Results.txt
-1
Code: Select all
TOTALCMD#BAR#DATA
cmd /c copy
%L c:\temp\TC_list_A.txt
WCMICON2.DLL,28
-1
Code: Select all
TOTALCMD#BAR#DATA
cmd /c copy
%WL c:\temp\TC_list_W.txt
WCMICON2.DLL,28
-1