| View previous topic :: View next topic | 
	
	
		| Author | Message | 
	
		| Flasher 
 
  
 Joined: 06 Nov 2009
 Posts: 14229
 Location: Москва
 
 | 
			
				|  (Separately) Posted: Sun Apr 19, 2015 18:59    Post subject: |   |  
				| 
 |  
				| Он как раз отрабатывает, а не просто висит. Сравнивать только файлы в корнях - это для чего? Неужели ты отображаешь файлы без подкаталогов в корне? 	  | LonerD wrote: |  	  | Сейчас проверил - на корне не отрабатывает (висит в процессах). | 
 _________________
 Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| hjiapex 
 
 
 Joined: 16 Apr 2015
 Posts: 35
 
 
 | 
			
				|  (Separately) Posted: Tue Apr 21, 2015 14:46    Post subject: |   |  
				| 
 |  
				| Тут еще одна проблема возникла. Почему то на WinХР скрипт не работает, при использовании ничего не происходит. |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| Flasher 
 
  
 Joined: 06 Nov 2009
 Posts: 14229
 Location: Москва
 
 | 
			
				|  (Separately) Posted: Tue Apr 21, 2015 14:52    Post subject: |   |  
				| 
 |  
				| Она не возникла. Я знал про неё.   Ссылка здесь уже приводилась.
 _________________
 Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| hjiapex 
 
 
 Joined: 16 Apr 2015
 Posts: 35
 
 
 | 
			
				|  (Separately) Posted: Tue Apr 21, 2015 15:13    Post subject: |   |  
				| 
 |  
				| Ссылочка битая похоже, можно перезалить clip? |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| Flasher 
 
  
 Joined: 06 Nov 2009
 Posts: 14229
 Location: Москва
 
 | 
			
				|  (Separately) Posted: Tue Apr 21, 2015 15:35    Post subject: |   |  
				| 
 |  
				| На младших версиях в папке system32 лежит. _________________
 Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| hjiapex 
 
 
 Joined: 16 Apr 2015
 Posts: 35
 
 
 | 
			
				|  (Separately) Posted: Wed Apr 22, 2015 15:40    Post subject: |   |  
				| 
 |  
				| Если вы имеете в виду windows/system32 то в моей ХП такого файла нет (clip.exe) |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| Flasher 
 
  
 Joined: 06 Nov 2009
 Posts: 14229
 Location: Москва
 
 | 
			
				|  (Separately) Posted: Wed Apr 22, 2015 15:43    Post subject: |   |  
				| 
 |  
				| hjiapex Слово "младших" ни о чём не говорит?
 _________________
 Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| hjiapex 
 
 
 Joined: 16 Apr 2015
 Posts: 35
 
 
 | 
			
				|  (Separately) Posted: Wed Apr 22, 2015 15:45    Post subject: |   |  
				| 
 |  
				| Ну стал бы я такие вопросы озвучивать, будь мне все понятно?! Че за издевательство то такое? Что трудного перезалить маленький файлик на любой обменник? Нет же нужно поиграть на струнах моего мозга. Или это неотъемлемое условие на этом форуме? |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| Flasher 
 
  
 Joined: 06 Nov 2009
 Posts: 14229
 Location: Москва
 
 | 
			
				|  (Separately) Posted: Wed Apr 22, 2015 15:56    Post subject: |   |  
				| 
 |  
				| А в голову не приходит мысль, что кто-то сейчас тоже на XP, и у него при себе этого файлика нет? Струны нужно лучше натягивать.   Младшие версии - все, что появились после XP - Vista, 7, 8, 10.
 И не забываем про волшебное слово "google".
 _________________
 Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| Skif_off 
 
 
 Joined: 28 Nov 2012
 Posts: 1244
 
 
 | 
			
				|  (Separately) Posted: Wed Apr 22, 2015 20:24    Post subject: |   |  
				| 
 |  
				|  	  | Flasher wrote: |  	  | Младшие версии - все, что появились после XP - Vista, 7, 8, 10. | 
 Обычно младшие - это младшие по номеру, а не по возрасту
  ) Ппц, я тут уже дистриб Win2000 начал расковыривать...
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| hjiapex 
 
 
 Joined: 16 Apr 2015
 Posts: 35
 
 
 | 
			
				|  (Separately) Posted: Wed Apr 22, 2015 23:15    Post subject: |   |  
				| 
 |  
				| Просто уточню. Для ХП скрипт выглядит так? Что то мне подсказывает, что нет... 
 
  	  | Code: |  	  | '===================================================================== 
