Evet mbknın dediği gibi olması gerek turkhacking isteyen adam rarlı itemiş ona göre cvp vermişler bi sakin ol

Ya Rar Dosyası Oluşturabilirsin Ama İçinde Dosya Atabilirmisin Bilemiyorum

kod zaten uzun degil ki tek satır Shell ("c:\program files\winrar\rar a " & Text1 & " " & Text1), vbHide

bi tane textbox bi tanede buton ekleyiniz. Kod: Private Sub Command1_Click Shell ("c:\program files\winrar\rar a " & Text1 & " " & Text1), vbHide End Sub text1 e klasör veya dosyanın yolunu giriyosun aynı dizine arşive ekliyo aşagıdaki komutları kullanarak daha fazlasını da yapabilirsiniz. c:\program files\winrar\rar. exe uygulamasının komutları. Dos altında açabilirsiniz aynı komutlara ulaşırsınız. RAR 3.71 Telif Hakk 1993-2007 Alexander Roshal 20 Eyl 2007 Shareware S r m Yard m i‡in RAR -? yaz n Kullan m: rar <komut> -<anahtar 1> -<anahtar N> <arŸiv> <dosyalar...> <@dosya_listeleri...> <‡ kart lacak_yol\> <Komutlar> a Dosyalar arŸive ekle c ArŸive a‡ klama ekle cf Dosya a‡ klamas ekle ch ArŸiv parametrelerini de§iŸtir cw ArŸiv a‡ klamas n dosyaya yaz d Dosyalar arŸivden sil e Dosyalar Ÿu anki klas"re ‡ kart f ArŸivdeki dosyalar tazele i =<diz> ArŸivlerde dizi bul k ArŸivi kilitle l ArŸivi listele m ArŸive taŸ p Dosyay stdout'a yaz r ArŸivi onar rc Eksik ciltleri tekrar yap land r rn ArŸivlenmiŸ dosyalar yeniden adland r rr Veri kurtarma kayd ekle rv Kurtarma ciltleri oluŸtur s ArŸivi d"n Ÿt r veya SFX'den d"n Ÿt r t ArŸivlenmiŸ dosyalar test et u ArŸivdeki dosyalar g ncelle v ArŸivi ayr nt l olarak listele x Dosyalar tam yol ad yla ‡ kart <Anahtarlar> - Anahtar taramas n durdur ac S k Ÿt rd ktan veya ‡ kartt ktan sonra ArŸiv "znt temizle ad Hedef yola arŸiv ad n ekle ag ArŸiv ad n Ÿimdiki tarihe ve saate g"re oluŸtur ao ArŸiv "zniteli§i ayarl olan dosyalar ekle ap<yol> ArŸiv i‡indeki yolu ayarla as ArŸiv i‡eri§ini eŸitle av Ger‡eklik denetleme yerleŸtir av- Ger‡eklik denetleme kontrol n devre d Ÿ b rak c- A‡ klama g"stermeyi devre d Ÿ b rak cfg- Yap land rma okunmas n devre d Ÿ b rak cl ̃simleri k ‡ k harfe d"n Ÿt r cu ̃simleri b y k harfe d"n Ÿt r df Dosyalar arŸivledikten sonra sil dh PaylaŸ lm Ÿ dosyalar a‡ ds Kat arŸivler i‡in isim s ralamay devre d Ÿ b rak e <"znt> Dosya d Ÿlama ve dahil etme "zniteliklerini ayarla ed BoŸ klas"rleri ekleme en 'ArŸiv sonu' blo§unu yerleŸtirme ep Yollar isimlerden d Ÿla ep1 Esas yolu isimlerden d Ÿla ep2 Yollar tam geniŸlet ep3 S r c harfiyle yollar tam geniŸlet f Dosyalar tazele hp Dosya verisi ve stbilgisinin ikisini birden Ÿifrele id Mesajlar devre d Ÿ b rak ieml ArŸivi e-posta ile g"nder ierr B t n mesajlar stderr'e g"nder ilog Hatalar dosyaya kaydet inul B t n mesajlar devre d Ÿ b rak ioff Bir iŸlem tamamland ktan sonra bilgisayar kapat isnd Sesleri etkinleŸtir k ArŸivi kilitle kb kart lan bozuk dosyalar koru m<0..5> S k Ÿt rma seviyesini ayarla (0-depola...3-varsyln...5-en‡ok) mc<par> GeliŸmiŸ s k Ÿt rma parametrelerini ayarla md<boyut> S"zl k boyutu KB (64,128,256,512,1024,2048,4096 veya A-G) ms Depolanacak dosya t rlerini belirt mt<threads> Thread say s n ayarla n<dosya> Sadece belirtilen dosyay dahil et n@ Dahil etmek i‡in dosya adlar n stdin'den oku n@<liste> Belirtilen liste dosyas ndaki dosyalar dahil et o+ Varolan dosyalar n zerine yaz o- Varolan dosyalar n zerine yazma oc NTFS S k Ÿt r lm Ÿ "zniteli§ini a‡ or Dosyalar otomatik yeniden adland r os NTFS ak mlar n kaydet ow Dosya sahibi ve grubunu kaydet veya geri y kle p Parolay ayarla p- Parolay sorma r Alt klas"rleri i‡er r0 Alt klas"rleri sadece joker adlar i‡in i‡er ri<P> TMnceli§i ayarla (0-vrs,1-en az..15-en ‡ok) ve uyuma s resi rr Veri kurtarma kayd ekle rv Kurtarma ciltleri oluŸtur s[<N>, v , e] Kat arŸiv oluŸtur s- Kat arŸivlemeyi devre d Ÿ b rak sc<kar> Karakter grubunu belirt sfx SFX arŸiv oluŸtur si stdin i‡inden veri oku sl<boyut> Belirtilenden boyuttan daha k ‡ k dosyalar iŸle sm<boyut> Belirtilen boyuttan daha b y k dosyalar iŸle t Dosyalar arŸivledikten sonra test et ta<tarih> YYYYMMDDHHMMSS Ÿeklinde <tar>'den sonra de§iŸen dosyalar iŸle tb<tarih> YYYYMMDDHHMMSS Ÿeklinde <tar>'den "nce de§iŸen dosyalar iŸle tk Orijinal arŸiv zaman n koru tl ArŸiv zaman n en son dosyaya ayarla tn<zaman> <zaman>'dan yeni olan dosyalar iŸle to<zaman> <zaman>'dan eski olan dosyalar iŸle ts<m, c, a> Dosya zaman n sakla veya geri y kle u Dosyalar g ncelle v Ciltleri oto alg lama ile oluŸtur veya t m ciltleri listele v<boyut> Ciltler oluŸtur: boyut=<boyut> 1000 vd Cilt oluŸturmadan "nce disk i‡eri§ini sil ver Dosya s r m kontrol vn Eski stil cilt isimlendirme plan n kullan vp Her ciltten "nce duraklat w<yol> al Ÿma klas"r n se‡ x<dosya> Belirtilen dosyay d Ÿla x@ Dosyalar d Ÿlamak i‡in stdin'den oku x@<liste> Belirtilen liste dosyas ndaki dosyalar d Ÿla y T m sorulara Evet cevab verildi§i varsay ls n z Dosyadan arŸiv a‡ klamas oku saygılar MbK

