Neler yeni
  • Tüm Banlar Kaldırılmıştır Sizi Tekrardan Aramızda Görmekten Mutluluk Duyarız
  • Moderatör Başvurularımız Başlamıştır Sizide Aramızda Görmekten Şeref Duyarız
vds sunucu
Bu ve benzeri 20'den fazla sitemizde reklam vermek ve SEO desteği için foxserpco@gmail.com

Ftp üyelik sistemi [vb.net]

HackerLight12

Forum Üyesi
Katılım
15 Ağu 2014
Mesajlar
167
Tepkime puanı
0
Puanları
0
Yaş
25
12.01.2016 TARİHİNDE KONU GÜNCELLENMİŞTİR ! SORUN YAŞAYAN VARSA MESAJ ATABİLİR,HAYLA BURADA YAŞIYORUM.... :)


GEREKEN MALZEMELER !

FORM1'E


2 ADET TEXTBOX 1 ADET BUTON

FORM2'YE 2 ADET TEXTBOX 1 ADET BUTON !

FİLEZİLLA AYARLARI

hostinger.web.tr'DEN Ücretsiz Host Alın Filezilla'dan Açtığınız Siteye Bağlanın

filezilla'nın içine atacağınız dosya burada TIKLA İNDİR !!12.01.2016 advertisement adına güncellenmiştir.

RAR İÇERİSİNDE GİRİS DOSYASI VE KODLAR MEVCUT GİRİS DOSYASINI DOĞRUDAN İÇİNE ATIN VE FORM1'E ŞU KODLARI YAZIN

____

Kod:
Imports System.Net
Imports System.IO
Public Class Form1
Dim wc As New Net.WebClient
    Dim texting = wc.DownloadString("http://üyeeğitimi/giris/data.txt")

BUTON 1 = GİRİŞ KODU

Kod:
If TextBox1.Text = Nothing Or TextBox2.Text = Nothing Or TextBox1.Text = Nothing And TextBox2.Text = Nothing Then
            MsgBox("Kullanıcı Adı ve Şifreyi Girmediniz.", MsgBoxStyle.Exclamation, "Hata")
        ElseIf texting.contains(TextBox1.Text & ":" & TextBox2.Text) Then
            form3.Show()
                      Me.Hide()


        ElseIf Not texting.contains(TextBox1.Text & ":" & TextBox2.Text) Then
            MsgBox("Kullanıcı Adı veya Şifre Yanlış !", MsgBoxStyle.Critical, "Giriş Başarısız")

FORM2 KODLARI = KAYIT OLMA

Kod:
Imports System.Net
Imports System.Net.Mail
Public Class Form2

BUTON 1 = KAYIT OL BUTONU

Kod:
Dim site As New Net.WebClient
        Dim yazi = site.DownloadString("http://üyeeğitimi/giris/data.txt")
Dim request As WebRequest = WebRequest.Create("http://üyeeğitimi/giris/post.php?w=" & TextBox1.Text & ":" & TextBox2.Text)
            request.GetResponse()
            MsgBox("Başarılı Bir Şekilde Hesabını Oluşturdun,Şimdi Program Yeniden Başlatılacak", MsgBoxStyle.Information, "Bilgi")
            Process.Start(Application.ExecutablePath)
            Me.Close()
            Form1.Close()






NOT : http://üyeeğitimi/giris/post.php VE http://üyeeğitimi/giris/data.txt böyle bir site yok örnek göstermek için yazdım siz kendiniz düzenleyin.

:)
 
Son düzenleme:

#Üsame

Yine gece, yine hüzün , ve yine içimde sen , ve
Emektar
Katılım
4 Eki 2012
Mesajlar
10,698
Tepkime puanı
0
Puanları
36
Konum
Rize
İsim
Üsame
Teşekkürler
 

LoadingAres

Forum Üyesi
Katılım
10 Şub 2015
Mesajlar
530
Tepkime puanı
0
Puanları
0
Yaş
40
İsim
Yasin
[MENTION=986519]languemert[/MENTION] geliştirilmiş sistem bende var // Lisans Sistemi :mm:
 

LoadingAres

Forum Üyesi
Katılım
10 Şub 2015
Mesajlar
530
Tepkime puanı
0
Puanları
0
Yaş
40
İsim
Yasin
[MENTION=986519]languemert[/MENTION] tamamdır onuda yaparım :)
 

korkusuz212

Forum Üyesi
Katılım
3 Ağu 2010
Mesajlar
4
Tepkime puanı
0
Puanları
0
Yaş
26
üyeleri nasıl ekliyoruz.
hocam inşAllah birden fazla üye ekleyebiliyoz ?
nasıl ekleyecez ?
data txt dosyalarını nasıl kaydedecez
 
Son düzenleme:
Türkiye'nin en büyük oyun forumu Kayıt ol
Üst