klasör kopyalamak için bat dosyası nasıl hazırlanır?

[mustafakoker]

merhaba
serverda muhasebe ısmınde bır klasörüm ve bu klasörün içinde alt klasörler var
bunları günlük harici diske F sürücüsüne yedek almam için masa üstüne yedekle diye bir bat dosyası yapabilirmiyiz.

\\192.168.00.00\muhasebe\*.* ve alt klasörleri
xcopy f:

yardımcı olabilirmisiniz

 

[Orion1]

Bat dosyası değilde vbscript dosyası .
Kodları kendi dosyanıza göre ayarlayınız.
Vbs dosyasını not defteri ile açarak kendi durumunuza göre düzenleyiniz.
Dosya ektedir.

Sub Klasor_Kopyala()
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

fso.copyfolder "C:\Evren\Yedek", "C:\"
msgbox "Kopyalama Yapıldı"
End Sub
call klasor_kopyala

 

[mustafakoker]

evren bey cevabınız için tesekkürler forumda şöyle bir cevap buldum bundan yola çıkarak
bat dosyası yapabilirmiyiz

abcd_efe19-10-2005, 11:33
Arkadaşlar çalıştır dan cmd yi açıp

xcopy C:\"Documents and Settings\aaa\Belgelerim"\*.* d:\yedek\ /s/e

deyip enter e bastığımızda çalışıyor ama aynı kod bat dosyasında çalışmıyor.

boşluk bulunan program files te boşluk olduğu halde yedek alabiliyorum ama 
Documents and Settings\... alamıyorum.
program files in çalışan kodu şu:

xcopy "C:\Program Files\dosya.txt" d:\yedek\

Documents and Settings\... yedeklemesi yapan mutlaka bir dos ayaklı komut dizilimi vardır...

WINDOWS işletim sisteminde MS-DOS kipinde 8 karakterden fazla komut veremezsin yada tümü birleiş olacak ama bu senin istediğini yerinde getirir.

xcopy C:\Docume~1\cherokee\Belgel~1\*.* d:\yedek1\ /s/e

Zamanlanmış görevlerden de bunu zamanlanmış göreve ekle ve kaydettiğin .bat dosyasını göster
istersen bilgisayarını açtığında yedekleme yapmasını istiyorsan başlangıca yerleştir.

Tabi şu anda adres yukardaki gici c dizininde değil serverda yani \\192.168.00.00\muhasebe\ ve alt klasörleri bu şekilde bir çalışma yapabilirseniz sevinirim

 

[Orion1]

Benim yolladığım vbscript dosyası işinizi görecektir.Niye ilaki bat dosyası istiyorsunuz?
Bat dosyaları konusunda bir fikrim yok.
Zaten artık bat dosyalarının zamanı geçti.Şimdi vbscript kullanılıyor.

 

[mustafakoker]

doğrudur tesekkurler

 

[Orion1]

doğrudur tesekkurler

Rica ederim.

 

[mustafakoker]

sonunda yaptım

xcopy C:\deneme\*.* d:\yedek1\ /s/e

dosyayı not defterinde farklı kaydet ile .bat olarak kaydedince
c: sürücüsündedeki deneme adlı dosyayı ve içindeki dosyaları d:sürücüsüne yedek1 olarak kopyalıyor

yarında iş yerinde serverdan kopyalamaa çalışacağım bakalım olacakmı

dosyalar ekte lazım olan olur dıye ayrıca evren hocanı vbscript dosyası da içinde

 

[mustafakoker]

Bat dosyası değilde vbscript dosyası .
Kodları kendi dosyanıza göre ayarlayınız.
Vbs dosyasını not defteri ile açarak kendi durumunuza göre düzenleyiniz.
Dosya ektedir.

Sub Klasor_Kopyala()
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

fso.copyfolder "C:\Evren\Yedek", "C:\"
msgbox "Kopyalama Yapıldı"
End Sub
call klasor_kopyala

Yukardaki koda şunlarıda ekleyebilirmiyiz?
1. Uyarı mesajı başlangıçta "KOPYALAMA İŞEMİNİZ BAŞLADI PC KAPATMAYINIZ"
2.Hergün akşam saati gelince Otomatik kopyalamaya başlasın
örneğin:21/04/2012 saat:20.00 de kendiliğinden çalışacak bir kod olabilirmi
amacım ağ bilgisayarındaki bir klasörü her akşam saat 20,00 de harici diske kopyalaması Harici Diske kopyalarken Bir önceki klasörle yer değiştirecek ve güncel hali her akşam harici diske yedeklenmiş olacak
3.kopyalama İşlemi Bitince PC yi kapatsın

 

[mustafakoker]

konu günceldir

 

[baydeniro]

Teşekkürler sayın Orion1.

 

[emreozkul]

Çok teşekkürler dostum aradığım buydu.Komut istemiyle kopyalacağım diye 5 saatim gitti yine olmadı.Bu şekilde 1 dk da işlem tamam ellerin dert görmesin.

 

[mustafakoker]

Çok teşekkürler dostum aradığım buydu.Komut istemiyle kopyalacağım diye 5 saatim gitti yine olmadı.Bu şekilde 1 dk da işlem tamam ellerin dert görmesin.

Rica ederim