Jump to content
  • Kaydol

Genel Araştırma

'VB.Net' etiketi için arama sonuçları.

  • Etiketlere Göre Ara

    Aralarına virgül koyarak ekleyin
  • Yazara Göre Ara

İçerik Türü


Forum

  • Serbest Forum
    • Serbest Konular
    • Garip Olaylar
    • Resimler
    • Videolar
    • Müzik Kutusu
    • Film, Dizi, Anime Odası
  • Knight Online World
    • Koxp Destek
    • Knight Online Private Serverlar (PS)
    • Programsız Paylaşımlar ( TBL , Bug )
    • Server Tanıtımı
    • P.S Clan & Tanışma
  • Knight Online Pazar Alanı
    • SteamKO Sunucuları
    • USKO Sunucuları
  • COUNTER-STRIKE GLOBAL OFFENSIVE (CS:GO) HACK
    • Genel
    • CFG
  • Genel Forum
    • Forum Duyuruları
    • Üye Tebrik ve Şikayet
    • Tanışma & Kaynaşma
    • Sorularınız ve İstekleriniz
  • FPS & MMORPG OYUNLARI
    • League Of Legends
    • BlackBox Repack
  • PC Oyunları
    • RPG-Aksiyon-Survivor [3RD Person]
    • FPS [First Person Shooter]
    • Strateji [3D]
    • Yarış - Spor
    • Oyun Hileleri
  • Bilgisayar & Donanım & WebMasters
    • İşletim Sistemleri
    • Full Programlar
    • Wireless - Kablosuz Teknolojiler
    • Script Paylaşım
  • Metin 2
  • Programming
    • Genel Programlama
    • C / Turbo C / C++
    • Borland C++
    • C# (CSharp)
    • Visual Basic / Studio
  • E-Ticaret , Hertürlü Alışveriş Yapabileceğiniz Bölüm
    • Alım ve Satım
    • İnternetten Para Kazanma
  • Özel
    • Duplicated Members
    • Çöp Kutusu

Kategoriler

  • Koxp Dosyaları
  • Diğer Hileler

Kategoriler

  • Koxp Kullanım
    • Eskimiş Videolar

Find results in...

Find results that contain...


Oluşturma Tarihi

  • Start

    End


Son Güncelleme

  • Start

    End


Filter by number of...

Katılım

  • Start

    End


Üye Grubu


Website URL


Skype


İlgiler

Araştırmada 3 sonuç bulundu

  1. ARKADAŞLAR MERAHBA, BEN MERTHAN BABUÇÇULAR 1 HAFTA VERDİĞİM KARARLA GELİŞMİŞ MACRO YAPIMI VİDEO 'LARINI ÇEKİMLERİNE BAŞLADIM EĞER MACRO YAPMAYA MERAKLI OLAN ARKADAŞAR VARSA YOUTUBE KANALIMI AŞAĞIDA LİNK'TE VERİCEĞİM EĞER FAYDALI BULDUYSANIZ 19xx xSkip Oto Kutu Yapımı , 19xx xSkip Wall Hack Yapımı , VB.Net Macro Yapımı Bir Çok Şey Kanalımda Mevcuttur . ABONE OLMAYI UNUTMAYINIZ , BİR TEŞEKKÜRÜ ÇOK GÖRMEYİNİZ... https://www.youtube.com/channel/UCeRDsXPNXZX4CfWbPT_nh0A
  2. VB.Net için koxp yapılmadığından başlangıç için yardımı çok dokunacak bir proje. Güncellenirse herşey sorunsuz çalışır. https://yadi.sk/d/33f72JhfjjmNj
  3. Form açılışında siteden çekilen version ile kendi versionunu karşılaştırır uyuşmuyorsa yeni versionu indirmek için belirtilen adrese uğrar , indirir & eskisini siler ve yenisini açar. Yapılması gereken ilk işlem Form içerisine yazılacak Imports System.Net Imports System.IO Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load VersionKontrol() ' Girişte kontrol edilecek. End Sub Private Function getSrc(ByVal urll As String) Dim r As HttpWebRequest = HttpWebRequest.Create(urll) Dim re As HttpWebResponse = r.GetResponse() Dim src As String = New StreamReader(re.GetResponseStream()).ReadToEnd() Return src End Function Private Sub Terminate() ' silme işlemi Dim Info As New ProcessStartInfo() Info.Arguments = "/C choice /C Y /N /D Y /T 5 & Del """ & Application.ExecutablePath & """" Info.WindowStyle = ProcessWindowStyle.Hidden Info.CreateNoWindow = True Info.FileName = "cmd.exe" Process.Start(Info) End Sub Private Sub VersionKontrol() Dim src As String = getSrc("http://devilcrafty.com/update/version.txt") ' bu adresten versionu çeker - proptersies -setting menüsündeki version ile uyuşmazsa yenisini indirir. If (src.Contains(My.Settings.Version)) Then MsgBox("Bot Güncel!", MsgBoxStyle.Information) ' Exit Sub Else MsgBox("Yeni Sürüm indiriliyor...", MsgBoxStyle.Information, "Eski Sürüm") ' uyuşmuyorsa End If Try My.Computer.Network.DownloadFile("http://devilcrafty.com/update/" & "YeniPatch.exe", CurDir() & "/" & src & ".exe") ' belirtilen sitenin update klasöründen "YeniPatch.exe" isimli dosyayi indiriyor ve sitedeki version.txt içinde ne yazşyorsa indirilirken bu ismi alşyor. ( kşsacasş inerken YeniPatch.exe olarak gözükmez ) MsgBox("Yüklendi!, Aciliyor...", MsgBoxStyle.Information, ) ' bitince bildiriyor Diagnostics.Process.Start(CurDir() & "/" & src & ".exe") ' yenisi açşlşyor Me.Close() ' şuanki kapatiliyor Terminate() ' şuanki siliniyor. Catch ex As Exception MsgBox("Güncelleme Dosyasi Bulunamadi.", MsgBoxStyle.Information) ' eger baslanamazsa yada bulamazsa dosyayi End End Try End Sub End Class
×
×
  • Yeni Oluştur...