Gerekli Bileşenler :
http://rapidshare.com/files/122674112/AutoItX3.dll.htmlLinkdeki dll'yi indirip Yerel Disk (C ' e atioruz..
Başlat > Çaliştir > Cmd > regsvr32 C:/AutoItx3.dll ' yazip Enter'a basioruz ve karşiniza bu mesaj
çıkacak: DllRegisterServer / D:\AutoItX3.dll başaryıla gerçekleştirildi
Daha sonra , vb 6.0 çaliştirip Gelen Pencereden Standart Exe ' yi seçip aç dioruz.
Daha sonra Project sekmesinden References bölümüne gelip AutoItx3 1.0 Type Library ' i işaretleyip
Ok butonuna basiniz..
Forma 1 Adet Timer 2 Adet Button Ekleyip Sağ tıklayarak ' Wiew Code ' diyip aşşağidaki Kodlari
yapiştirin.
CODE
Kod:
Dim Komut As New AutoItX3Lib.AutoItX3
Private Sub From_Load()
Timer1.Interval = 100
Form1.BorderStyle = 4
End Sub
Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Command2_Click()
Timer1.Enabled = False
End Sub
Private Sub Timer1_Timer()
Komut.Send ("7") ' 7 Mana
Komut.Send ("8") ' 8 Minor
Skill Slot Siz Kaç İsterseniz Onu yapin.
End Sub
ALINTIDIR