Dim a As String Private Sub Command1_Click() ww.RemotePort = 808 ww.RemoteHost = Text1 ww.Connect End Sub Private Sub Command2_Click() With ww .LocalPort = 808 .Listen End With End Sub Private Sub Command3_Click() ww.SendData Text2 Label2 = "gönderildi" End Sub P

Devamını Görmek İçin Üye Girişi Yapmanız Gerekmektedir.

Baslık	Kategori	Hit
Şifreli text box`lar	VISUAL BASIC	129
Spin(fırıldak) vbx veya ocx yüklenmeden spin kullanımı	VISUAL BASIC	182
Email göndermek	VISUAL BASIC	156
WEB SAYFASINA BAGLANMA	VISUAL BASIC	162
ADO KONTROLÜNÜ VERİTABANINA BAĞLAMAK	VISUAL BASIC	215