Türkiye'nin en yeni Ultima Online, Counter-Strike, LoL, Dota 2, E-spor oyunları ve daha birçok oyunla ilgili Türkçe oyun haber, bilgi, topluluk platformu. Türkiye'nin en yeni Ultima Online, Counter-Strike, LoL, Dota 2, E-spor oyunları ve daha birçok oyunla ilgili Türkçe oyun haber, bilgi, topluluk platformu.
  • ANASAYFA
  • FORUM
  • DOKÜMAN
  • DOWNLOAD
  • DISCORD
  • İLETİŞİM
   Üye ol    Giriş
    Doküman > Diğer Dökümanlar > Exe içine dosya eklemek

Exe içine dosya eklemek

  • Alien
  • February 17, 2008
  • 0 Yorumlar
  • 6.8K Görüntüleme
VB6 ile programı derlemeden önce içine dosya gömebiliyoruz... Eee hadi gömelim

RES dosyalarının kullanıma bir örnek vereceğim. Bu örnek kod vasıtasıyla EXE'nizin içine istediğiniz EXE, DLL, OCX ya da başka bir dosyayı gömebilirsiniz. Bunu VB 6.0 içinden gerçekleştireceğiz.

Vurgulama istediğim tek şey, bu kodu VB 6.0 içindeki RES Editor vasıtasıyla programınıza eklenen dosyaları dışarı çıkartmak için kullanabileceğinizdir. Yani bu kod ile EXE çalışırken içine herhangi bir dosya gömemezsiniz; EXE derlenmeden önce VB 6.0 içinden RES dosyası içine gömülen dosyaları dışarı atabilirsiniz.

RES Editor Tools menüsünde bulunur. Eğer yoksa Add-Ins menüsünden Add-In Manager komutunu çalıştırın. Karşınıza gelen pencerede VB 6 Resource Editor satırına tıklayın ve Loaded konumuna geçirin. Tamam deyip pencereyi kapatın. Tools menusundan ya da Araç Çubuğundan RES Editörünü çalıştırın.

RES Editör penceresinde araç çubuğundan Add Custom Resource komutunu verin. Hangi dosyayı EXE'nizin içine gömmek istiyorsanız RES dosyasına ekleyiniz. RES Dosyanızı kaydedin.

Formunuzun üzerine Command1 adlı bir düğme yerleştirin. Bunun Click olayına aşağıdaki kodu ekleyin.


Kod:
Private Sub Command1_Click()
  Dim resbytes() As Byte
  resbytes = LoadResData(101, "CUSTOM")
  Dim no As Byte
  no = FreeFile
  Open App.Path & "deneme.exe" For Binary As #no
    Put #no, , resbytes
  Close #no
  Shell App.Path & "deneme.exe", vbNormalFocus
End Sub


Düğmeye basıldığı zaman EXE'nizin yanında bir de gömdüğünüz dosya oluşacaktır. Burada birşeye dikkat edin. Ben "deneme.exe" dedim. Sizin dosyanız ne ise uzuntasını ona göre değiştirin. DLL ise "deneme.dll", "ZIP" ise "deneme.zip" olarak değiştirmeyi unutmayın.

İyi Çalışmalar.

Üye Ol veya Giriş Yap

Bu içeriğe yorum atmak istiyorsanız hemen üye olun veya giriş yapın.

Yorumlar (0)

Henüz yorum yapılmamış
Sadece kayıtlı kullanıcılar yeni yorum yapabilir.
Beğeni Takipçi Üye Takipçi
Benzer Sayfalar
  • Dosya paylaşımına 8000 dava açıldı!

    October 22, 2006

  • TitanShare - En Büyük Dosya Paylaşım Yeri

    January 01, 1970

  • Verdata\'ya Npc Eklemek

    August 11, 2005

  • Verdata\'ya binek eklemek

    July 26, 2006

  • Verdata'dan İtem Eklemek

    July 18, 2007



  • Son Forumlar
  • Sayfalar
  • Venus
    World of UO 17 Şubat'ta Yeniden Başlıyor

    Sunucular 4 days önce

  • wilddeath
    Paladin UO

    Sunucular 2 weeks önce

  • Nefrelius
    Yeni karakter isim kontrolü

    Sphere Scripting 3 weeks önce

  • UO Victory
    Şuan oynanacak uzun soluklu server

    Sunucular 3 weeks önce

  • Erlik UO
    Erlik UO II ServUO - RunUO

    Sunucular 1 months önce

  • beth
    Tc Simülasyonu Uo Server

    Sunucular 2 months önce

  • dealer666
    UO AOS PvP Free Shard

    Sunucular 2 months önce

  • beth
    Ultimate World

    Sunucular 2 months önce

  • Bütün bir yıl çok çalıştılar, çok fazla mücadele ettiler ve artık sona geldiler.

    ESL One Cologne 2017

    June 30, 2017

  • Activision yetkililerinin yaptığı açıklamaya göre Cod:MW Remastered, Infinite Warfare’den ayrı bir oyun olarak satılmaya başlanacak.

    Call of Duty Modern Warfare Remastered açıklandı!

    June 24, 2017

  • Artık gelenekselleşen Steam mevsim indirimlerinin en sevileninin zamanı geldi kapımıza dayandı.

    Steam Yaz İndirimi 2017 Rehberi

    June 22, 2017

  • Ultima Online için unoffical DLC

    Ultima LandFall

    June 18, 2017

  • Simple Radar - Kullanışlı ve Basit Radar

    June 03, 2017

  • CS:GO FPS Arttırma ile ilgili detaylı bilgilendirici faydalı döküman

    CS:GO FPS Arttırma ile İlgili Herşey

    May 28, 2017

  • Easy Vibrance enhancer v1.3.0.1

    May 09, 2017

  • Vibrance GUI

    March 31, 2017

Menü

ANASAYFA
FORUM
DOKÜMAN
DOWNLOAD
İLETİŞİM
Ideamedia
© 2004 - 2023 Ultima-Strike. Her hakkı saklıdır.