API tools faq
paste
Advertisement
Guest User

Backup Win 7 E win 10

a guest
Nov 11th, 2017
239
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Winbatch 54.17 KB | None | 0 0
raw download clone embed print report
  1. @echo off
  2.  
  3.  
  4. title solicitando administrador
  5. MODE 100,40
  6.  
  7. ::VERIFICAR PRIVILÉGIOS DE ADM
  8. :::::::::::::::::::::::::::::OK FUNCIONA PREVILEGIOS
  9. cd "%~dp0"
  10. @rem muda a cor da tela do script
  11. @color 17
  12. >nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
  13. if '%errorlevel%' NEQ '0' (
  14. echo solicitando administrador...
  15. goto UACPrompt
  16. ) else ( goto gotAdmin )
  17. :UACPrompt
  18. echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs"
  19. set params = %*:"=""
  20. echo UAC.ShellExecute "%~s0", "%params%", "", "runas", 1 >> "%temp%\getadmin.vbs"
  21. "%temp%\getadmin.vbs"
  22. exit /B
  23. :gotAdmin
  24. if exist "%temp%\getadmin.vbs" ( del "%temp%\getadmin.vbs" >NUL)
  25. CD /D "%~dp0"
  26. :::::::::::::::::::::::::::::FIM PREVILEGIOS
  27.  
  28.  
  29.  
  30. :: MODULO PARA DETERMINAS O SISTEMA OERACIONAL ==OK
  31. CALL:WIN7_XP
  32.  
  33.  
  34. :: MOSTRA MENSAGENS DE ADVERTENCIA INICIAL == OK
  35. Set "Ti_Tle_Men=Importante! Leia com atenção"
  36. set "Ti_po_men=64"
  37. set "M_ensa=LEMBRETE:  \nEsse aplicativo deve ser executado no mesmo diretório que será salvo o backup. \nDIRETÓRIO ATUAL = %cd% \n  \nATENCÃO: \nPara a restauração do backup após a formatação esse computador deverá receber o mesmo nome de usuário. \nUSUÁRIO ATUAL = %username%\n  \nIMPORTANTE: \nAntes de executar o backup verifique se o espaço disponível em: \n  ************* [ %cd% ] *************\nÉ suficiente para salvar os arquivos do usuário"
  38. CALL:MENS_AGENS "%M_ensa%" "%Ti_po_men%" "%Ti_Tle_Men%"
  39.  
  40. :In_icio
  41.  
  42. :: MODULO PARA SABER SE JÁ FOI CRIADO ALGUM BKP ANTERIOR ==OK
  43. CALL:LOG_IN
  44.  
  45. :: MODULO PARA MOSTRAR O MENU NICIAL == OK
  46. CALL:ME_NU
  47.  
  48. goto ME_NU
  49.  
  50.  
  51. :MENS_AGENS
  52. ::**********************************************************
  53. :M_ensaBox <M_ensa> <Ti_po_men> <Ti_Tle_Men>
  54. echo MsgBox Replace("%~1","\n",vbCrLf),"%~2","%~3" > "%tmp%\%~n0.vbs"
  55. Cscript /nologo "%tmp%\%~n0.vbs" & Del "%tmp%\%~n0.vbs" >nul
  56. GOTO:EOF
  57. ::********************
  58.  
  59. :MENS_AGENS2
  60. echo msgbox"%~1" ,%~2, "%~3" > %temp%\msg.vbs
  61. start %temp%\msg.vbs
  62. GOTO:EOF
  63.  
  64. :WIN7_XP
  65. for /f "tokens=4-5 delims=. " %%i in ('ver') do set VERSION=%%i.%%j
  66. if "%version%" == "10.0" SET W7_XP=Windows 10&SET "XP_W7=W70"
  67. if "%version%" == "6.3" SET W7_XP=Windows 8.1&SET "XP_W7=W70"
  68. if "%version%" == "6.2" SET W7_XP=Windows 8.0&SET "XP_W7=W70"
  69. if "%version%" == "6.1" SET W7_XP=Windows 7&SET "XP_W7=W70"
  70. if "%version%" == "6.0" SET W7_XP=Windows Vista&SET "XP_W7=W70"
  71. if "%version%" == "5.2" SET W7_XP=Windows XP x64&SET "XP_W7=WXP"
  72. if "%version%" == "5.1" SET W7_XP=Windows XP&SET "XP_W7=WXP"
  73. if "%version%" == "5.0" SET W7_XP=Windows 2000&SET "XP_W7=WXP"
  74. if "%version%" == "4.10" SET W7_XP=Windows 98&SET "XP_W7=WXP"
  75. if "%PROCESSOR_ARCHITECTURE%"=="AMD64" (
  76. SET ARQ_T=64 BIT
  77. ) else (
  78. SET ARQ_T=32 BIT
  79. )
  80. GOTO:EOF
  81.  
  82.  
  83. :LOG_IN
  84. title Backup Automatico © V 1.9
  85. ::VERIFICAR LOG DE BACKUP
  86. if exist "%~dp0BKP_AUTO\Backup_%username%\log.inf" (
  87. cd "%~dp0BKP_AUTO\Backup_%username%"
  88. for /f "tokens=*" %%L in (log.inf) do (
  89. cd..
  90. cd.. & set log=%%L
  91. )
  92. ) else (set "log=NÆo Executado                                                 ")
  93. GOT:EOF
  94.  
  95. :VER_LOCAL
  96. ::VERIFICAR DIRETORIO, ISSO IMPEDE QUE O PROGRAMA GERE PASTAS INFINITAS
  97. ::LOCAL  ATUAL
  98. echo %cd% > "%temp%\local.inf"
  99. for /f %%D in (%temp%\local.inf) do (set local=%%D)
  100. set local=%local:\= %
  101. echo %local% > "%temp%\local.inf"
  102. for /f "tokens=1" %%T in (%temp%\local.inf) do (set local=%%T)
  103. ::PASTA DE USUARIO
  104. echo %userprofile% > "%temp%\user.inf"
  105. for /f %%A in (%temp%\user.inf) do (set user=%%A)
  106. set user=%user:\= %
  107. echo %user% > "%temp%\user.inf"
  108. for /f "tokens=1" %%A in (%temp%\user.inf) do (set user=%%A)
  109.  
  110. if "%op%"=="exit" goto seu_touxa
  111.  
  112. if "%op%" NEQ "4" (
  113. if "%local%" == "%user%" (
  114. Rem 64=vbInformation, 48=vbExclamation, 16=vbCritical 32=vbQuestion
  115. Set "Ti_Tle_Men=Atenção !!!"
  116. set "Ti_po_men=48"
  117. set "M_ensa=ATENÇÃO: \nVocê não pode executar o programa dentro da unidade \n[%user%]\nOnde está instalado o sistema operacional\n \n \nExecute o programa em uma partição diferente\n \nISSO IMPEDE QUE O PROGRAMA [ %~n0 ] \nGERE PASTAS INFINITAS.
  118. Call:M_ensaBox "%M_ensa%" "%Ti_po_men%" "%Ti_Tle_Men%"
  119. Goto In_icio
  120. )
  121. )
  122.  
  123. :seu_touxa
  124.  
  125. if "%op%" == "4" (
  126. if /i "%local%" == "%disk%" (
  127. CALL:MENS_AGENS2 "Você não pode fazer o salvar o backup da unidade [%disk%] na mesma partição [%local%], execute o programa em uma partição diferente." "vbexclamation" "Backup Automático"
  128. goto Bkp_Part_Extra
  129. )
  130. )
  131.  
  132. if not exist "%~dp0BKP_AUTO" md "%~dp0BKP_AUTO" >NUL
  133.  
  134. GOTO:EOF
  135.  
  136. :ME_NU
  137. cls
  138. color 18
  139. CALL :POS_TEL 69 55
  140. color 1b
  141. set off=N
  142. echo.
  143. echo. ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
  144. echo  º                Inform‡äes Sobre seu Computador                  º
  145. echo. ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
  146. echo. ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
  147. IF NOT EXIST %temp%\f.txt (
  148. systeminfo | findstr /B /C:"Nome do host:" /C:"Nome do sistema operacional:" /C:"VersÆo do sistema operacional:" /C:"Propriet rio registrado:" /C:"Data da instala‡Æo original:" /C:"Fabricante do sistema:" /C:"Modelo do sistema:" /C:"Tipo de sistema:" /C:"VersÆo do BIOS:" /C:"Localidade do sistema:" /C:"Fuso hor rio:" /C:"Mem¢ria f¡sica total:" /C:"Dom¡nio:" /C:"Servidor de Logon:" /C:"Servidor DHCP:" >%temp%\f.txt
  149. )
  150. for /f "tokens=1* delims=:" %%a in (%temp%\f.txt) do (
  151. set "mos_1=%%a                               "
  152. set "mos_2=%%b"
  153. call:mostr_hard
  154. )
  155.  
  156. echo. ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
  157. echo.
  158. echo. ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
  159. echo  º    Batch-Satti BKP - Compat¡vel com Windows XP/Vista/7/8/10     º
  160. echo. ÌÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹
  161. echo. ÌÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹
  162. echo  º éltimo Backup:  %log:~0,32%                º
  163. echo. ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
  164. echo.       ____        _       _           _____       _   _   _
  165. echo.      ^|  _ \      ^| ^|     ^| ^|         / ____^|     ^| ^| ^| ^| (_)
  166. echo.      ^| ^|_) ^| __ _^| ^|_ ___^| ^|__ _____^| (___   __ _^| ^|_^| ^|_ _
  167. echo.      ^|  _ ^< / _` ^| __/ __^| '_ \______\___ \ / _` ^| __^| __^| ^|
  168. echo.      ^| ^|_) ^| (_^| ^| ^|^| (__^| ^| ^| ^|     ____) ^| (_^| ^| ^|_^| ^|_^| ^|
  169. echo.      ^|____/ \__,_^|\__\___^|_^| ^|_^|    ^|_____/ \__,_^|\__^|\__^|_^|
  170. echo.
  171. echo. ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
  172. echo. º ºººººººººº BACKUP ººººººººººº ºº ºººººººº RESTAURA€ÇO ººººººººº º
  173. echo. ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
  174. echo  ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
  175. echo  ³ 1¯ Bkp Arquivos do Usu rio    ³³ 5¯ Rest. Arquivos do Usu rio   ³
  176. echo  ³                               ³³                                ³
  177. echo  ³ 2¯ Bkp Hist¢rico do Skype     ³³ 6¯ Rest. Hist¢rico do Skype    ³
  178. echo  ³                               ³³                                ³
  179. echo  ³ 3¯ Bkp Outlook / Live Mail    ³³ 7¯ Rest. Outlook / Live Mail   ³
  180. echo  ³                               ³³                                ³
  181. echo  ³ 4¯ Bkp de Parti‡Æo            ³³ 8¯ Rest. Parti‡äes ou pastas   ³
  182. echo  ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
  183. echo                  ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
  184. echo                  ³ D ¯ Deletar Arquivos do Backup ³
  185. echo                  ³ S ¯ Fechar o programa          ³
  186. echo                  ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
  187. set op=E
  188.  
  189. set /p "op=-  Digite uma Op‡Æo ¯ "
  190. for %%a in ( 1 2 3 4 5 6 7 8 E D S ) do if /I "%%a"=="%op%" GOTO:SEG_UE
  191. CALL:MENS_AGENS2 "[%op%] opção inválida." "vbcritical" "Painel de controle"
  192. Goto In_icio
  193.  
  194. :SEG_UE
  195. if "%op%" == "1" (
  196. ::VERIFICAR DIRETORIO, ISSO IMPEDE QUE O PROGRAMA GERE PASTAS INFINITAS
  197. CALL :POS_TEL 90 70
  198. CALL:PERGUNTA "Desligar o computador após executar o Backup" "set off=S" "set off=N" "msg.txt"
  199. if /i "%off%" == "N" (set shutdown=NÆo)
  200. if /i "%off%" == "S" (set shutdown=Sim)
  201. call:VER_LOCAL
  202. set "op=exit"
  203. call:BIBLIOTECAS
  204. call:DRIVE_C
  205. call:Me_ga
  206. call:Me_ga_sync
  207. call:Me_ga_sync_downloads
  208. call:Notas_Adesivas
  209. call:SKYPE_COPY
  210. call:LIVE_MAIL
  211. call:outlook
  212. call:WALLPAPER_COPY
  213. call:ALERTA_SOM
  214. )
  215.  
  216.  
  217. if "%op%" == "2" call:SKYPE_COPY
  218. if "%op%" == "3" call:outlook & call:LIVE_MAIL
  219. if "%op%" == "4" call:Bkp_Part_Extra
  220. if "%op%" == "5" call:Res_bkp_Biblio
  221. if "%op%" == "6" call:RES_SKYPE_COPY
  222. if "%op%" == "7" call:RES_outlook & call:RES_LIVE_MAIL
  223. if "%op%" == "8" call:RES_Past_ou_Part
  224. if /i "%op%" == "D" goto del_bkp
  225. if /i "%op%" == "s" (
  226. CALL:MENS_AGENS2 "Obrigado! Visitem o Batch-Satti" "vbcritical" "Batch-Satti"
  227. start "http://batch-satti.forumeiros.com/"
  228. exit
  229. )
  230.  
  231. Goto In_icio
  232.  
  233.  
  234. :POS_TEL
  235. SET C_L=%1
  236. SET L_N=%2
  237. if not defined COLS SET COLS=14
  238. if not defined LINES SET LINES=1
  239. IF %COLS% GTR %C_L% (SET CONTAC=-1) ELSE (SET CONTAC=1)
  240. IF %LINES% GTR %L_N% (SET CONTAL=-1) ELSE (SET CONTAL=1)
  241. FOR /L %%W IN (%COLS%,%CONTAC%,%C_L%) DO SET COLS=%%W&MODE CON:LINES=%LINES% COLS=%%W
  242. FOR /L %%W IN (%LINES%,%CONTAL%,%L_N%) DO SET LINES=%%W&MODE CON:COLS=%COLS% LINES=%%W
  243. GOTO:EOF
  244.  
  245. :mostr_hard
  246. set "mos_2=%mos_2:            = %"
  247. set "mos_2=%mos_2:           = %"
  248. set "mos_2=%mos_2:          = %"
  249. set "mos_2=%mos_2:         = %"
  250. set "mos_2=%mos_2:        = %"
  251. set "mos_2=%mos_2:       = %"
  252. set "mos_2=%mos_2:      = %"
  253. set "mos_2=%mos_2:     = %"
  254. set "mos_2=%mos_2:    = %"
  255. set "mos_2=%mos_2:   = %"
  256. set "mos_2=%mos_2:  = %"
  257. set "mos_2=%mos_2%                                               "
  258. echo  º %mos_1:~0,30% º%mos_2:~0,31% º
  259. goto:eof
  260.  
  261. :versao_outlook
  262. reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\%1.0\Common\LanguageResources /v SKULanguage>nul 2>nul
  263. if NOT "%errorlevel%"=="1" (
  264. set "OffiVer=%1.0"
  265. )
  266. goto:eof
  267.  
  268. :killa_Outlook
  269.     tasklist /FI "IMAGENAME eq OUTLOOK.EXE" | find /i "OUTLOOK.EXE" > nul
  270.         if not "%ERRORLEVEL%"=="1" taskkill /f /im "outlook.exe" >nul & ping -n 2 127.0.0.1 >NUL & GOTO killa_Outlook
  271.         if "%ERRORLEVEL%"=="0" goto:eof
  272. goto:eof
  273.  
  274. :geracvs
  275. (
  276. Echo. Dim olkApp, olkNS, olkContacts, olkContact, objFSO, objFile
  277. Echo. Set objFSO = CreateObject("Scripting.FileSystemObject"^)
  278. Echo. strFile = "Catalogo_de_contatos_do_Outlook.csv"
  279. Echo. const ForAppending = 8
  280. Echo. set objFile = objFSO.OpenTextFile(strFile, ForAppending, True^)
  281. Echo. Set olkApp = CreateObject("Outlook.Application"^)
  282. Echo. Set olkNS = olkApp.GetNamespace("MAPI"^)
  283. Echo. olkNS.Logon
  284. Echo. Set olkContacts = olkNS.GetDefaultFolder(10^)
  285. Echo. For Each olkContact In olkContacts.Items
  286. Echo. x = olkContact.class
  287. Echo. If olkContact.Class = 40 Then
  288. Echo. 'This is to only copy contacts to which there is an email address
  289. Echo. if Trim(olkContact.Email1Address^) ^<^> "" then
  290. Echo. objFile.WriteLine Chr(34^) ^& olkContact.FullName ^& Chr(34^) ^& "," ^& Chr(34^) ^& olkContact.Email1Address ^& Chr(34^)
  291. Echo. end if
  292. Echo. End If
  293. Echo. Next
  294. Echo. Set olkContact = Nothing
  295. Echo. Set olkContacts = Nothing
  296. Echo. olkNS.Logoff
  297. Echo. Set olkNS = Nothing
  298. Echo. Set olkApp = Nothing
  299. Echo. objFile.Close
  300. Echo. Set objFile = Nothing
  301. Echo. Set objFSO = Nothing
  302. )>"%temp%\Catalogo.vbs"
  303. goto:eof
  304.  
  305.  
  306.  
  307.  
  308. :: SALVA TODO CONTEUDO DO USUÁRIO
  309. :BIBLIOTECAS
  310. if not exist "%~dp0BKP_AUTO\Backup_%username%" md "%~dp0BKP_AUTO\Backup_%username%"
  311. :: TODOS ARQUIVOS DO USUÁRIO
  312. SET "_ORI_GEM="%userprofile%""
  313. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%""
  314. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  315. SET "_EXCLUE_DIRS=/XD "%userprofile%\IntelGraphicsProfiles" /XD "AppData" /XD "Tracing" /XD "%userprofile%\Documents\MEGA" /XD "%userprofile%\Documents\MEGAsync Downloads" /XD "%userprofile%\Documents\MEGAsync" /XD "%userprofile%\Documents\Arquivos do Outlook""
  316. SET "_EXCLUE_ARQS=/XF "*.TMP""
  317. Set "_SWITCH=%_OPC_OES% %_EXCLUE_DIRS% %_EXCLUE_ARQS%"
  318. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  319. PUSHD "%_DESTI_NO%\Desktop"
  320. del /s /q /f "*.lnk" >nul
  321. attrib %_DESTI_NO% -s -h -r
  322.  
  323. :: copia bibliotecas caso tenham sido movidas por precaução
  324.  
  325. SET "SF=HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders"
  326.  
  327. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "Desktop"') do set Desktop=%%j
  328. if /i "%Desktop%" EQU "%userprofile%\Desktop" GOTO Desk_t01
  329. SET "_ORI_GEM="%Desktop%""
  330. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Desktop""
  331. if not exist "%~dp0BKP_AUTO\Backup_%username%\Desktop" md "%~dp0BKP_AUTO\Backup_%username%\Desktop"
  332. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  333. SET "_EXCLUE_ARQS=/XF "*.TMP""
  334. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  335. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  336. attrib %_DESTI_NO% -s -h -r
  337. :Desk_t01
  338.  
  339. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "Favorites"') do set Favorites=%%j
  340. if /i "%Favorites%" EQU "%userprofile%\Favorites" GOTO Fav_t01
  341. SET "_ORI_GEM="%Favorites%""
  342. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Favorites""
  343. if not exist "%~dp0BKP_AUTO\Backup_%username%\Favorites" md "%~dp0BKP_AUTO\Backup_%username%\Favorites"
  344. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  345. SET "_EXCLUE_ARQS=/XF "*.TMP""
  346. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  347. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  348. attrib %_DESTI_NO% -s -h -r
  349. :Fav_t01
  350.  
  351. for /f "tokens=3,*" %%i in ('reg query "%SF%" /v "My Video"') do set Videos=%%j
  352. if /i "%Videos%" EQU "%userprofile%\Videos" GOTO Vid_t01
  353. SET "_ORI_GEM="%Videos%""
  354. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Videos""
  355. if not exist "%~dp0BKP_AUTO\Backup_%username%\Videos" md "%~dp0BKP_AUTO\Backup_%username%\Videos"
  356. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  357. SET "_EXCLUE_ARQS=/XF "*.TMP""
  358. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  359. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  360. attrib %_DESTI_NO% -s -h -r
  361. :Vid_t01
  362.  
  363. for /f "tokens=3,*" %%i in ('reg query "%SF%" /v "My Music"') do set Music=%%j
  364. if /i "%Music%" EQU "%userprofile%\Music" GOTO Mus_t01
  365. SET "_ORI_GEM="%Music%""
  366. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Music""
  367. if not exist "%~dp0BKP_AUTO\Backup_%username%\Music" md "%~dp0BKP_AUTO\Backup_%username%\Music"
  368. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  369. SET "_EXCLUE_ARQS=/XF "*.TMP""
  370. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  371. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  372. attrib %_DESTI_NO% -s -h -r
  373. :Mus_t01
  374.  
  375. for /f "tokens=3,*" %%i in ('reg query "%SF%" /v "My Pictures"') do set Pictures=%%j
  376. if /i "%Pictures%" EQU "%userprofile%\Pictures" GOTO Pic_t01
  377. SET "_ORI_GEM="%Pictures%""
  378. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Pictures""
  379. if not exist "%~dp0BKP_AUTO\Backup_%username%\Pictures" md "%~dp0BKP_AUTO\Backup_%username%\Pictures"
  380. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  381. SET "_EXCLUE_ARQS=/XF "*.TMP""
  382. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  383. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  384. attrib %_DESTI_NO% -s -h -r
  385. :Pic_t01
  386.  
  387. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "{374DE290-123F-4565-9164-39C4925E467B}"') do set Downloads=%%j
  388.  
  389. if /i "%Downloads%" EQU "%userprofile%\Downloads" GOTO Dow_t01
  390.  
  391. SET "_ORI_GEM="%Downloads%""
  392. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Downloads""
  393. if not exist "%~dp0BKP_AUTO\Backup_%username%\Downloads" md "%~dp0BKP_AUTO\Backup_%username%\Downloads"
  394. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  395. SET "_EXCLUE_ARQS=/XF "*.TMP""
  396. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  397. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  398. attrib %_DESTI_NO% -s -h -r
  399. :Dow_t01
  400.  
  401.  
  402.  
  403. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "{4C5C32FF-BB9D-43B0-B5B4-2D72E54EAAA4}"') do set Games=%%j
  404. if /i "%Games%" EQU "%userprofile%\Saved Games" GOTO Gam_t01
  405. SET "_ORI_GEM="%Games%""
  406. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Saved Games""
  407. if not exist "%~dp0BKP_AUTO\Backup_%username%\Saved Games" md "%~dp0BKP_AUTO\Backup_%username%\Saved Games"
  408. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  409. SET "_EXCLUE_ARQS=/XF "*.TMP""
  410. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  411. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  412. attrib %_DESTI_NO% -s -h -r
  413. :Gam_t01
  414.  
  415. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "{56784854-C6CB-462B-8169-88E350ACB882}"') do set Contacts=%%j
  416. if /i "%Contacts%" EQU "%userprofile%\Contacts" GOTO Com_t01
  417. SET "_ORI_GEM="%Contacts%""
  418. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Contacts""
  419. if not exist "%~dp0BKP_AUTO\Backup_%username%\Contacts" md "%~dp0BKP_AUTO\Backup_%username%\Contacts"
  420. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  421. SET "_EXCLUE_ARQS=/XF "*.TMP""
  422. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  423. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  424. attrib %_DESTI_NO% -s -h -r
  425. :Com_t01
  426.  
  427. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "{7D1D3A04-DEBB-4115-95CF-2F29DA2920DA}"') do set Searches=%%j
  428. if /i "%Searches%" EQU "%userprofile%\Searches" GOTO Sea_t01
  429. SET "_ORI_GEM="%Searches%""
  430. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Searches""
  431. if not exist "%~dp0BKP_AUTO\Backup_%username%\Searches" md "%~dp0BKP_AUTO\Backup_%username%\Searches"
  432. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  433. SET "_EXCLUE_ARQS=/XF "*.TMP""
  434. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  435. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  436. attrib %_DESTI_NO% -s -h -r
  437. :Sea_t01
  438.  
  439. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "{BFB9D5E0-C6A9-404C-B2B2-AE6DB6AF4968}"') do set Links=%%j
  440. if /i "%Links%" EQU "%userprofile%\Links" GOTO Lin_t01
  441. SET "_ORI_GEM="%Links%""
  442. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Links""
  443. if not exist "%~dp0BKP_AUTO\Backup_%username%\Links" md "%~dp0BKP_AUTO\Backup_%username%\Links"
  444. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  445. SET "_EXCLUE_ARQS=/XF "*.TMP""
  446. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  447. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  448. attrib %_DESTI_NO% -s -h -r
  449. :Lin_t01
  450.  
  451. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "Personal"') do set Documents=%%j
  452. if /i "%Documents%" EQU "%userprofile%\Documents" GOTO Doc_t01
  453. SET "_ORI_GEM="%Documents%""
  454. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Documents""
  455. if not exist "%~dp0BKP_AUTO\Backup_%username%\Documents" md "%~dp0BKP_AUTO\Backup_%username%\Documents"
  456. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  457. SET "_EXCLUE_ARQS=/XF "*.TMP""
  458. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  459. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  460. attrib %_DESTI_NO% -s -h -r
  461. :Doc_t01
  462. goto:eof
  463.  
  464.  
  465.  
  466.  
  467.  
  468.  
  469.  
  470.  
  471.  
  472.  
  473.  
  474.  
  475. :: ARQUIVOS NO DISCO C:
  476. :DRIVE_C
  477. cd /D %HOMEDRIVE%
  478. CD..
  479. CD..
  480. SET "_ORI_GEM="%SYSTEMDRIVE%""
  481. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Drive_C""
  482. if not exist "%~dp0BKP_AUTO\Backup_%username%\Drive_C" md "%~dp0BKP_AUTO\Backup_%username%\Drive_C"
  483. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  484. SET "_EXCLUE_DIRS=/XD "%SYSTEMDRIVE%\$GetCurrent" /XD "%SYSTEMDRIVE%\OEM" /XD "%SYSTEMDRIVE%\System Volume Information" /XD "%SYSTEMDRIVE%\$WINDOWS.~BT" /XD "%SYSTEMDRIVE%\Windows10Upgrade" /XD "%SYSTEMDRIVE%\Adjustment Program" /XD "%SYSTEMDRIVE%\Program Files" /XD "%SYSTEMDRIVE%\Users" /XD "%SYSTEMDRIVE%\Windows" /XD "%SYSTEMDRIVE%\Program Files (x86)" /XD "%SYSTEMDRIVE%\$Recycle.Bin" /XD "%SYSTEMDRIVE%\MSOCache" /XD "%SYSTEMDRIVE%\ProgramData" /XD "%SYSTEMDRIVE%\System Volume Information" /XD "%SYSTEMDRIVE%\Recovery" /XD "%SYSTEMDRIVE%\PerfLogs" /XD "%SYSTEMDRIVE%\$AV_ASW" /XD "%SYSTEMDRIVE%\Intel" /XD "%SYSTEMDRIVE%\TESTE""
  485. SET "_EXCLUE_ARQS=/XF "*.TMP""
  486. Set "_SWITCH=%_OPC_OES% %_EXCLUE_DIRS% %_EXCLUE_ARQS%"
  487. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  488. attrib %_DESTI_NO% -s -h -r
  489. goto:eof
  490.  
  491.  
  492. :Me_ga
  493. cd "%~dp0"
  494. Set Me_ga=OFF
  495. if exist "%userprofile%\Documents\MEGA" Set Me_ga=Mega
  496. if not exist "%userprofile%\Documents\MEGA" goto pula_mega
  497. IF /I "%Me_ga%" NEQ  "OFF" (
  498. SET "_ORI_GEM="%userprofile%\Documents\MEGA""
  499. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\%Me_ga%""
  500. if not exist "%~dp0BKP_AUTO\Backup_%username%\%Me_ga%" md "%~dp0BKP_AUTO\Backup_%username%\%Me_ga%"
  501. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  502. SET "_EXCLUE_ARQS=/XF "*.TMP""
  503. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  504. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  505. attrib %_DESTI_NO% -s -h -r
  506. )
  507. :pula_mega
  508.  
  509. goto:eof
  510.  
  511.  
  512. :Me_ga_sync
  513. cd "%~dp0"
  514. Set Me_ga=OFF
  515. if exist "%userprofile%\Documents\MEGAsync" Set Me_ga=Mega_Sync
  516. if not exist "%userprofile%\Documents\MEGAsync" goto pula_sync
  517. IF /I "%Me_ga%" NEQ  "OFF" (
  518. SET "_ORI_GEM="%userprofile%\Documents\MEGAsync""
  519. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\%Me_ga%""
  520. if not exist "%~dp0BKP_AUTO\Backup_%username%\%Me_ga%" md "%~dp0BKP_AUTO\Backup_%username%\%Me_ga%"
  521. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  522. SET "_EXCLUE_ARQS=/XF "*.TMP""
  523. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  524. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  525. attrib %_DESTI_NO% -s -h -r
  526. )
  527. :pula_sync
  528. goto:eof
  529.  
  530.  
  531.  
  532. :Me_ga_sync_downloads
  533. cd "%~dp0"
  534. Set Me_ga=OFF
  535. if exist "%userprofile%\Documents\MEGAsync Downloads" Set Me_ga=Mega_Sync\Downloads
  536. if not exist "%userprofile%\Documents\MEGAsync Downloads" goto pula_sync_down
  537. SET "_ORI_GEM="%userprofile%\Documents\MEGAsync Downloads""
  538. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\%Me_ga%""
  539. if not exist "%userprofile%\Documents\MEGAsync Downloads" md "%userprofile%\Documents\MEGAsync Downloads"
  540. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  541. SET "_EXCLUE_ARQS=/XF "*.TMP""
  542. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  543. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  544. attrib %_DESTI_NO% -s -h -r
  545. :pula_sync_down
  546. goto:eof
  547.  
  548.  
  549. :Notas_Adesivas
  550. cd "%~dp0"
  551. if not exist "%USERPROFILE%\AppData\Roaming\Microsoft\Sticky Notes" goto pula_stick
  552. SET "_ORI_GEM="%USERPROFILE%\AppData\Roaming\Microsoft\Sticky Notes""
  553. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Notas_Adesivas""
  554. if not exist "%~dp0BKP_AUTO\Backup_%username%\Notas_Adesivas" md "%~dp0BKP_AUTO\Backup_%username%\Notas_Adesivas"
  555. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  556. SET "_EXCLUE_ARQS=/XF "*.TMP""
  557. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  558. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  559. attrib %_DESTI_NO% -s -h -r
  560. :pula_stick
  561. goto:eof
  562.  
  563.  
  564.  
  565.  
  566.  
  567. :SKYPE_COPY
  568. cd "%~dp0"
  569. ::Verificar se skype esta instalado
  570. if not exist "%appdata%\Skype" goto pula_skype
  571. SET "_ORI_GEM="%appdata%\Skype""
  572. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Skype""
  573. if not exist "%~dp0BKP_AUTO\Backup_%username%\Skype" md "%~dp0BKP_AUTO\Backup_%username%\Skype"
  574. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  575. SET "_EXCLUE_ARQS=/XF "*.TMP""
  576. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  577. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  578. attrib %_DESTI_NO% -s -h -r
  579. :pula_skype
  580. goto:eof
  581.  
  582.  
  583. :LIVE_MAIL
  584. cd "%~dp0"
  585. if not exist "%localappdata%\Microsoft\Windows Live Mail" goto pula_live_mail
  586. SET "_ORI_GEM="%localappdata%\Microsoft\Windows Live Mail""
  587. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Backp_Live_Mail\Live_Mail""
  588. if not exist "%~dp0BKP_AUTO\Backup_%username%\Backp_Live_Mail\Live_Mail" md "%~dp0BKP_AUTO\Backup_%username%\Backp_Live_Mail\Live_Mail"
  589. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  590. SET "_EXCLUE_ARQS=/XF "*.TMP""
  591. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  592. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  593. attrib %_DESTI_NO% -s -h -r
  594. reg export "HKEY_CURRENT_USER\Software\Microsoft\Windows Live Mail" "%_DESTI_NO:"=%\Live_Mail.reg" /y >nul
  595. SET "_ORI_GEM="%localappdata%\Microsoft\Windows Live""
  596. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Backp_Live_Mail\Live""
  597. if not exist "%~dp0BKP_AUTO\Backup_%username%\Backp_Live_Mail\Live" md "%~dp0BKP_AUTO\Backup_%username%\Backp_Live_Mail\Live"
  598. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  599. SET "_EXCLUE_ARQS=/XF "*.TMP""
  600. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  601. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  602. attrib %_DESTI_NO% -s -h -r
  603. :pula_live_mail
  604. goto:eof
  605.  
  606.  
  607.  
  608.  
  609.  
  610. :outlook
  611. cd "%~dp0"
  612. ::BACKUP OUTLOOK
  613. call:killa_Outlook >NUL
  614. call:geracvs
  615. for /l %%a in (8,1,20) do (call:versao_outlook %%a)
  616. cd "%~dp0"
  617. if not exist "%appdata%\Microsoft\Outlook" goto pula_outlook
  618. if not exist "%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Registro" md "%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Registro"
  619. SET "_ORI_GEM="%appdata%\Microsoft\Outlook""
  620. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Outlook""
  621. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  622. SET "_EXCLUE_ARQS=/XF "*.TMP""
  623. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  624. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  625. attrib %_DESTI_NO% -s -h -r
  626. reg export "HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles" "%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Registro\Profiles2010.reg" /y >nul
  627. if "%OffiVer%"=="15.0" reg export "HKEY_CURRENT_USER\Software\Microsoft\Office\%OffiVer%\Outlook\Profiles" "%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Outlook\Profiles%OffiVer%.reg" /y >nul
  628. if "%OffiVer%"=="16.0" reg export "HKEY_CURRENT_USER\Software\Microsoft\Office\%OffiVer%\Outlook\Profiles" "%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Outlook\Profiles%OffiVer%.reg" /y >nul
  629. cd %_DESTI_NO%
  630. pushd "%_DESTI_NO%"
  631. cscript //nologo "%temp%\Catalogo.vbs" >nul
  632. popd
  633. :pula_outlook
  634.  
  635. if not exist "%userprofile%\Documents\Arquivos do Outlook" goto pula_arqsoutl
  636. SET "_ORI_GEM="%userprofile%\Documents\Arquivos do Outlook""
  637. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Arquivos do Outlook""
  638. if not exist "%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Arquivos do Outlook" md "%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Arquivos do Outlook"
  639. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  640. SET "_EXCLUE_ARQS=/XF "*.TMP""
  641. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  642. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  643. attrib %_DESTI_NO% -s -h -r
  644. :pula_arqsoutl
  645.  
  646. if not exist "%userprofile%\Meus Documentos\Arquivos do Outlook" goto pula_arqs_Oout
  647. SET "_ORI_GEM="%userprofile%\Meus Documentos\Arquivos do Outlook""
  648. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Arquivos do Outlook""
  649. if not exist "%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Arquivos do Outlook" md "%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Arquivos do Outlook"
  650. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  651. SET "_EXCLUE_ARQS=/XF "*.TMP""
  652. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  653. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  654. attrib %_DESTI_NO% -s -h -r
  655. :pula_arqs_Oout
  656.  
  657. if not exist "%USERPROFILE%\AppData\Roaming\Microsoft\Assinaturas" goto pula_assinaturas
  658. SET "_ORI_GEM="%USERPROFILE%\AppData\Roaming\Microsoft\Assinaturas""
  659. if not exist "%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Assinaturas" md "%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Assinaturas"
  660. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Backp_Outlook\Assinaturas""
  661. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  662. SET "_EXCLUE_ARQS=/XF "*.TMP""
  663. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  664. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  665. attrib %_DESTI_NO% -s -h -r
  666. :pula_assinaturas
  667. goto:eof
  668.  
  669.  
  670.  
  671.  
  672. :WALLPAPER_COPY
  673. call:ReadDesktopRegistry Wallpaper
  674. call:ReadDesktopRegistry SCRNSAVE.EXE
  675. if not exist "%Wallpaper%" goto pula_WALL
  676. SET "_ORI_GEM="%Wallpaper%""
  677. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Wallpaper\""
  678. If Not Exist "%~dp0BKP_AUTO\backup_%Username%\Wallpaper" Md "%~dp0BKP_AUTO\backup_%Username%\Wallpaper"
  679. xcopy /c /h /i /r /y /k /v %_ORI_GEM% %_DESTI_NO%
  680. attrib %_DESTI_NO% -s -h -r
  681. :pula_WALL
  682. if "%SCRNSAVE.EXE%"=="" goto pula_descan
  683. SET "_ORI_GEM="%SCRNSAVE.EXE%""
  684. SET "_DESTI_NO="%~dp0BKP_AUTO\Backup_%username%\Protetor_de_tela\""
  685. If Not Exist "%~dp0BKP_AUTO\backup_%Username%\Protetor_de_tela" Md "%~dp0BKP_AUTO\backup_%Username%\Protetor_de_tela"
  686. xcopy /c /h /i /r /y /k /v %_ORI_GEM% %_DESTI_NO%
  687. attrib %_DESTI_NO% -s -h -r
  688. :pula_descan
  689. goto:eof
  690.  
  691. :ReadDesktopRegistry
  692. FOR /F "delims=" %%A in ('reg query "HKCU\Control Panel\Desktop" /v "%~1"') DO (SET RegRead=%%A)
  693. FOR /F "tokens=3" %%A IN ("%RegRead%" ) DO (SET "%~1=%%A" )
  694. SET RegRead=""
  695. goto:eof
  696.  
  697.  
  698.  
  699.  
  700.  
  701.  
  702.  
  703.  
  704.  
  705.  
  706.  
  707.  
  708.  
  709.  
  710.  
  711. :Bkp_Part_Extra
  712. color 1f
  713. CALL :POS_TEL 47 24
  714. CALL:VER_LOCAL
  715. call :Abre_dir "SELECIONE A PASTA OU DRIVE PARA ACRESCENTAR NO BACKUP" "SOURCE"
  716. if /I "%SOURCE%"=="Cancelado" GOTO PULAINCRE
  717. SET SOURCE=%SOURCE:"=%
  718. :PULAINCRE
  719.  
  720. if /I "%SOURCE%"=="Cancelado" Goto In_icio
  721.  
  722.  
  723. echo wscript.echo len(wscript.arguments(0)) > %temp%\Tam_anho.vbs
  724. for /f "delims=" %%A in ('cscript //nologo %temp%\Tam_anho.vbs "%SOURCE%"') do set Qua_nt=%%A
  725. echo Tamanho: %Qua_nt% caracteres
  726.  
  727.  
  728. SET "_ORI_GEM="%SOURCE%""
  729.  
  730. for /D %%D in ("%SOURCE%") do (
  731.    set "PARENT=%%~nD"
  732. )
  733.  
  734. SET "_DESTI_NO="BKP_AUTO\Backup_%username%\Parti‡äes\%PARENT%""
  735.  
  736. if not "%Qua_nt%"=="3" goto:Nao_dive
  737. set SOURCE2=%SOURCE::=%
  738. set SOURCE3=%SOURCE2:\=%
  739. SET "_ORI_GEM="%SOURCE3%:""
  740. SET "_DESTI_NO="BKP_AUTO\Backup_%username%\Parti‡äes\%SOURCE3%""
  741. :Nao_dive
  742.  
  743. echo if "%Qua_nt%"=="3"
  744. echo quantidade %Qua_nt%
  745. echo origem %_ORI_GEM%
  746. echo destino %_DESTI_NO%
  747. pause
  748.  
  749.  
  750. if not exist %_DESTI_NO% md %_DESTI_NO%
  751. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  752. SET "_EXCLUE_ARQS=/XF "*.TMP""
  753. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  754.  
  755.  
  756. ::VERIFICAR DIRETORIO, ISSO IMPEDE QUE O PROGRAMA GERE PASTAS INFINITAS
  757.  
  758. set off=N
  759. CALL:PERGUNTA "Desligar o computador após executar o Backup" "set off=S" "set off=N" "msg.txt"
  760. if /i "%off%" == "N" (set shutdown=NÆo)
  761. if /i "%off%" == "S" (set shutdown=Sim)
  762.  
  763. ::INCIANDO BACKUP
  764. cls
  765. CALL :POS_TEL 100 40
  766. color 0a
  767. title Backup parti‡Æo [%disk%\] em [%cd%] Finalizar e desligar: %shutdown%
  768. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  769. attrib %_DESTI_NO% -s -h -r
  770.  
  771.  
  772. :: REGISTRANDO DATA E HORA INICIAL
  773. CALL:DAT_HOR
  774.  
  775.  
  776. echo  [DATA: %dt% HORA: %tm%] - INCOMPLETO >"BKP_AUTO\Backup_%username%\Parti‡äes\%pasta%\log.inf"
  777. robocopy /e /r:0 "%disk%" "%~dp0BKP_AUTO\Backup_%username%\Parti‡äes\%pasta%"
  778. attrib "BKP_AUTO\Backup_%username%\Parti‡äes\%pasta%" -s -h
  779. color 0a
  780. :: REGISTRANDO DATA E HORA FINAL
  781. CALL:DAT_HOR
  782. echo  [DATA: %dt% HORA: %tm%] - COMPLETO >"BKP_AUTO\Backup_%username%\Parti‡äes\%pasta%\log.inf"
  783. echo 
  784. CALL:MENS_AGENS2 "Backup da partição [%disk%] concluido!" "vbinformation" "Backup Automático"
  785. ::DESLIGAMENTO AUTOMATICO
  786. echo 
  787. if /i %off% == S (shutdown -s -t 0 -f) else (Goto In_icio)
  788.  
  789. :DAT_HOR
  790. date /t>"%temp%\DT.inf"
  791. time /t>"%temp%\TM.inf"
  792. for /f "tokens=*" %%D in (%temp%\DT.inf) do (set dt=%%D)
  793. for /f "tokens=*" %%T in (%temp%\TM.inf) do (set tm=%%T)
  794. GOTO:EOF
  795.  
  796.  
  797.  
  798. :PERGUNTA
  799. (
  800. Echo dim MSG, CRIAMSG, SILENCIO
  801. Echo MSG = %4
  802. Echo SILENCIO = true
  803. Echo BOSS = MsgBox^(%1, VBOKCancel, "B©SS-HEAD | CORP. 2017"^)
  804. Echo If BOSS = VBOK Then
  805. Echo set CRIAMSG = CreateObject^("Scripting.FileSystemObject"^)
  806. Echo set GRAVAMSG = CRIAMSG.OpenTextFile^(MSG, 8, True^)
  807. Echo GRAVAMSG.writeline %2
  808. Echo GRAVAMSG.close
  809. Echo else
  810. Echo set CRIAMSG = CreateObject^("Scripting.FileSystemObject"^)
  811. Echo set GRAVAMSG = CRIAMSG.OpenTextFile^(MSG, 8, True^)
  812. Echo GRAVAMSG.writeline %3
  813. Echo GRAVAMSG.close
  814. Echo End If
  815. )>RESPOSTA.VBS
  816. START RESPOSTA.VBS
  817.  
  818. :LOOP
  819. IF NOT EXIST %4 GOTO LOOP
  820. SET /P TESTE=<%4
  821. %TESTE%
  822. IF EXIST %4 DEL %4 >nul
  823. IF EXIST RESPOSTA.VBS DEL RESPOSTA.VBS >nul
  824. GOTO:EOF
  825.  
  826.  
  827.  
  828. :Abre_dir
  829. set Result=
  830. set input=%1
  831. set vbs=%temp%\_.vbs
  832. set tmp=%temp%\_.cmd
  833. (
  834. Echo.set WshShell=WScript.CreateObject("WScript.Shell"^)
  835. Echo.set shell=WScript.CreateObject("Shell.Application"^)
  836. Echo.sInput=WshShell.ExpandEnvironmentStrings("%%input%%"^)
  837. Echo.set folder=shell.BrowseForFolder(0,replace(sInput,chr(34^),""^),0^)
  838. Echo.if typename(folder^)="Nothing" Then  
  839. Echo.wscript.echo "set Result=Cancelado"
  840. Echo.WScript.Quit(1^)
  841. Echo.end if
  842. Echo.set folderItems=folder.Items(^)
  843. Echo.set folderItem=folderItems.Item(^)
  844. Echo.pathname=folderItem.Path
  845. Echo.wscript.echo "set Result="^& chr(34^) ^& pathname ^& chr(34^)
  846. )>%temp%\_.vbs
  847. cscript //nologo "%vbs%" > "%tmp%"
  848. for /f "delims=" %%a in (%tmp%) do %%a
  849. set "%~2=%Result:"=%"
  850. DEL %VBS% >NUL
  851. DEL %TMP% >NUL
  852. goto :EOF
  853.  
  854.  
  855. :ALERTA_SOM
  856. echo 
  857. CALL :POS_TEL 63 10
  858. CALL:DAT_HOR
  859. echo [DATA: %dt% HORA: %tm%] > "%~dp0BKP_AUTO\Backup_%username%\log.inf"
  860. echo 
  861. CALL:MAQUINA_ESCRE "        Arquivos do usuário: %username% salvo com sucesso!       "
  862. CALL:MAQUINA_ESCRE "        Salvando informacoes do sistema       "
  863.  
  864.  
  865. echo ^<table^> >"%~dp0BKP_AUTO\Backup_%username%\Softwares_de_%computername%.html"
  866. systeminfo | findstr /B /C:"Nome do host:" /C:"Nome do sistema operacional:" /C:"VersÆo do sistema operacional:" /C:"Propriet rio registrado:" /C:"Data da instala‡Æo original:" /C:"Fabricante do sistema:" /C:"Modelo do sistema:" /C:"Tipo de sistema:" /C:"VersÆo do BIOS:" /C:"Localidade do sistema:" /C:"Fuso hor rio:" /C:"Mem¢ria f¡sica total:" /C:"Dom¡nio:" /C:"Servidor de Logon:" /C:"Servidor DHCP:" >f.txt
  867. for /f "tokens=1* delims=:" %%a in (f.txt) do echo ^<tr^>^<td^>%%a^</td^> ^<td^>%%b^</td^>^</tr^> >>"%~dp0BKP_AUTO\Backup_%username%\Softwares_de_%computername%.html"
  868. echo ^</table^> >>"%~dp0BKP_AUTO\Backup_%username%\Softwares_de_%computername%.html"
  869.  
  870.  
  871. if exist f.txt del/q/s f.txt >nul
  872.  
  873. :: ALERTA SONORO
  874. echo 
  875. ::CHECAR DESLIGAMENTO AUTOMATICO
  876. if /i "%off%" == "S" (shutdown -s -t 0 -f)
  877. CALL:MENS_AGENS2 "Arquivos do usuário: %username% salvo com sucesso!" vbinformation "Backup Automático"
  878. echo 
  879. cd.. & goto In_icio
  880.  
  881.  
  882.  
  883. :MAQUINA_ESCRE
  884. (
  885. echo On Error Resume Next
  886. echo dim txt
  887. echo txt="%~1"
  888. echo for i=1 to len(txt^)
  889. echo  wscript.sleep 70
  890. echo  wscript.StdOut.Write mid(txt,i,1^)
  891. echo next
  892. echo wscript.echo ""
  893. )>%temp%\ef.vbs
  894. cscript /nologo %temp%\ef.vbs
  895. GOTO:EOF
  896.  
  897.  
  898.  
  899.  
  900. :del_bkp
  901. CALL :POS_TEL 50 13
  902. SETLOCAL ENABLEDELAYEDEXPANSION ENABLEEXTENSIONS
  903.  
  904. for /f "tokens=*" %%§ in ('dir /ad /b "\\?\%~dp0BKP_AUTO\Backup_*"') do (
  905.    set /a NB = NB + 1
  906.    set OPC_!NB!=%%§
  907.    )
  908. echo. ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
  909. For /l %%b in (1,1,!NB!) do (
  910. set "nome1=%%b "
  911. set "nome=!nome1:~0,2!^) !OPC_%%b!                                   "
  912. set "nome2=                                          "
  913. echo. ³  !nome2:~0,39!  ³
  914. echo. ³  !nome:~0,39!  ³
  915. echo. ³  !nome2:~0,39!  ³
  916. )
  917. echo. ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
  918. ECHO. DIGITE  ( V ) PARA VOLTAR AO MENU PRINCIPAL
  919. ECHO.
  920. set /p Sel_ecao="Digite o numero do Backup para excluir >: "
  921. SET ce1=!OPC_%Sel_ecao%!
  922. SET ce1=%ce1:~0,39%
  923. set NB=
  924. For /l %%b in (1,1,!NB!) do (
  925. set OPC_!NB!=
  926. )
  927. ECHO."%~dp0BKP_AUTO\%ce1%">$
  928. if /I "%Sel_ecao%"=="V" endlocal & GOTO In_icio
  929. endlocal
  930.  
  931.  
  932. FOR /F "TOKENS=1" %%A IN ('type $') DO (SET ce1=%%A)
  933. del /s /q $>nul
  934.  
  935. cls
  936. title  Backup Automatico ©
  937. set op=0
  938. IF EXIST "msg.txt" DEL "msg.txt" >nul
  939. CALL:PERGUNTA "ATENÇÃO TODO O BACKUP %ce1:"=% SERA APAGADO" "set op=0" "set op=V" "msg.txt">nul
  940. if /i %op% == V goto del_bkp
  941. if /i %op% == H goto In_icio
  942.  
  943. title Deletando todo o backup de [%ce1%]
  944.  
  945. CALL:MENS_AGENS2 "Arquivos do usuário: %ce1:"=% serão apagados agora" vbinformation "Backup Automático">nul
  946.  
  947. del %ce1% /q /s /f  >NUL
  948. rd %ce1% /s /q >NUL
  949.  
  950. cls
  951. echo 
  952. color 0a
  953. echo 
  954. Set "Ti_Tle_Men=ATENÇÂO"
  955. set "Ti_po_men=64"
  956. set "M_ensa=%username%:  \nA pasta de backup do usuário \n[%ce1:"=%] \nfoi apagada com sucesso!"
  957. CALL:MENS_AGENS "%M_ensa%" "%Ti_po_men%" "%Ti_Tle_Men%"
  958. goto In_icio
  959.  
  960.  
  961.  
  962.  
  963.  
  964.  
  965.  
  966.  
  967. :Res_bkp_Biblio
  968. echo Criando ponto de restaura‡Æo...
  969. echo Aguarde ....
  970. echo Set IRP = getobject("winmgmts:\\.\root\default:Systemrestore") > "%Temp%\rest.vbs"
  971. echo strDescription = "Restauração De Backups %date:/=-%" >> "%Temp%\rest.vbs"
  972. echo MYRP = IRP.createrestorepoint (strDescription, 0, 100) >> "%Temp%\rest.vbs"
  973. cscript //nologo "%Temp%\rest.vbs" >nul
  974. cls
  975.  
  976. rem CALL :POS_TEL 50 13
  977. SETLOCAL ENABLEDELAYEDEXPANSION ENABLEEXTENSIONS
  978. echo.
  979. echo.
  980. echo.
  981. for /f "tokens=*" %%§ in ('dir /ad /b "\\?\%~dp0BKP_AUTO\Backup_*"') do (
  982.    set /a NB = NB + 1
  983.    set OPC_!NB!=%%§
  984.    )
  985. echo. ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
  986. For /l %%b in (1,1,!NB!) do (
  987. set "nome1=%%b "
  988. set "nome=!nome1:~0,2!^) !OPC_%%b!                                   "
  989. set "nome2=                                          "
  990. echo. ³  !nome2:~0,39!  ³
  991. echo. ³  !nome:~0,39!  ³
  992. echo. ³  !nome2:~0,39!  ³
  993. )
  994. echo. ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
  995. ECHO. DIGITE  ( V ) PARA VOLTAR AO MENU PRINCIPAL
  996. ECHO.
  997. set /p Sel_ecao="Digite o numero do Backup para Restaurar >: "
  998. SET ce1=!OPC_%Sel_ecao%!
  999. SET ce1=%ce1:~0,39%
  1000. set NB=
  1001. For /l %%b in (1,1,!NB!) do (
  1002. set OPC_!NB!=
  1003. )
  1004. ECHO."%~dp0BKP_AUTO\%ce1%">$
  1005. if /I "%Sel_ecao%"=="V" endlocal & GOTO In_icio
  1006. endlocal
  1007.  
  1008.  
  1009. FOR /F "TOKENS=1" %%A IN ('type $') DO (SET ce1=%%A)
  1010. del /s /q $>nul
  1011.  
  1012. cls
  1013. title  Backup Automatico ©
  1014. set op=0
  1015. IF EXIST "msg.txt" DEL "msg.txt" >nul
  1016. CALL:PERGUNTA "ATENÇÃO TODO O BACKUP %ce1:"=% SERA RESTAURADO" "set op=0" "set op=V" "msg.txt">nul
  1017. if /i %op% == V goto Res_bkp_Biblio
  1018. if /i %op% == H goto In_icio
  1019.  
  1020. title Restaurando todo o backup de [%ce1%]
  1021. SET "A_RESTAURAR=%ce1:"=%"
  1022.  
  1023. CALL:MENS_AGENS2 "Arquivos do usuário: %ce1:"=% serão restaurados agora" vbinformation "Backup Automático">nul
  1024.  
  1025. :: OK
  1026. CALL:RES_BIBLIOTECAS
  1027. CALL:RES_DRIVE_C
  1028. CALL:RES_Me_ga
  1029. CALL:RES_Me_ga_sync
  1030. CALL:RES_Me_ga_sync_down
  1031. CALL:RES_Notas_Adesivas
  1032. CALL:RES_SKYPE_COPY
  1033. CALL:RES-WALLPAPER_COPY
  1034. CALL:RES-WALLPAPER_COPY2
  1035. CALL:RES_outlook
  1036.  
  1037.  
  1038.  
  1039. cls
  1040. echo 
  1041. color 0a
  1042. echo 
  1043. Set "Ti_Tle_Men=ATENÇÂO"
  1044. set "Ti_po_men=64"
  1045. set "M_ensa=%username%:  \nA pasta de backup do usuário \n[%ce1:"=%] \nfoi restaurada com sucesso!"
  1046. CALL:MENS_AGENS "%M_ensa%" "%Ti_po_men%" "%Ti_Tle_Men%"
  1047. goto In_icio
  1048.  
  1049.  
  1050.  
  1051.  
  1052.  
  1053. :: RESTAURAR TODO CONTEUDO DO USUÁRIO
  1054. :RES_BIBLIOTECAS
  1055.  
  1056. SET "_ORI_GEM="%A_RESTAURAR%""
  1057. SET "_DESTI_NO="%userprofile%""
  1058. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1059.  
  1060. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1061. SET "_EXCLUE_DIRS=/XD "%A_RESTAURAR%\Mega" /XD "%A_RESTAURAR%\Mega_Sync" /XD "%A_RESTAURAR%\Mega_Sync\Downloads" /XD "%A_RESTAURAR%\Notas_Adesivas" /XD "%A_RESTAURAR%\Skype" /XD "%A_RESTAURAR%\Backp_Live_Mail\Live_Mail" /XD "%A_RESTAURAR%\Backp_Outlook\Outlook" /XD "%A_RESTAURAR%\Backp_Outlook\Outlook" /XD "%A_RESTAURAR%\Drive_C" /XD "%A_RESTAURAR%\Backp_Outlook\Arquivos do Outlook" /XD "%A_RESTAURAR%\Backp_Outlook\Registro" /XD "%A_RESTAURAR%\Backp_Outlook\Assinaturas" /XD "%A_RESTAURAR%\Wallpaper" /XD "%A_RESTAURAR%\Protetor_de_tela" /XD "%A_RESTAURAR%\Backp_Outlook\Assinaturas""
  1062. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1063. Set "_SWITCH=%_OPC_OES% %_EXCLUE_DIRS% %_EXCLUE_ARQS%"
  1064. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1065.  
  1066.  
  1067. :: copia bibliotecas caso tenham sido movidas por precaução
  1068.  
  1069. SET "SF=HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders"
  1070. :: OK
  1071. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "Desktop"') do set Desktop=%%j
  1072. if /i "%Desktop%" EQU "%userprofile%\Desktop" GOTO RES_Desk_t01
  1073. if not exist "%A_RESTAURAR%\Desktop" GOTO RES_Desk_t01
  1074. SET "_ORI_GEM="%A_RESTAURAR%\Desktop""
  1075. SET "_DESTI_NO="%Desktop%""
  1076. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1077.  
  1078.  
  1079. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1080. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1081. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1082. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1083. :RES_Desk_t01
  1084.  
  1085.  
  1086.  
  1087. :: OK
  1088. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "Favorites"') do set Favorites=%%j
  1089. if /i "%Favorites%" EQU "%userprofile%\Favorites" GOTO RES_Fav_t01
  1090. if not exist "%A_RESTAURAR%\Favorites" GOTO RES_Fav_t01
  1091. SET "_ORI_GEM="%A_RESTAURAR%\Favorites""
  1092. SET "_DESTI_NO="%Favorites%""
  1093. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1094.  
  1095. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1096. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1097. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1098. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1099. attrib %_DESTI_NO% -s -h -r
  1100. :RES_Fav_t01
  1101.  
  1102.  
  1103.  
  1104. :: OK
  1105. for /f "tokens=3,*" %%i in ('reg query "%SF%" /v "My Video"') do set Videos=%%j
  1106. if /i "%Videos%" EQU "%userprofile%\Videos" GOTO RES_Vid_t01
  1107. if not exist "%A_RESTAURAR%\Videos" GOTO RES_Vid_t01
  1108. SET "_ORI_GEM="%A_RESTAURAR%\Videos""
  1109. SET "_DESTI_NO="%Videos%""
  1110. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1111.  
  1112.  
  1113. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1114. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1115. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1116. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1117. attrib %_DESTI_NO% -s -h -r
  1118. :RES_Vid_t01
  1119.  
  1120.  
  1121.  
  1122. :: OK
  1123. for /f "tokens=3,*" %%i in ('reg query "%SF%" /v "My Music"') do set Music=%%j
  1124. if /i "%Music%" EQU "%userprofile%\Music" GOTO RES_Mus_t01
  1125. if not exist "%A_RESTAURAR%\Music" GOTO RES_Mus_t01
  1126. SET "_ORI_GEM="%A_RESTAURAR%\Music""
  1127. SET "_DESTI_NO="%Music%""
  1128. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1129.  
  1130. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1131. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1132. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1133. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1134. attrib %_DESTI_NO% -s -h -r
  1135. :RES_Mus_t01
  1136.  
  1137.  
  1138.  
  1139. :: OK
  1140. for /f "tokens=3,*" %%i in ('reg query "%SF%" /v "My Pictures"') do set Pictures=%%j
  1141. if /i "%Pictures%" EQU "%userprofile%\Pictures" GOTO RES_Pic_t01
  1142. if not exist "%A_RESTAURAR%\Pictures" GOTO RES_Pic_t01
  1143. SET "_ORI_GEM="%A_RESTAURAR%\Pictures""
  1144. SET "_DESTI_NO="%Pictures%""
  1145. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1146.  
  1147. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1148. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1149. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1150. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1151. attrib %_DESTI_NO% -s -h -r
  1152. :RES_Pic_t01
  1153.  
  1154.  
  1155. :: OK
  1156. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "{374DE290-123F-4565-9164-39C4925E467B}"') do set Downloads=%%j
  1157. if /i "%Downloads%" EQU "%userprofile%\Downloads" GOTO RES_Dow_t01
  1158. if not exist "%A_RESTAURAR%\Downloads" GOTO RES_Dow_t01
  1159. SET "_ORI_GEM="%A_RESTAURAR%\Downloads""
  1160. SET "_DESTI_NO="%Downloads%""
  1161. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1162.  
  1163.  
  1164. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1165. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1166. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1167. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1168. attrib %_DESTI_NO% -s -h -r
  1169. :RES_Dow_t01
  1170.  
  1171.  
  1172. :: OK
  1173. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "{4C5C32FF-BB9D-43B0-B5B4-2D72E54EAAA4}"') do set Games=%%j
  1174. if /i "%Games%" EQU "%userprofile%\Saved Games" GOTO RES_Gam_t01
  1175. if not exist "%A_RESTAURAR%\Saved Games" GOTO RES_Gam_t01
  1176. SET "_ORI_GEM="%A_RESTAURAR%\Saved Games""
  1177. SET "_DESTI_NO="%Games%""
  1178.  
  1179.  
  1180. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1181.  
  1182. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1183. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1184. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1185. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1186. attrib %_DESTI_NO% -s -h -r
  1187. :RES_Gam_t01
  1188.  
  1189.  
  1190.  
  1191. :: OK
  1192. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "{56784854-C6CB-462B-8169-88E350ACB882}"') do set Contacts=%%j
  1193. if /i "%Contacts%" EQU "%userprofile%\Contacts" GOTO RES_Com_t01
  1194. if not exist "%A_RESTAURAR%\Contacts" GOTO RES_Com_t01
  1195. SET "_ORI_GEM="%A_RESTAURAR%\Contacts""
  1196. SET "_DESTI_NO="%Contacts%""
  1197.  
  1198. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1199.  
  1200.  
  1201. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1202. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1203. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1204. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1205. attrib %_DESTI_NO% -s -h -r
  1206. :RES_Com_t01
  1207.  
  1208. :: OK
  1209. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "{7D1D3A04-DEBB-4115-95CF-2F29DA2920DA}"') do set Searches=%%j
  1210. if /i "%Searches%" EQU "%userprofile%\Searches" GOTO RES_Sea_t01
  1211. if not exist "%A_RESTAURAR%\Searches" GOTO RES_Sea_t01
  1212. SET "_ORI_GEM="%A_RESTAURAR%\Searches""
  1213. SET "_DESTI_NO="%Searches%""
  1214. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1215.  
  1216.  
  1217. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1218. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1219. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1220. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1221. attrib %_DESTI_NO% -s -h -r
  1222. :RES_Sea_t01
  1223.  
  1224.  
  1225. :: OK
  1226. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "{BFB9D5E0-C6A9-404C-B2B2-AE6DB6AF4968}"') do set Links=%%j
  1227. if /i "%Links%" EQU "%userprofile%\Links" GOTO RES_Lin_t01
  1228. if not exist "%A_RESTAURAR%\Links" GOTO RES_Lin_t01
  1229. SET "_ORI_GEM="%A_RESTAURAR%\Links""
  1230. SET "_DESTI_NO="%Links%""
  1231.  
  1232. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1233.  
  1234. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1235. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1236. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1237. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1238. attrib %_DESTI_NO% -s -h -r
  1239. :RES_Lin_t01
  1240.  
  1241.  
  1242.  
  1243. :: OK
  1244. for /f "tokens=2,*" %%i in ('reg query "%SF%" /v "Personal"') do set Documents=%%j
  1245. if /i "%Documents%" EQU "%userprofile%\Documents" GOTO RES_Doc_t01
  1246. if not exist "%A_RESTAURAR%\Documents" GOTO RES_Doc_t01
  1247. SET "_ORI_GEM="%A_RESTAURAR%\Documents""
  1248. SET "_DESTI_NO="%Documents%""
  1249.  
  1250. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1251.  
  1252.  
  1253. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1254. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1255. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1256. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1257. attrib %_DESTI_NO% -s -h -r
  1258. :RES_Doc_t01
  1259. goto:eof
  1260.  
  1261. :: OK
  1262. :RES_DRIVE_C
  1263. SET "_ORI_GEM="%A_RESTAURAR%\Drive_C""
  1264. SET "_DESTI_NO="%SYSTEMDRIVE%""
  1265.  
  1266. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1267. if not exist "%A_RESTAURAR%\Drive_C" goto:eof
  1268. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1269. REM SET "_EXCLUE_DIRS=/XD "%A_RESTAURAR%\Mega" /XD "%A_RESTAURAR%\Mega_Sync" /XD "%A_RESTAURAR%\Mega_Sync\Downloads" /XD "%SYSTEMDRIVE%\Windows" /XD "%SYSTEMDRIVE%\Program Files (x86)" /XD "%SYSTEMDRIVE%\$Recycle.Bin" /XD "%SYSTEMDRIVE%\MSOCache" /XD "%SYSTEMDRIVE%\ProgramData" /XD "%SYSTEMDRIVE%\System Volume Information" /XD "%SYSTEMDRIVE%\Recovery" /XD "%SYSTEMDRIVE%\PerfLogs" /XD "%SYSTEMDRIVE%\$AV_ASW" /XD "%SYSTEMDRIVE%\Intel" /XD "%SYSTEMDRIVE%\TESTE" /XD "%A_RESTAURAR%\Wallpaper\""
  1270. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1271. REM Set "_SWITCH=%_OPC_OES% %_EXCLUE_DIRS% %_EXCLUE_ARQS%"
  1272. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1273. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1274. goto:eof
  1275.  
  1276.  
  1277.  
  1278. :: OK
  1279. :RES_Me_ga
  1280. if not exist "%A_RESTAURAR%\Mega" goto:eof
  1281. if not exist "%userprofile%\Documents\MEGA" MD "%userprofile%\Documents\MEGA"
  1282. SET "_ORI_GEM="%A_RESTAURAR%\Mega""
  1283. SET "_DESTI_NO="%userprofile%\Documents\MEGA""
  1284.  
  1285. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1286. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1287. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1288. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1289. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1290. goto:eof
  1291.  
  1292. :: OK
  1293. :RES_Me_ga_sync
  1294. if not exist "%A_RESTAURAR%\Mega_Sync" goto:eof
  1295. if not exist "%userprofile%\Documents\MEGAsync" MD "%userprofile%\Documents\MEGAsync"
  1296. SET "_ORI_GEM="%A_RESTAURAR%\Mega_Sync""
  1297. SET "_DESTI_NO="%userprofile%\Documents\MEGAsync""
  1298.  
  1299. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1300. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1301. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1302. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1303. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1304. goto:eof
  1305.  
  1306.  
  1307. :: OK
  1308. :RES_Me_ga_sync_down
  1309. if not exist "%A_RESTAURAR%\Mega_Sync\Downloads" goto:eof
  1310. if not exist "%userprofile%\Documents\MEGAsync Downloads" md "%userprofile%\Documents\MEGAsync Downloads"
  1311. SET "_ORI_GEM="%A_RESTAURAR%\Mega_Sync\Downloads""
  1312. SET "_DESTI_NO="%userprofile%\Documents\MEGAsync Downloads""
  1313.  
  1314. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1315. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1316. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1317. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1318. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1319. goto:eof
  1320.  
  1321. :: OK
  1322. :RES_Notas_Adesivas
  1323. if not exist "%A_RESTAURAR%\Notas_Adesivas" goto:eof
  1324. if not exist "%USERPROFILE%\AppData\Roaming\Microsoft\Sticky Notes" MD "%USERPROFILE%\AppData\Roaming\Microsoft\Sticky Notes"
  1325. SET "_ORI_GEM="%A_RESTAURAR%\Notas_Adesivas""
  1326. SET "_DESTI_NO="%USERPROFILE%\AppData\Roaming\Microsoft\Sticky Notes""
  1327.  
  1328. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1329. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1330. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1331. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1332. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1333. goto:eof
  1334.  
  1335.  
  1336.  
  1337.  
  1338. :: OK
  1339. :RES_SKYPE_COPY
  1340. if not exist "%A_RESTAURAR%\Skype" goto:eof
  1341. if not exist "%appdata%\Skype" MD "%appdata%\Skype"
  1342. SET "_ORI_GEM="%A_RESTAURAR%\Skype""
  1343. SET "_DESTI_NO="%appdata%\Skype""
  1344.  
  1345. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1346. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1347. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1348. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1349. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1350. goto:eof
  1351.  
  1352.  
  1353. :RES-WALLPAPER_COPY
  1354. call:RES_ReadDesktopRegistry Wallpaper
  1355. call:RES_ReadDesktopRegistry SCRNSAVE.EXE
  1356. If Not Exist "%A_RESTAURAR%\Wallpaper" goto:eof
  1357. if not exist "%Wallpaper%" MD "%Wallpaper%"
  1358. SET "_ORI_GEM="%A_RESTAURAR%\Wallpaper\""
  1359. SET "_DESTI_NO="%Wallpaper%""
  1360. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1361. xcopy /c /h /i /r /y /k /v %_ORI_GEM% %_DESTI_NO%
  1362. :RES-WALLPAPER_COPY2
  1363. If Not Exist "%A_RESTAURAR%\Protetor_de_tela" goto:eof
  1364. If Not Exist "%SCRNSAVE.EXE%" Md "%SCRNSAVE.EXE%"
  1365.  
  1366. SET "_ORI_GEM="%A_RESTAURAR%\Protetor_de_tela\""
  1367. SET "_DESTI_NO="%SCRNSAVE.EXE%""
  1368. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1369.  
  1370. xcopy /c /h /i /r /y /k /v %_ORI_GEM% %_DESTI_NO%
  1371. goto:eof
  1372.  
  1373. :RES_ReadDesktopRegistry
  1374. FOR /F "delims=" %%A in ('reg query "HKCU\Control Panel\Desktop" /v "%~1"') DO (SET RegRead=%%A)
  1375. FOR /F "tokens=3" %%A IN ("%RegRead%" ) DO (SET "%~1=%%A" )
  1376. SET RegRead=""
  1377. goto:eof
  1378.  
  1379.  
  1380. :RES_LIVE_MAIL
  1381. cd "%~dp0"
  1382. if not exist "%A_RESTAURAR%\Backp_Live_Mail\Live_Mail" goto RES_pula_live_mail
  1383. if not exist "%localappdata%\Microsoft\Windows Live Mail" md "%localappdata%\Microsoft\Windows Live Mail"
  1384. SET "_ORI_GEM="%A_RESTAURAR%\Backp_Live_Mail\Live_Mail""
  1385. SET "_DESTI_NO="%localappdata%\Microsoft\Windows Live Mail""
  1386. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1387. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1388. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1389. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1390. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1391. attrib %_DESTI_NO% -s -h -r
  1392. regiedit.exe /s "%_DESTI_NO:"=%\Live_Mail.reg">nul
  1393. SET "_ORI_GEM="%A_RESTAURAR%\Backp_Live_Mail\Live""
  1394. SET "_DESTI_NO="%localappdata%\Microsoft\Windows Live""
  1395. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1396. if not exist "%localappdata%\Microsoft\Windows Live" md "%localappdata%\Microsoft\Windows Live"
  1397. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1398. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1399. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1400. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1401. attrib %_DESTI_NO% -s -h -r
  1402. :RES_pula_live_mail
  1403. goto:eof
  1404.  
  1405.  
  1406. :RES_outlook
  1407. call:killa_Outlook >NUL
  1408. for /l %%a in (8,1,20) do (call:versao_outlook %%a)
  1409. if not exist "%A_RESTAURAR%\Backp_Outlook\Outlook" GOTO RES_outlook_1
  1410. if not exist "%appdata%\Microsoft\Outlook" MD "%appdata%\Microsoft\Outlook"
  1411. SET "_ORI_GEM="%A_RESTAURAR%\Backp_Outlook\Outlook""
  1412. SET "_DESTI_NO="%appdata%\Microsoft\Outlook""
  1413. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1414.  
  1415. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1416. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1417. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1418. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1419. IF EXIST "%A_RESTAURAR%\Backp_Outlook\Registro\Profiles2010.reg" REGEDIT /S "%A_RESTAURAR%\Backp_Outlook\Registro\Profiles2010.reg"
  1420. IF EXIST "%A_RESTAURAR%\Backp_Outlook\Outlook\Profiles%OffiVer%.reg" REGEDIT /S "%A_RESTAURAR%\Backp_Outlook\Outlook\Profiles%OffiVer%.reg"
  1421.  
  1422. :RES_outlook_1
  1423. if not exist "%A_RESTAURAR%\Backp_Outlook\Arquivos do Outlook" goto RES_pula_arqsoutl
  1424. if not exist "%userprofile%\Documents\Arquivos do Outlook" md "%userprofile%\Documents\Arquivos do Outlook"
  1425. SET "_ORI_GEM="%A_RESTAURAR%\Backp_Outlook\Arquivos do Outlook""
  1426. SET "_DESTI_NO="%userprofile%\Documents\Arquivos do Outlook""
  1427.  
  1428. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1429.  
  1430. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1431. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1432. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1433. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1434.  
  1435. :RES_pula_arqsoutl
  1436. if not exist "%A_RESTAURAR%\Backp_Outlook\Arquivos do Outlook" goto RES_pula_arqs_Oout
  1437. if not exist "%userprofile%\Meus Documentos\Arquivos do Outlook" md "%userprofile%\Meus Documentos\Arquivos do Outlook"
  1438. SET "_ORI_GEM="%A_RESTAURAR%\Backp_Outlook\Arquivos do Outlook""
  1439. SET "_DESTI_NO="%userprofile%\Meus Documentos\Arquivos do Outlook""
  1440.  
  1441. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1442.  
  1443. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1444. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1445. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1446. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1447.  
  1448.  
  1449. :RES_pula_arqs_Oout
  1450. if not exist "%A_RESTAURAR%\Backp_Outlook\Assinaturas" goto RES_pula_assinaturas
  1451. if not exist "%USERPROFILE%\AppData\Roaming\Microsoft\Assinaturas" md "%USERPROFILE%\AppData\Roaming\Microsoft\Assinaturas"
  1452. SET "_ORI_GEM="%A_RESTAURAR%\Backp_Outlook\Assinaturas""
  1453. SET "_DESTI_NO="%USERPROFILE%\AppData\Roaming\Microsoft\Assinaturas""
  1454.  
  1455. ECHO ORIGEM %_ORI_GEM%    DESTINO %_DESTI_NO%
  1456.  
  1457. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1458. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1459. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1460. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1461. :RES_pula_assinaturas
  1462. goto:eof
  1463.  
  1464.  
  1465.  
  1466.  
  1467. :RES_Past_ou_Part
  1468. call :Abre_dir "SELECIONE A PASTA PARA ACRESCENTAR NO BACKUP" "Ori_gem"
  1469. if /I "%Ori_gem%"=="Cancelado" exit
  1470. SET Ori_gem=%Ori_gem:"=%
  1471.  
  1472. call :Abre_dir "SELECIONE A PASTA PARA ACRESCENTAR NO BACKUP" "Des_tino"
  1473. if /I "%Des_tino%"=="Cancelado" exit
  1474. SET Des_tino=%Des_tino:"=%
  1475.  
  1476. echo wscript.echo len(wscript.arguments(0)) > %temp%\Tam_anho.vbs
  1477. for /f "delims=" %%A in ('cscript //nologo %temp%\Tam_anho.vbs "%Ori_gem%"') do set Qua_nt=%%A
  1478. echo Tamanho: %Qua_nt% caracteres
  1479.  
  1480. SET "_ORI_GEM="%Ori_gem:"=%""
  1481.  
  1482. set "FOLDER=%CD%"
  1483. for /D %%D in ("%Ori_gem%") do (
  1484.    set "PARENT=%%~nD"
  1485. )
  1486.  
  1487. SET "_DESTI_NO="%Des_tino%\%PARENT%""
  1488.  
  1489. if not "%Qua_nt%"=="3" goto:Nao_dive
  1490. set SOURCE2=%Ori_gem::=%
  1491. set SOURCE3=%SOURCE2:\=%
  1492. SET "_ORI_GEM="%SOURCE3%:""
  1493. SET "_DESTI_NO="%Des_tino%\%SOURCE3%""
  1494. :Nao_dive
  1495.  
  1496. SET "_ORI_GEM="%_ORI_GEM:"=%""
  1497. SET "_DESTI_NO="%_DESTI_NO:"=%""
  1498.  
  1499. if not exist %_DESTI_NO% md %_DESTI_NO%
  1500. :: TODOS ARQUIVOS DO USUÁRIO
  1501. echo origem %_ORI_GEM%
  1502. echo destino %_DESTI_NO%
  1503.  
  1504. SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO"
  1505. REM SET "_OPC_OES=/XJD /R:0 /XA:SH /E /ZB /XO /NFL /NDL /NP"
  1506. rem robocopy "$liveRepoLocation" "$cloneRepoLocation" /MIR /MT /W:3 /R:100 /NFL /NDL /NP 2>&1 | findstr /v /L /C:" * EXTRA " | findstr /v /L /C:"100%%" > "$backupLogLocation\BackupKiln.txt"
  1507. rem  /log+:"%~dp0BK_AUTO\Backup_%username%\Log_Copias.txt""
  1508. rem SET "_EXCLUE_DIRS=/XD "AppData" /XD "Tracing" /XD "%userprofile%\Documents\MEGA" /XD "%userprofile%\Documents\MEGAsync Downloads" /XD "%userprofile%\Documents\MEGAsync" /XD "%userprofile%\Documents\Arquivos do Outlook""
  1509. SET "_EXCLUE_ARQS=/XF "*.TMP""
  1510. Set "_SWITCH=%_OPC_OES% %_EXCLUE_ARQS%"
  1511. rem %_EXCLUE_DIRS%
  1512. Robocopy %_ORI_GEM% %_DESTI_NO% %_SWITCH%
  1513. attrib %_DESTI_NO% -s -h -r
  1514. goto:eof
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!