FTP Chat Programı Yapma [VİDEOLU-SESLİ]

FTP Chat programı nasıl yapılır ;
FTP Chat Programı Yapma - YouTube

Diğer Dersleri izlemek isterseniz ;
Ahmetcan Bozkurt - YouTube

Eline Sağlık.
winsock demi ?
yalnız winsock ise localport yapmamak lazom ondan başka bilgisayara olmaz.
port açmak lazım

WhisPer*' Alıntı:

Eline Sağlık.
winsock demi ?
yalnız winsock ise localport yapmamak lazom ondan başka bilgisayara olmaz.
port açmak lazım

Genişletmek için tıkla ...

Winsock değil,videoyu izlemeni tavsiye ederim

DrPsycho' Alıntı:

Winsock değil,videoyu izlemeni tavsiye ederim

Genişletmek için tıkla ...

k.b görmemişim güzel. stringleri şifrelemeyi de göster(ftp girişlerini çalarlar)

WhisPer*' Alıntı:

k.b görmemişim güzel. stringleri şifrelemeyi de göster(ftp girişlerini çalarlar)

Genişletmek için tıkla ...

Orası yapanın kendisine kalmış bir bilgisayar sınıfında kullanılabilecek ufak bir program büyük projelerde kullanılacaksa araştırıp yaparlar..

yararlı +

Kodları Verirmisiniz

Al kardeşim kodlar

Button1 Kodları:
Dim name As String
name = TextBox1.Text
Try
Dim client As New Net.WebClient
client.Credentials = New Net.NetworkCredential("u467844088.chat","hgqww7j3")
client.UploadString("ftp://ftp.deneme222.pusku.com/chat.txt",RichTextBox1.Text & name & " : " & RichTextBox2.Text + vbNewLine )
Catch ex As Exception
MsgBox("Sunucu Hatası Lütfen Daha Sonra Tekrar Deneyiniz!")
End Try

Button2 Kodları:
Try
Dim client As New Net.WebClient
client.Credentials = New Net.NetworkCredential("u467844088.chat","hgqww7j3")
RichTextBox1.Text = client.DownloadString("ftp://ftp.deneme222.pusku.com/chat.txt")
Catch ex As Exception
MsgBox("Sunucu Hatası Lütfen Daha Sonra Tekrar Deneyiniz!")
End Try

Form1_Load Kodları:
Try
Dim client As New Net.WebClient
client.Credentials = New Net.NetworkCredential("u467844088.chat","hgqww7j3")
RichTextBox1.Text = client.DownloadString("ftp://ftp.deneme222.pusku.com/chat.txt")
Catch ex As Exception
MsgBox("Sunucu Hatası Lütfen Daha Sonra Tekrar Deneyiniz!")
End Try

Saol teşekkürler