1. sayfa (Toplam 1 sayfa)

Windows Vbs İle Geri Yükleme Noktası Oluşturun

Gönderilme zamanı: 10 Şub 2019, 21:53
gönderen trwe
Merhabalar

Ben admin kadar da olamasak da kendimizce vbs kodlamaya çalışıyoruz.Alın size otomatik geri yükleme noktası oluşturan vbs betik kodu....Burada sadece TRWE_2012 olan kısmı istediğiniz isimle değiştirin yeter....

Kod: Tümünü seç

set SRP = getobject("winmgmts:\\.\root\default:Systemrestore") 
CSRP = SRP.createrestorepoint ("TRWE_2012 Restore Point.", 0, 100) 
If CSRP <> 0 then 
    Msgbox "Error " & CSRP & ": Unable to create System Restore point" 
End if
Eğer bir kullanıcı Windows sistemini ciddi olarak kullanıyorsa azıçık biraz kodlama bilmek durumundadır.Tabii bu benim düşüncem.....

TRWE_2012
Alaydan Yetişme PC Kullanıcısı

Re: Windows Vbs İle Geri Yükleme Noktası Oluşturun

Gönderilme zamanı: 11 Şub 2019, 12:58
gönderen velociraptor
Teşekürler TRWE eline sağlık ayrıca bakınız
https://www.sordum.net/21089/bir-tikla- ... olusturun/

NOT: Bu arada bende Vbs den okadar iyi anladığımı söyleyemem , sadece hobby olarak birkaç satır kod yazabiliyorum

Re: Windows Vbs İle Geri Yükleme Noktası Oluşturun

Gönderilme zamanı: 13 Şub 2019, 04:55
gönderen trwe
velociraptor yazdı:
11 Şub 2019, 12:58
Teşekürler TRWE eline sağlık ayrıca bakınız
https://www.sordum.net/21089/bir-tikla- ... olusturun/

NOT: Bu arada bende Vbs den okadar iyi anladığımı söyleyemem , sadece hobby olarak birkaç satır kod yazabiliyorum
Valla ben notundaki yazdığına katıldığımı söyleyemem.Gerçek ustaların bir özelliği de Ben Usta değilim dedikleridir.Benim nazarımda Gökteki Everst Tepesinin durumu gibidir.Bu kadar kendine haksızlık etme.....Ayrıca bağlantıdaki vbs benim kinden çok ayrıntılı....Bu bile senin bilgi birikiminin çok olduğunun göstergesi.....

Re: Windows Vbs İle Geri Yükleme Noktası Oluşturun

Gönderilme zamanı: 07 Mar 2019, 03:37
gönderen anxious
Elinize sağlık fakat bu kodlarda bir kontrol eksik gibime geldi :)
Misal
if Geri Yükleme Noktası kapalı then
Msgbox "Hata " & CSRP & ": Geri Yükleme Noktası kapalı-Geri Yükleme Noktası açılsınmı?"
Burayada geri yükleme noktasını açabilecek bir kod...vs..
End if

Neden biliyormusunuz?
Çünkü eğer kodu kullananlar 120 gb ssd veya altı kullanıyorsa veya tüm ssd disklerde tam emin değilim,Win8 ve üzeri işletim sisteminde hata verecektir,microsoft Win8 ve üzeri işletim sistemlerinde ssd disklerin,geri Yükleme Noktasını varsayılan olarak kapalı tutuyor.

Re: Windows Vbs İle Geri Yükleme Noktası Oluşturun

Gönderilme zamanı: 07 Mar 2019, 11:27
gönderen velociraptor
Kodlar verilen hali ile zaten çalışmayacaktır çünkü yönetici yetkisi ister , tek eksik bu da değil anxious un dediği gibi geri yükleme noktaları genellikle kapalı gelir. Ben bugüne kadar kurduğum windowslarda geri yükleme noktası açık geleni görmedim ki Normal HDD lere kurulum yaparım ve ilk iş olarak o kısmı kontrol ederim açılsın mı diye ya kullanıcıya sormak veya sormadan direkt olarak Sistem geri yükleme noktasını açıp oluşturmak gerekir. Bu konuda bir AIO hazırladık , yakında ana sayfadan veririz.

Re: Windows Vbs İle Geri Yükleme Noktası Oluşturun

Gönderilme zamanı: 07 Mar 2019, 18:09
gönderen anxious
velociraptor teşekkürler cevap için detaylı bir çalışma yaptığınızda kaynak kodlarını görmek isterim :)

Re: Windows Vbs İle Geri Yükleme Noktası Oluşturun

Gönderilme zamanı: 07 Mar 2019, 18:14
gönderen velociraptor
Resim

AMS ile arayüz oluşturuldu ,
Autoit ile vbslerin düzgün çalışmasını sağlayan exeler oluşturuldu ,
Butonlara basıldığında da Vbs ler vbs ler iş görüyor , kaynak kodlarına isteyen herkes ulaşabilir.

Re: Windows Vbs İle Geri Yükleme Noktası Oluşturun

Gönderilme zamanı: 07 Mar 2019, 21:10
gönderen anxious
oww harika görünüyor :) nezaman geliyor üstad?

Re: Windows Vbs İle Geri Yükleme Noktası Oluşturun

Gönderilme zamanı: 07 Mar 2019, 21:12
gönderen velociraptor
Sanırım , 3-4 gün içinde anasayfadan veririz , öyle ahım şahım bir özelliği yok herkes yapabilir.

Re: Windows Vbs İle Geri Yükleme Noktası Oluşturun

Gönderilme zamanı: 24 Mar 2019, 15:02
gönderen anxious
Üstad gördüm yayınlamışsınız teşekkürler,yanlız kaynak kodlarına nereden ulaşabilirim?
Autoplay dosyaları temp klasörüne atıyor ama .vbe dosyaları içi karmaşık görünüyor şifrelemişsiniz galiba :)
Sadece Sistem korumayı Kapat Sistem Korumayi Ac ve Koruma ayarlari Kapali,Koruma ayarlari Acik,kodlarını paylaşırmısın,veya pm özel mesaj ile de gönderebilirsiniz.

Edit:çözdüm üstad tamam teşekkürler :)

Re: Windows Vbs İle Geri Yükleme Noktası Oluşturun

Gönderilme zamanı: 24 Mar 2019, 16:45
gönderen velociraptor
Vbs leri en basit şekilde şifreledim , halletmene sevindim