Преглед за печат
Здравейте,
търся някакъв скрипт, който да бъде като BATCH файл, който да си го сложа на флашката и при всяко включване на флашката да ми се форматира автоматично,без даме пита дали да форматира, дали потвърждавам и т.н.Тоест форматирането на флашката да е напълно автоматизирано.
хм интересна идея!!!
За слагането, ще можеш да слагаш данни, след формата, ама как ще ги ползваш тия данни, като при включване на компютъра се форматира?! :)
няма да ми трябват.Това ще бъдат темпорални файлове, които след това трябва да се изтриват.
Е като се сложи файл на флашката и я форматираш, няма ли и този файл да даде фира?Бях писал некви подобни .inf i .bat ще потърся ...
e немога да ги намеря, пак ще потърся като имам време.Засега виж това дали ти върши работа:
autorun.inf:
[autorun]
open=blabla.bat
shell\open\command=blabla.bat или action=blabla QISTA TMP
blabla.bat:
del /q J:\*.tmp
del /q J:\*.doc
btw... точно това което искаш го имаше като вирус, който форматираше флашки :) та незнам как ще се сработи с твойта АВ
Идеята явно ще бъде следната:
- два бат-файла на флашока, инф-а указва единия, той копира себе си, втория и инф-а примерно в %TEMP%, после предава управлението на втория (където е копиран), той прави формат на у-вото и копира 3-те файла обратно.
Без да задълбая обаче като проблеми виждам:
-как ще разберат бат-четата буквата на флашката, от която са пуснати? (текуща дир-я/системна променлива/3-та програмка?)
-командата format от своя страна винаги прави пауза за потвърждение; (с пренасочване на входа може би ще се заобиколи, но не съм сигурен)
-същата иска администраторски права, не под всеки юзър ще тръгне;
за първото:Set USBDrive=%~d0 или:
Dim Act :Set Act = CreateObject("Wscript.Shell")
Dim Fso :Set Fso = CreateObject("Scripting.FileSystemObject")
Dim Target
Dim D1, D2, D3
'/-> Set The Target Folder Path Without The Drive Letter
Target = "FolderName"
For Each D1 In Fso.Drives
If D1.IsReady Then
'/-> Add The Drive Letter To Target
D2 = D1.DriveLetter & ":\"
D3 = D2 & Target
'/-> If Folder Found Run The Subst
If Fso.FolderExists(D3) Then
Act.Run(_
"%Comspec% /C @ECHO OFF && CLS && COLOR F9 && MODE 55,7 && " &_
"TITLE SUBST && Echo. && Echo Processing SUBST cmd && " &_
"SUBST Z: " & Chr(34) & D3 & Chr(34) & " && Z:\program.exe && " &_
"SUBST Z: /D && Exit"),1,True
End If
End If
Next
Мисля си обаче, че първият ми пост върши работа. Защото ако направиме всички неща които пишеш XIIID , ще направиме туториалче за вирус :) и ще ни се карат могъщите :)
или нещо такова за батчето (на име autorun.bat):
@echo off
if "%1"=="ERASEALL" goto FORMATDRIVE
set FMTDRV=%cd:~0,2%
copy /y .\autorun.inf %TEMP%
copy /y .\autorun.bat %TEMP%
%TEMP%\autorun.bat ERASEALL
goto END
:FORMATDRIVE
format %FMTDRV% /fs:FAT32 /q /x
copy %TEMP%\autorun.inf %FMTDRV%\
copy %TEMP%\autorun.bat %FMTDRV%\
set FMTDRV=
:END
autorun.inf го пуска без параметър, при което той открива на коя буква е, мята копие в темп-а, стартира копието с параметър ИЗЯЖ МЕ ВЪЛЧО и то замита всичко, след което връща файлчетата на флашока. не съм решил автоматизирането на format командата, ще иска потвърждение (и май по-добре :) )
не съм го тествал обаче, нямам флашка за триене а vmware ми се е смръчкал и плаче за преинсталация, действайте внимателно, може грешки да даде или направо поразии да направи!
Маи накрая вместо флашката ще си форматираш C: като включиш флашката в USB :-memnon
Точно затова всеки идиот бачка като administrator :) Аз, като съзнааващ, че съм такъв, избягвам...Цитат:
Първоначално публикувано от glowndark
Цитат:
Първоначално публикувано от XIIID
:016: За всеки проблем има решение :
http://www.lancelhoff.com/multi-part...ve-in-windows/
run .inf from small 1-st partition=> erase second big partition