' Выделение в панелях одноимённых файлов и/или папок
 
 ' Параметры: "%P" "%T" <файлы/каталоги/всё: 1/2/3>
 '======================= Путь к утилите TCFS2 ========================
 TCFS2 = """%COMMANDER_PATH%\Utils\TCFS2\TCFS2.exe"""
 Clip  = "%COMMANDER_PATH%\Utils\clip.exe"
 '=====================================================================
 With CreateObject("WScript.Shell")
 Clip = .ExpandEnvironmentStrings(Clip)
 TempFile = CreateObject("Shell.Application")._
 NameSpace(.ExpandEnvironmentStrings("%TEMP%")).Self.Path & "\" & FSO.GetTempName
 FSO.OpenTextFile(TempFile, 2, True, -1).Write List1
 .Run "%comspec% /c """"" & Clip & """ < """ & TempFile & """""", 0, True
 FSO.OpenTextFile(TempFile, 2, True, -1).Write List2
 .Run """" & TCFS2 & """ /ef msg($0B,0) tcm(2033,0) send({TAB})",,True
 .Run "%comspec% /c """"" & Clip & """ < """ & TempFile & """""", 0, True
 .Run """" & TCFS2 & """ /ef tcm(2033,0) send({TAB}) msg($0B,1) redraw()",,True
 .Run "cmd /c type|" & Clip,0
 End With : FSO.DeleteFile TempFile, 1 : D.RemoveAll : G.RemoveAll : Set D = Nothing
 Set G = Nothing : Set Items = Nothing : Set FSO = Nothing : WScript.Quit
 | 
 
 И еще вопрос по поводу clip'a, что с ним делать? Просто скинуть в корень с программой? Или в настройках цвета и ИНИ файла тоже добавить по аналогии TCFS2?
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| Flasher 
 
  
 Joined: 06 Nov 2009
 Posts: 14229
 Location: Москва
 
 | 
			
				|  (Separately) Posted: Thu Apr 23, 2015 06:13    Post subject: |   |  
				| 
 |  
				| Конечно, нет. Это только заменяемый кусок, но и в нём нужны небольшие правки в соответствии с данными в средней части исходника. 	  | hjiapex wrote: |  	  | Что то мне подсказывает, что нет... | 
 
 Если его скинуть в system32, то исходник править вообще не нужно. 	  | hjiapex wrote: |  	  | Просто скинуть в корень с программой? | 
 _________________
 Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| hjiapex 
 
 
 Joined: 16 Apr 2015
 Posts: 35
 
 
 | 
			
				|  (Separately) Posted: Thu Apr 23, 2015 09:49    Post subject: |   |  
				| 
 |  
				| Flasher То есть тем скриптом, который идет на семерку?
 
 Если да, то вот я сижу у одного пользователя, скинул в windows/system32 clip.exe и при использовании ничего не происходит.
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| Avada 
 
  
 Joined: 01 Aug 2008
 Posts: 10443
 Location: Россия, Саратов
 
 | 
			
				|  (Separately) Posted: Thu Apr 23, 2015 10:52    Post subject: |   |  
				| 
 |  
				| hjiapex Замечание за нарушение правил форума: необоснованное полное цитирование скриптов вместо ссылки на них приравнивается в оверквотингу. Научитесь нормально оформлять сообщения. Код заменён ссылкой.
 _________________
 Даже самая богатая фантазия
 Не представит себе наши безобразия.
 
 Last edited by Avada on Thu Apr 23, 2015 13:11; edited 1 time in total
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| sa 
 
 
 Joined: 29 Apr 2009
 Posts: 2709
 
 
 | 
			
				|  (Separately) Posted: Thu Apr 23, 2015 11:07    Post subject: |   |  
				| 
 |  
				| hjiapex Советую проверить строку с TCFS2:
 TCFS2 = """%COMMANDER_PATH%\Utils\TCFS2\TCFS2.exe"""
 Промелькнула строка, где вместо трёх кавычек использовалась одна.
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		|  |