Results 1 to 13 of 13

Hybrid View

Previous Post Previous Post   Next Post Next Post
  1. #1
    video maniac sancho's Avatar
    Join Date: Nov:2005
    Location: Îñòðîâ Âàíêóâúð
    Posts: 846

    áåçïëàòåí ñîôòóåð çà backup ???

    Òúðñÿ ñëåäíîòî íåùî:

    1. Äà êîïèðà ïðåäâàðèòåëíî äåôèíèðàíè äèðåêòîðèè îò õàðäà êúì ôëàøêàòà.
    2. Äà å àáñîëþòíî áåçïëàòåí (õàêíàòè, 5 äîëàðîâè è äðóãè ïîäîáíè íå ñòàâàò)
    3. Íÿìà íóæäà äà çèïîñâà íèòî äà äåáíå îïðåäåëåí ÷àñ çà çàäåéñòâàíå (ïóñêà ñå ðú÷íî).
    4. Ñ íåãî ùå ðàáîòÿò õîðà êîèòî íå ñà îñîáåíî íàâúòðå ñ êîìïþòðèòå, òîåñò êëèêàò, ãëåäàò êâî ñòàâà, âàäÿò ôëàøêàòà.


    Çàùî íå íàïèøà åäèí DOS bat file ? Çàùîòî íÿìà êàê äà çíàì êîÿ "áóêâà" å ôëàøêàòà, à òîâà ùå ñå ïóñêà íà ðàçëè÷íè ìàøèíè.

    Ìåðñè !

  2. #2
    Registered User georgyg's Avatar
    Join Date: Jul:2003
    Location: Sofia
    Posts: 227
    Windows Backup-à âúðøè ðàáîòà.
    Èìà Wizard, ïóñêà ñå ëåñíî ñ 2-3 êëèêàíÿ è ò.í.

    Ôëàøêàòà ñå ñëàãà åäíà è ñúùà áóêâà, àêî ñå áîöâà â åäèí è ñúù ïîðò è íÿìà äðóãè óñòðàéñòâà íà òàçè áóêâà, ïîÿâèëè ñå ïðåæäåâðåìåííî èëè å ñìåíåíà ôëàøêàòà
    "Beauty is not enough"

  3. #3
    An Ocean Soul Guardian's Avatar
    Join Date: Jul:2001
    Location: Ñîôèÿ
    Posts: 1,203
    Âèæ Cobian Backup äàëè ùå òè ñâúðøè ðàáîòà.

  4. #4
    Âåãàí íà ìåñíà äèåòà XaMaB's Avatar
    Join Date: Nov:2001
    Location: Ñîôèÿ
    Posts: 20,392
    Àç ïîëçâàì SyncToy
    Ïîñëåäíà ðåäàêöèÿ: èçâúðøåíà îò XaMaB; íà äíåøíà äàòà. 0.42 ñåêóíäè ñëåä ïóñêàíå íà ïîñòà

    In God we Trust (all others must submit a X.509 certificate). Àêî ñïîðèø ñ èäèîò, âåðîÿòíî è òîé ïðàâè ñúùîòî èëè ñè ïîïàäíàë íà ïàðòèåí (íåïúëåí) ÷ëåí

  5. #5
    Banned
    Join Date: Jun:2008
    Location: Ñòàðà Çàãîðà
    Posts: 1,880
    Quote Originally Posted by XaMaB View Post
    Àç ïîëçâàì SyncToy
    1+

  6. #6
    Nostrum IvO™'s Avatar
    Join Date: Jun:2008
    Location: HOME.WAD
    Posts: 1,334

  7. #7
    Banned
    Join Date: Oct:2003
    Location: Ñîôèÿ
    Posts: 5,259
    Quote Originally Posted by Guardian View Post
    Âèæ Cobian Backup äàëè ùå òè ñâúðøè ðàáîòà.
    2 ðúöå çà íåãî. Ìîãà äà êàæà, ÷å òîÿ ñîôòóåð å ïðåêàðàë íà ìîè ìàøèíè ïîíå 20-22TB äàííè.

  8. #8
    If it ain't broke o/c it WoW's Avatar
    Join Date: Jun:2004
    Location: Motor City
    Posts: 1,980
    Àêî .bat ôàéëà ñ êîìàíäà ïðèìåðíî

    copy "Ñ:\TEST\*.*" ".\TEST\"

    ñå íàìèðà íà ôëàøêàòà è ñå ñòàðòèðà îò òàì, áóêâàòà íÿìà çíà÷åíèå. Äàæå ìîæå äà ãî íàïðàâèø äà ñå ñòàðòèðà àòîìàòè÷íî ïðè âêàðâàíå íà ôëàøêàòà.
    Ïðîñòî èäåÿ.

  9. #9
    Registered User
    Join Date: Dec:2005
    Location: yvr
    Posts: 5,167
    Quote Originally Posted by sancho View Post
    ...Çàùî íå íàïèøà åäèí DOS bat file ? Çàùîòî íÿìà êàê äà çíàì êîÿ "áóêâà" å ôëàøêàòà, à òîâà ùå ñå ïóñêà íà ðàçëè÷íè ìàøèíè...
    Çàîáèêîëåí âàðèàíò- ñëàãàø ïðåäâàðèòåëíî åäèí tag ôàéë íà ôëàøêàòà è ñè íàìèðàø áóêâàòà ïî íåãî:

    Code:
    SET TAGFILE=\mytagfile
    FOR %%i IN (C D E F G H I J K L M N O P Q R S T U V W X Y) DO IF EXIST "%%i:%TAGFILE%" SET USBDRIVE=%%i:

  10. #10
    If it ain't broke o/c it WoW's Avatar
    Join Date: Jun:2004
    Location: Motor City
    Posts: 1,980
    Åòî è åäèí VBscript, êîéòî îòêðèâà áóêâàòà íà Removable Disk/ôëàøêà è êîïèðà ïàïêàòà "X:\Source Folder For Backup" â root-à é, ñ ïðîãðåñ áàð è ñúîáùåíèå çà êðàé íà êîïèðàíåòî. Àêî èìà ïîâå÷å îò åäèí Removable Disk/ôëàøêà çàêà÷åíè, êîïèðà ñå íà âñè÷êè åäíà ïî åäíà:

    Code:
    ' Íàìèðàìå Áóêâàòà íà USB ôëàøêàòà è êîïèðàìå "X:\Source Folder For Backup" â root é
    strComputer = "." 
    Set objWMIService = GetObject("winmgmts:" _ 
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 
    Set colDisks = objWMIService.ExecQuery _ 
    ("Select * from Win32_LogicalDisk") 
    For each objDisk in colDisks 
        If objDisk.DriveType = 2 then'2=Removable
            SourceFolder ="X:\Source Folder For Backup"
            TargetFolder = objDisk.Name & "\"
            Set objShell = CreateObject("Shell.Application")
            Set objFolder = objShell.NameSpace(TargetFolder)
            objFolder.CopyHere SourceFolder, 16 
        End If 
    Next 
    MsgBox ("Backup Completed Succesfully")
    EDIT: Äà, Bombera. Ñåòèõ ñå çà òîâà è ãî ïðîìåíèõ äà êîïèðà íà âñè÷êè. Ìàëêî èçëèøíà ðàáîòà, àìà å fulproof.

  11. #11
    Áåëûé è ïóøèñòûé Bombera's Avatar
    Join Date: Jul:2001
    Location: Êàçàíëúê 4EVA
    Posts: 13,833
    Àêî ñà ïîâå÷å îò åäíà ôëàøêà, ñå êîïèðà íà ïîñëåäíàòà
    EVGA X299 FTW K|i9-7960X@4.7|4x8 Patriot Viper Steel 4000|GTX 1660 Ti|970 EVO 1 TB|Seasonic Focus GX-1000|Xigmatek Elysium|Êèëî è ïîëîâèíà âîäà
    Rampage IV Extreme BE|E5-1680v2@4.7|4x4 HyperX 1866|Cougar Aqua 240|GTX 1050 Ti|970 EVO 1/4 TB|CM 850 SilentPro|HAF-X|Áåç èñòèíñêî âîäíî

  12. #12
    Registered User
    Join Date: Dec:2005
    Location: yvr
    Posts: 5,167
    ...If objDisk.DriveType = 2 then'2=Removable...
    Èìà è ôëàøêè, íà êîèòî êîíòðîëåðà âðúùà fixed(basic), ìèñëÿ DriveType = 1 áåøå.

    Ïðàâèëíèÿ íà÷èí å äà âçåìåø âñè÷êî îò USB øèíàòà è ïîñëå äà íàìåðèø è áóêâàòà ìó:
    Òîâà å AutoIt ôóíêöèÿ, êîÿòî ïîëçâà ïàê WMI çà äà âúðíå âñè÷êèòå USB äèñêîâå, ïðåäïîëàãàì çàïèòâàíèÿòà ùå òè ñâúðøàò ðàáîòà:

    Code:
    Func _GetUSBDrivesInfo()
        Local $USBDlettersInfo[1][9], $NrOfFoundUSB = 0, $dp, $HasBootPart
        Local $strComputer = ".", $objDrive, $strDeviceID, $colPartitions, $objPartition, $colLogicalDisks, $objLogicalDisk
        Local $objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\cimv2")
        Local $colDiskDrives = $objWMIService.ExecQuery("Select * from Win32_DiskDrive Where (InterfaceType like " & chr(34) & "%USB%" & chr(34) & ")")
        For $objDrive In $colDiskDrives
    		$HasBootPart = 0
            Logging( "Found USB Physical Disk: " & $objDrive.Caption & " -- " & $objDrive.DeviceID)
            $strDeviceID = StringReplace($objDrive.DeviceID, "\", "\\")
            Local $colPartitions = $objWMIService.ExecQuery("ASSOCIATORS OF {Win32_DiskDrive.DeviceID=""" & $strDeviceID & """}" _
    		& "WHERE AssocClass = Win32_DiskDriveToDiskPartition")
    		;check if this disk has bootable partitions
    		For $objPartition In $colPartitions
    			If $objPartition.Bootable = -1 Then
    				$HasBootPart = 1
    				ExitLoop
    			EndIf
    		Next
    		If $HasBootPart = 1 Then
    			For $objPartition In $colPartitions
    				Logging( "Found USB Disk Partition: " & $objPartition.DeviceID)
    				$colLogicalDisks = $objWMIService.ExecQuery("ASSOCIATORS OF {Win32_DiskPartition.DeviceID=""" & $objPartition.DeviceID & """}" _
    				& "WHERE  AssocClass = Win32_LogicalDiskToPartition" )
    				For $objLogicalDisk In $colLogicalDisks
    					Logging( "Found USB Logical Disk: " & $objLogicalDisk.DeviceID & "  File system: " & $objLogicalDisk.FileSystem _
    					& " Bootable: " & $objPartition.Bootable)
    					$NrOfFoundUSB += 1
    					$USBDlettersInfo[0][0] = $NrOfFoundUSB
    					ReDim $USBDlettersInfo[$NrOfFoundUSB + 1][9]
    					$USBDlettersInfo[$NrOfFoundUSB][0] = $objLogicalDisk.DeviceID
    					$USBDlettersInfo[$NrOfFoundUSB][1] = StringReplace($objDrive.Caption, "USB device", "")
    					$dp = StringSplit($objPartition.DeviceID, ",")
    					$USBDlettersInfo[$NrOfFoundUSB][2] = StringRegExpReplace($dp[1], "[^0-9]", "")
    					$USBDlettersInfo[$NrOfFoundUSB][3] = StringRegExpReplace($dp[2], "[^0-9]", "")
    					$USBDlettersInfo[$NrOfFoundUSB][4] = Round(DriveSpaceTotal($objLogicalDisk.DeviceID), 0)
    					$USBDlettersInfo[$NrOfFoundUSB][5] = Round(DriveSpaceFree($objLogicalDisk.DeviceID), 0)
    					$USBDlettersInfo[$NrOfFoundUSB][6] = DriveGetType($objLogicalDisk.DeviceID)
    					$USBDlettersInfo[$NrOfFoundUSB][7] = $objLogicalDisk.FileSystem
    					;$USBDlettersInfo[$NrOfFoundUSB][8] = $objPartition.BootPartition
    					$USBDlettersInfo[$NrOfFoundUSB][8] = $objPartition.Bootable
    					;array is in format--> DriveLetter | Name | Disk# | Part# | TotalSpace | FreeSpace | DriveType | FileSystem | Bootable(-1) or Not (0)
    				Next
    			Next
    		EndIf		
    	Next
    
    Return $USBDlettersInfo
    EndFunc ;==>__GetUSBDrivesInfo()

  13. #13
    video maniac sancho's Avatar
    Join Date: Nov:2005
    Location: Îñòðîâ Âàíêóâúð
    Posts: 846
    Ìåðñè çà ïîäðîáíèòå îòãîâîðè. Ìèñëÿ ÷å ñòàíà èíòåðåñíà òåìà. Èìàøå íÿêàêâà ïîäîáíà ïðåäèøíà, íî ïóñíàõ òàçè òúé êàòî íå íàìåðèõ îòãîâîðà òàì. Òóê ìèñëÿ ÷å èìà íÿêîëêî, âñå ïîëåçíè îòãîâîâîðè.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Copyright © 1999-2011 Õàðäóåð ÁÃ. Âúçìîæíî å ñúäúðæàíèåòî íà òàçè ñòðàíèöà äà å îáåêò íà àâòîðñêè ïðàâà.
iskamPC.com | mobility.BG | Bloody's Techblog | Êðèïòîâàëóòè è ìàéíèíã | 3D Vision Blog | Ìàãàçèí çà åëåêòðîííè öèãàðè