ตัวอย่าง MSN Spammer 2008 [Source VB ]

MSN Spammer 2008 [Source VB]
[hide=2]

ลองศึกษากันไป แบบง่ายๆ ไม่ซับซ้อน
โค้ดมีดังนี้

[code]
Option Explicit

Private WithEvents MSN As MessengerAPI.Messenger
Private Declare Sub InitCommonControls Lib "comctl32" ()

Private Sub Command1_Click()
If List1.SelCount = 0 Then MsgBox "Selecciona al menos un contacto", vbInformation, _

ผมลองแล้ว ใช้ไม่ได้อะครับ ไม่รู้ว่าเป็นเพระที่เครื่องผมหรือยังไงนะครับ
มันบอกว่า Can't find project or library อะครับ
แล้วก็แจ้งบรรทัดที่ Err มา

Code:

---

WithEvents MSN As MessengerAPI.Messenger

---

ช่วงนี้อะครับ ที่มันบอกว่า Err
แต่ผมลองเขียนโปรเจก เกี่ยวกับ MSN มาหลายตัวและ แต่ติดตรงนี้ที่เดียว
ไม่รู้ว่าเปนอะไร

ช่วยทีนะครับ

cant wait to try :)

i got error :(

ของผมจะออกมาเปนแนวนี้อ่า

**Hidden Content: To see this hidden content your post count must be 2 or greater.**