herkeze merhaba
kendime ufak bi celerik makro bot karışımı bir program yapmaya uğraşıyorum ancak bazı yerlerde bilmediğim şeyler var
silkroada alt tab yapınca SendKeys yollama (alt tab yapılınca klavye kodları gönderme )
aslında bi şürü şey hakkında bilgi lazım yada visual basicde yapılmış bot yada alt tab modunda çalışan macro visual basic kodları lazım
bot olursa açık kodlu daha iyi olur
aramızda programcılar varmı bilgi verebilicek ?
· 6 Yanıt · 1.7K görüntüleme 0 okuyor
6 Yanıt
S
silkroadlife
⭐ 17y
sen hangi tuşları basılmasını istiyosun söle ben yaparım
K
KilitanEngiress
⭐ 17y
Visual Basic .Net mi? Visual Basic 2008 mi? Visual Basic 6.0 mı?
Ben Visual Basic 6.0 yı kullanıyorum
Forma 1 timer ekle
Invertal=5000 olsun (5 saniyede bir basar)
içine SendKeys ("{ENTER}") ' yazarsan 5 saniyede bir enter tuşuna basar
Bir de buton ekle içine
Enable.Timer1 ' yazıcaksın
bir tane daha buton ekle içine
Disible.Timer1 ' yaz
işte bu kadar programın 5 saniyede bir enter tuşuna basar
eğer yardımcı olabildiysem ne mutlu bana . 😊
Ben Visual Basic 6.0 yı kullanıyorum
Forma 1 timer ekle
Invertal=5000 olsun (5 saniyede bir basar)
içine SendKeys ("{ENTER}") ' yazarsan 5 saniyede bir enter tuşuna basar
Bir de buton ekle içine
Enable.Timer1 ' yazıcaksın
bir tane daha buton ekle içine
Disible.Timer1 ' yaz
işte bu kadar programın 5 saniyede bir enter tuşuna basar
eğer yardımcı olabildiysem ne mutlu bana . 😊
sen hangi tuşları basılmasını istiyosun söle ben yaparım
teşşekür ederim ama ben hem öğrenmek hemde yerine göre üzerinde değişiklik yapıp zaman içerisinde dahada geliştirmek niyetindeyim hazır bi program işime gelmez ama visual basic 6 da yapılmış açık kaynak kodlu alt tab modunda çalışan bi şey varsa elinde oldukça işime yarar
cevabın için teşşekür ederim
Visual Basic .Net mi? Visual Basic 2008 mi? Visual Basic 6.0 mı?
Ben Visual Basic 6.0 yı kullanıyorum
Forma 1 timer ekle
Invertal=5000 olsun (5 saniyede bir basar)
içine SendKeys ("{ENTER}") ' yazarsan 5 saniyede bir enter tuşuna basar
Bir de buton ekle içine
Enable.Timer1 ' yazıcaksın
bir tane daha buton ekle içine
Disible.Timer1 ' yaz
işte bu kadar programın 5 saniyede bir enter tuşuna basar
eğer yardımcı olabildiysem ne mutlu bana . :)
çok teşşekür ederim yardımcı olmaya çalıştığın için ama benim istediğim bu değil bunu zaten yaptım yaptığım bu
Private Sub Basla1_Click()
Timer1.Enabled = True
Label2.Caption = "Çalışıyor"
End Sub
Private Sub Çık1_Click()
Label2.Caption = "Programdan Çıkılıyor"
End Sub
Private Sub Durdur1_Click()
Timer1.Enabled = False
Label2.Caption = "Durduruldu"
End Sub
Private Sub Timer1_Timer()
If Check1.Value = 1 Then
SendKeys "(1)"
End If
If Check2.Value = 1 Then
SendKeys "(2)"
End If
If Check3.Value = 1 Then
SendKeys "(3)"
End If
If Check4.Value = 1 Then
SendKeys "(4)"
End If
If Check5.Value = 1 Then
SendKeys "(5)"
End If
If Check6.Value = 1 Then
SendKeys "(6)"
End If
End Sub
bana bunu çoklu silkroad açınca yada msnde konuşurken silkroadın arka planda kaldığı durumda çalıştırması lazım yani alt tab yapıncada çalışması için gereken kodlar lazım ilerde buna silkroadın ofsetlerini ekleyip oto heal oto str oto defans oto rez gibi tam bir celerik macro bot karışımı bişeye dönüştürmek niyetindeyim amacım hem öğrenmek hem boş vakitlerimi değerlendirmek malum silrodda bot kurunca yapıcak pek bi iş kalmıyor bize 😄 bende kendimi aradan geliştirmek hemde kendimce faydalı bi şey yapmak istedim
bir ara vb.net ile istediğin gibi bir şey yapmıştım...
pc i araştırayım biraz. bulursam kodları ile beraber yollarım
pc i araştırayım biraz. bulursam kodları ile beraber yollarım
bir ara vb.net ile istediğin gibi bir şey yapmıştım...
pc i araştırayım biraz. bulursam kodları ile beraber yollarım
çok iyi olur bekliyorum 😄
Yanıt yazmak için giriş yapın.
Giriş Yap