Register for your free account! | Forgot your password?

Go Back   elitepvpers > General > Main
You last visited: Today at 13:50

  • Please register to post and access all features, it's quick, easy and FREE!

 

Visual Baisc Frage

Reply
 
Old   #1
 
elite*gold: 0
Join Date: Apr 2010
Posts: 85
Received Thanks: 5
Question Visual Baisc Frage

Hallo und zwar habe ich das Problem dass, ich habe ein Programm programmiert das etwas downloadet und während dem download henkt sich das Programm auf wenn der download aber fertig ist dann kann ich das Programm wider benutzen gibt es da irgend einen Code dass sich das Programm nicht aufhenkt ???

Freue mich auf Antworten
Gebe THX



benni9001 is offline  
Old   #2
 
elite*gold: 0
Join Date: Jan 2011
Posts: 235
Received Thanks: 35
Poste deinen Programmcode bitte.


Garp. is offline  
Old   #3
 
elite*gold: 0
Join Date: Apr 2010
Posts: 85
Received Thanks: 5
Da sind aber mehrere Forms
benni9001 is offline  
Old   #4


 
elite*gold: 350
Join Date: Nov 2008
Posts: 66,996
Received Thanks: 18,911
Quote:
Originally Posted by benni9001 View Post
Da sind aber mehrere Forms
Die die für den Download zuständig ist, natürlich ...


Der-Eddy is offline  
Old   #5
 
elite*gold: 0
Join Date: Apr 2010
Posts: 85
Received Thanks: 5
Dim wcl As New Net.WebClient
If wcl.DownloadString("http://benni9007.be.funpic.de/schalter.txt") = "7" Then
wcl.UploadString("ftp://TJA:.funpic.de/schalter.txt", "1")
Else
If wcl.DownloadString("http://benni9007.be.funpic.de/schalter.txt") = "1" Then
PictureBox4.ImageLocation = wcl.DownloadString("http://benni9007.be.funpic.de/werbung1.txt")
Else
If wcl.DownloadString("http://benni9007.be.funpic.de/schalter.txt") = "2" Then
PictureBox4.ImageLocation = wcl.DownloadString("http://benni9007.be.funpic.de/werbung2.txt")
Else
If wcl.DownloadString("http://benni9007.be.funpic.de/schalter.txt") = "3" Then
PictureBox4.ImageLocation = wcl.DownloadString("http://benni9007.be.funpic.de/werbung3.txt")
If wcl.DownloadString("http://benni9007.be.funpic.de/schalter.txt") = "4" Then
PictureBox4.ImageLocation = wcl.DownloadString("http://benni9007.be.funpic.de/werbung4.txt")
Else
If wcl.DownloadString("http://benni9007.be.funpic.de/schalter.txt") = "5" Then
PictureBox4.ImageLocation = wcl.DownloadString("http://benni9007.be.funpic.de/werbung5.txt")
Else
If wcl.DownloadString("http://benni9007.be.funpic.de/schalter.txt") = "6" Then
PictureBox4.ImageLocation = wcl.DownloadString("http://benni9007.be.funpic.de/werbung6.txt")
End If
End If
End If
End If
End If
End If
End If

Label1.Text = wcl.DownloadString("http://benni9007.be.funpic.de/schalter.txt")
Label1.Text = Val(wcl.DownloadString("http://benni9007.be.funpic.de/schalter.txt")) + "1"
wcl.UploadString("ftp://TJA:.funpic.de/schalter.txt", Label1.Text)


benni9001 is offline  
Reply



« Previous Thread | Next Thread »

Similar Threads
Visual Baisc 2008 Hilfe bitte
Hey Leute , Ich beschäftige mich jetzt seit einigen Monaten mit Visual Basic , allerdings fange ich erst jetzt an mit Online Datenbanken zu...
1 Replies - .NET Languages
(S) Honnorbuddy (B) PiroxBot Baisc+Elite
hallo lieben E´pvpers Community Wie schon bei dem Titel steht suche ich einen Honnorbuddy dafür biete ich einen PiroxBot mit basic und elite...
0 Replies - World of Warcraft Trading
Visual Basic Frage
Hi also ich habe ein Warrock tool erstellt aber denn beim ausprobieren ist mir aufgefallen das, wenn ich auf einen button klicke nix passiert also...
21 Replies - WarRock
[Tutorial] Virus mit Visual Baisc 2008 erstellen!
/edit by Walter Sobchak
8 Replies - Coding Tutorials



All times are GMT +1. The time now is 13:50.


Powered by vBulletin®
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Abuse
Copyright ©2017 elitepvpers All Rights Reserved.