[Iska]

батник висит в автозагрузке »

Следующим вопросом будет как скрыть чёрное окно консоли.

то батник удаляется »

Что есть «удаляется»? Завершает свою работу? Удаляет ярлык на себя из папки «Автозагрузка»? Удаляет сам себя с диска?

а файл шлет на север(внутри сети) »

Куда именно? Копирует? Перемещает? Посылает письмом?


На WSH, пробуйте:

читать дальше »

Код:

Option Explicit

Dim strSourceFolder
Dim strDestFolder

Dim objFSO
Dim objFile

Dim boolFound


strSourceFolder = "с:\000"
strDestFolder   = "\\Server\Share"


Set objFSO = WScript.CreateObject("Scripting.FileSystemObject")

boolFound = False

Do
	If objFSO.FolderExists(strSourceFolder) Then
		If objFSO.FolderExists(strDestFolder) Then
			For Each objFile In objFSO.GetFolder(strSourceFolder).Files
				If StrComp(objFSO.GetExtensionName(objFile.Name), "txt", vbTextCompare) = 0 Then
					boolFound = True
					
					objFile.Copy strDestFolder & "\", True
					objFile.Delete True
				End If
			Next
			
			If boolFound Then
				Exit Do
			End If
			
			WScript.CreateObject("WScript.Shell").Popup "Надоедаю пользователю сообщением-напоминалкой", 30, "Заголовок", vbOKOnly + vbInformation + vbSystemModal
			
			WScript.Sleep 3 * 60 * 1000 ' 5 * 60 * 1000, 10 * 60 * 1000
		Else
			WScript.Echo "Destination folder [" & strDestFolder & "] not found."
			WScript.Quit 2
		End If
	Else
		WScript.Echo "Source folder [" & strSourceFolder & "] not found."
		WScript.Quit 1
	End If
Loop

WScript.Quit 0

[kairox@vk]

Следующим вопросом будет как скрыть чёрное окно консоли. »

не,с этим я решил вопрос

Что есть «удаляется»? Завершает свою работу? Удаляет ярлык на себя из папки «Автозагрузка»? Удаляет сам себя с диска? »

да,завершается,удаляется из автозагрузки и с диска

Куда именно? Копирует? Перемещает? Посылает письмом? »

просто по сетке отправляет на сервер данных или тупо в шара папку юзера

[Iska]

удаляется из автозагрузки »

Уточните, из какой именно «Автозагрузки» — конкретного пользователя («%UserProfile%\Главное меню\Программы\Автозагрузка») или «для всех пользователей» («%AllUsersProfile%\Главное меню\Программы\Автозагрузка»)? Что именно содержится ярлыке (это нужно для корректного определения данного ярлыка среди прочих)?

[kairox@vk]

ну в принципе не ст оль важно тк если он самоудалится то пофигу откуда он запускаться будет,если принципиально то конкретного пользователя

[Iska]

то пофигу откуда он запускаться будет »

Вам, возможно, и «пофигу». А вот скрипту (и мне, соответственно, реализующему логику его работы) — нет. Можете загрузить Autoruns, запустить его и посмотреть, сколь богатые возможности выбора есть для автоматического старта.

Вы не ответили на вопрос:

Что именно содержится ярлыке (это нужно для корректного определения данного ярлыка среди прочих)? »

Конкретно интересует содержимое поля «Объект» ярлыка — что там будет?

[kairox@vk]

ну как бы от него требуется только запуск,только надоедание пользователю чтоб он заполнил мини анкету и положил в папку,если батник видит в папке текстовик то "говорит" спасибо(msg * ...) , отключается(из автозапуска) и удаляется(не обязательно).
если это не то,тогда я не понимаю этого вопроса

[Iska]

Я спрашиваю у Вас, что будет находится в ярлыке, созданном в автозагрузке? Конкретно вот в этом:

читать дальше »

поле? И это не «батник», а скрипт WSH. Если и это не понимаете — можете хотя бы словами описать, как Вы будете создавать этот самый ярлык в автозагрузке.