script gerci e1 icin ama e2 ye ayarlayabilirsiniz
hicbir programa gerek kalmadan bu script ile yedek alabilirsiniz (putty winscp yuklemeden)
ftp den en iyi dosya alma yontemi microsoft ftp ile en iyi komutta microsoft telnet komutları ile oluyor
telnet ile dosya alınmıyor microsoft ftp ilede sadece msdos komutları verildigi icin 2 ayrı script yapmak gerekiyor bat script yapmak yerine herseyi oto yapan vbs script yaptım
eger cihazda telnet istemci acık degilse bu script acıyor (acmadan telnet komutları kullanılmaz) acıksa sorun yok sadece 30 saniye zaman kaybı oluyor ama herseyi oto yapmak icin bu islem gerekli
win 7.8.10 farketmiyor telnet istemciyi acıyor
sonra cihaza telnetten baglanıp tmp klasorune yedek alıyor hangi klasorleri alacagınızı ayarlayın verilen ornekte e1 cihaz dosyalarını alıyorum ama zaten e1 de olsa isinize yaramayabilir cunku bende oscam /var/oscam icinde sizde /var bin icinde tar olan satırı kendi dosyalarınıza gore editleyin
[Değerli Ziyaretci, linki görmeniz icin bu mesaja cevap yazmanız gerekiyorÜye olmak icin burayı tıklayınız]
tar komutu hakkında detaylı bilgiyi buralardan bulabilirsiniz
daha sonra bat script olusturup tmp klasorunde olusan backup.tar.gz dosyasını windows masaustune alıyor olusturulan tum dosyalar siliniyor acılan tum pencereler kapanıyor geriye backup.tar.gz ve e1 yedek .vbs dosyası kalıyor
eger script hata verirse ki vermemesi icin sureleri fazlasıyla uzattım ama yinede net pc cok yavas hantalsa hata verdigi satırın ustunde altındaki sleep suresini uzatırsanız hata vermez
ip adresi user pass olan satırları ve
oShell.SendKeys"tar cvzf /tmp/backup.tar.gz /var/oscam/ /var/keys/ /var/scripts/ /var/share/ /var/etc/plimgr/ /var/etc/rc.config /var/etc/satellites.xml /var/etc/software.xml /var/etc/ppanels/ /var/tuxbox/plugins/ /var/tuxbox/config/enigma/"
bu satırdaki yedekleyeceginiz dizinleri degistirmeniz yeterli
ip adresi 192.168.1.37 sizin cihazınızın ip adresi ne ise bu satırlara onu yazıyorsunuz sifre dreambox degilse onuda degistirin
ekteki komutları not defterine yapıstırın uzantısını .vbs olarak degistirip kaydedin mouse ile cift tıklayarak calıstırabilirsiniz
her zaman ki gibi alıntı degildir
kolay gelsin
e1 yedek al.vbs
set oShell = CreateObject("WScript.Shell")
oShell.run"cmd.exe"
WScript.Sleep 100
oShell.SendKeys"dism /online /Enable-Feature /FeatureName:TelnetClient"
oShell.SendKeys("{Enter}")
WScript.Sleep 30000
oShell.SendKeys"TASKKILL /F /IM cmd.exe"
WScript.Sleep 100
oShell.SendKeys("{Enter}")
oShell.run"telnet 192.168.1.37"
WScript.Sleep 200
oShell.SendKeys"root"
oShell.SendKeys("{Enter}")
WScript.Sleep 200
oShell.SendKeys"dreambox"
oShell.SendKeys("{Enter}")
WScript.Sleep 200
oShell.SendKeys"tar cvzf /tmp/backup.tar.gz /var/oscam/ /var/keys/ /var/scripts/ /var/share/ /var/etc/plimgr/ /var/etc/rc.config /var/etc/satellites.xml /var/etc/software.xml /var/etc/ppanels/ /var/tuxbox/plugins/ /var/tuxbox/config/enigma/"
oShell.SendKeys("{Enter}")
WScript.Sleep 30000
oShell.run"cmd.exe"
WScript.Sleep 100
oShell.SendKeys"TASKKILL /F /IM telnet.exe"
WScript.Sleep 100
oShell.SendKeys("{Enter}")
oShell.SendKeys"TASKKILL /F /IM cmd.exe"
WScript.Sleep 100
oShell.SendKeys("{Enter}")
For i = 1 to 1
createFile( i )
Next
Public Sub createFile(a)
Dim fso,MyFile
filePath = "backup" & ".bat"
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile(filePath)
MyFile.WriteLine("@ftp -i -s:""%~f0""&GOTO:EOF")
MyFile.WriteLine("open 192.168.1.37")
MyFile.WriteLine("root")
MyFile.WriteLine("dreambox")
MyFile.WriteLine("cd /tmp")
MyFile.WriteLine("get backup.tar.gz")
MyFile.WriteLine("bye")
MyFile.close
End Sub
WScript.Sleep 1000
oShell.run"backup.bat"
WScript.Sleep 2000
Set obj = CreateObject("Scripting.FileSystemObject")
obj.DeleteFile("backup.bat")
Paylaş