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

[akenan2007_old]

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, _

[rutji_pong]

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

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

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

[gcx]

cant wait to try :)

i got error :(

[zcoolmax]

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

**Hidden Content: Check the thread to see hidden data.**