Yahu bu kadar uzun kod yazmaya ne gerek var arkadaşım Winrar veya zip olmadan da dosya sıkıştırabilirsiniz Bu tür internette bi dünya ocx var. Ben zaten yakın zamanda bu tür bi program yazıyorum sizlerle paylaşacağım. Sıkıştırma algoritması winrar ın normal sıkıştırma algoritması kadar küçültüyor dosyayı ama Winrar kadar geniş çaplı değil sadece. Neyse bi gün gelir onu da paylaşırım sizlerle Selametle... -

slm arkadaşlar ben VB de shell komutunu kullanarak belirledigim bi klasoru klasor1. rar gibi rarlamak istiyorum? mesela C:\yedek klasorunu RAR lamak için.. shell "c:\yedek\RAR a yedek1. rar" diyerek yapamıoyorum? hata verio winrar komutlarını bilen varmı? TR olarak?

boşluklardan kurtulmanın yolunu buldum sonunda kısaltma yapılabiliyomuşşş "Documents and settings" yerine "docume 1" yazabiliyomuşuzz ilk 6 harfi ve " 1" ile yazmamız gerekiyomuş program files = progra 1 böylelikle yeni parametreye geçmiyo ama yine app. path ı kullanamıycaksın çünkü onda kısaltma yapmıyo kendisi sen yolu kendin yazarsan olur ama...

doğru. ama pes etmicem c:\progra 1\winrar\rar x c:\Docume 1\%username%\desktop\deneme. rar c:\Docume 1\%username%\desktop\ ozaman bunu bat dosyası yapıp vb ile birleştir o zaman oluyo işte

İlla ki de text1 ve text2 demiyorum ama illa c:\ diyorum çünkü eğer projen masaüstünde ise app. path = c:\documents and settings\%username%\desktop şeklindedir. dos komutlarında eger boşluk bulunursa yeni parametreye geçer yani geçersiz olur eger sorunu çözebilirsem paylaşırım. -

peki rarlı dosyayı nasıl düzeltebiliriz?

düzeltebilirizden kastın dosyaları çıkartmak mı bunlar komutlarda mevcut zaten. e = Dosyaları Şu anki Klasöre Çıkartır. x = Dosyaları Tam Yol Adıyla Çıkartır 2 textbox ve 1 buton gerekir. text1 dosya yolu, text2 ise çıkarılacagı yoldur. Kod: Private Sub Command1_Click Shell ("c:\program files\winrar\rar x " & Text1 & " " & Text2), vbHide End Sub c de bulunan deneme. rar için text1 = c:\deneme text2 = c:\ yazılmalıdır

Bekliyorum

Ama genede benim aradığım cevap bu değil rardan çıkarmak önemli

Al bide buradan yak Benim de işime yaradı bu kod ama ben kodları şöyle değiştirdim çalışmadı? Gene tam yol ve dosya adını belirttim dediğin gibi? Kod: Shell , vbHide Bi de bu şekilde denedim gene olmadı Kod: Shell ("c:\program files\winrar\rar x " & & " " & App. Path), vbHide İlla ki de text1 ve text2 olmadan olmayacak diyorsan o da olmadı Değişkenler ile denedim ama o da çalışmadı. Selametle... -

O kadar uzun yazı yazdığını görünce farketmemiştim O yüzden yazmıştım Benim programdaki satırlarda toplam 8 satır Ondan o şekilde dedim.

Dll lerini kullanarak bir çeşit çalıştırma yapabilirsin ama biraz kurcalamak gerekir