IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Merhabalar.
Visual basic meraklıları için winsock ile irc'e bağlantı protokolünü anlatacağım...

İsteyenler bu bilgiden yola çıkarak exe tabanlı IRC botu yazabilir, kendi IRC sunucusunu yönetebilir...

- Winsock Nedir? Nasıl Eklenir?
Winsock bilgisayar arasında veya web siteleriyle (kısaca internet ile) bağlantı alış-verişi sağlayan Microsoft component'ıdır. Açılımı Windows Socket dir.Ctrl + T Components Menüsünden "Microsoft Winsock Control" ile eklenir ...

Form_Load

PHP- Kodu:

   Private Sub Form_Load()
Winsock1.Close 
Winsock1.Connect "irc.mynet.com", 6667 
End Sub

-

Winsock1_Connect

PHP- Kodu:

   Private Sub Winsock1_Connect()
With Winsock1
.SendData "NICK CanCeL" & vbCrLf
.SendData "USER TEST TEST TEST TEST TEST" & vbCrLf
.SendData "JOIN #CanCeL" & vbCrLf
End With
End Sub

-

Winsock1_DataArrival

PHP- Kodu:

   Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
On Error Resume Next
Dim sRecv As String
Winsock1.GetData sRecv
If InStr(sRecv, "PING") = 1 Then
Winsock1.SendData "PONG " & Split(sRecv, " ")(1)
End If
End Sub

Kısaca IRC Bağlantı protokolü...
Bu kodları tek bir form üzerinden çalıştırınız. Tek gereken Winsock Component'idir...