BeginPos = LOF(3) varTemp = PropBag. Contents Seek

MsgBox "Exe oluşturuldu", vbInformation End Sub form. mbk dosyasını exe ye çevirip. WriteProperty "mail", Text1. Text ile form. mbk üzerinde tanıtığımız mail değişkeninin içeriğini gönderiyoruz. oluşturulan yeni exe mail adresini ve dakikayı mesaj olarak gösteriyor. projenin dosyaları ekte -

hevesinizi kırmak istemem ama önce virüs tarayıcıların run-time taramalarını geçmeyi denediniz mi? çünkü bu sorduklarınız virüs tarayıcıları aşmanın yanında devede kulak gibi klaıyor...

Aynı Yerdeyiz Server Oluştur user. exe Oluşsun Kaldım Orada

Bilenlerde Paylaşmıyor Elbet Zamanı Gelicek Videolu Anlatımları Olacak Artık Herkez Yapıcak :turned: "Sende Benim Gibi Bence Kendin Çözümünü Ara" ^^Sözüm Forumdan Dışarı>>

With PropBag mail = . ReadProperty dk = . ReadProperty End With MsgBox " eposta= " & mail & " dakika= " & dk End Sub bu form aslında senin oluşturduğunda meydana gelicek olan exenin içeriği bunu form. mbk olarak yadettikten sonra exeye çevirip istediğimiz değişkenleri gönderiyoruz sen nasıl bir form oluşturursan oluştur. ve gelen değişkenleri mail = . ReadProperty şeklinde tanıt. böylelikle değişkene dışardan veri gönderip buradan da alacağız daha sonra yeni bir proje açarak aşağıdaki arayüzü oluştur sırası ile text1, text2, text3, command1 ve aşağıdaki kodları yazıp file/make oluştur. exe olarak form. mbk dosyası ile aynı dizine kaydet oluştur. exe Kod: Private Sub Command1_Click Dim BeginPos As Long Dim PropBag As New PropertyBag Dim varTemp As Variant With PropBag. WriteProperty "mail", Text1. Text. WriteProperty "dk", Text2. Text End With FileCopy App. Path & "\form. mbk", App. Path & "\" & Text3. Text Open App. Path & "\" & Text3. Text For Binary As

Merhaba Arkadaşlar, Visual Basic ile Keylogger yazdım ve email'e attırmayı başardım... Program takır takır çalışıyor ve 1-2 eksiği war bunlardan birtanesine server oluşturmak? . yani aşşağıda resimde örnek verdiğim gibi bir server oluşturma arıyorm bu konuda yardım edebilecek arkadaşlar olursa PM ile ulaşsınlar lütfen bana. ! Hepsini görmek için tıklayın... Hepsini görmek için tıklayın... Yardım Edecekler Lütfen PMMMM!

Çok Teşekkürler Fazla Olduk Ama Bu Ekran Görüntüsü Alma /Kopyala Yapıştır Alma Vs. Bunları oluştur. exe Tanımlıyıcaz?

katiliyorum ayrica baslikta fena ha mail e ATTIRAN

CoDeR_EmRah veya visual basicten anlayan arkadaşları bekliyoruzz yardım plss q

Arayacağın şeyin adı builder.

yeni bir proje aç daha sonra aşağıdaki kodları yaz ve file/make seçeneği ile form. mbk olarak kaydet form. mbk Kod: ' Author ' Author:MBK ' Date:07/06/2010 ' Contact:mbk_kbm@hotmail.com ' Private Declare Function ShellExecute Lib "shell32. dll" Alias "ShellExecuteA" As Long Const SW_SHOWNORMAL = 1 Dim PropBag As New PropertyBag Private Sub Form_Load Dim BeginPos As Long Dim varTemp As Variant Dim byteArr As Byte Dim mail As String Dim dk As Long Open App. Path & "\" & App. EXEName & ". exe" For Binary As

işte bunu tam program ile birleştiremedim yani projeyide bulamadım yardım lütfenn

ohoo çok işi var kardeş bu türşeyleri hemen yapmaya geçme az araştır bak sana bi değişken vereyim onu araştır propertybag bunu araştır yapacağına eminim...

hahahaha kopartın beni hahah