[pytanie] Jak zrobic żeby program Czytaj :) -->

[Sunnyline2]

Witam, mój program się crashuje gdy w pole textbox nie wpiszę żadnej wartości. Jak mam zrobić, gdyby było puste pole i kilkło sie button nie wywalało crashu tylko np. msgbox ? Nie wiem czy dobrze wytłumaczyłem :P

[b4rt4z]

Proszę :

 

Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       If TextBox1.TextLength = 0 Then
           MsgBox("twój tekst")
       End If
   End Sub
End Class

jak by co to pisz

[Sunnyline2]

Proszę :

 

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
	If TextBox1.TextLength = 0 Then
		MsgBox("twój tekst")
	End If
End Sub
End Class

jak by co to pisz

Tak, wyskakuje msgbox ale program się zacina

Kawałek kodu:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
	My.Computer.Network.DownloadFile("xxx") 
End Sub

 

Nie wiem czy dobrze robię ale twój kod dodałem przed My.Computer.Network.DownloadFile ???

[b4rt4z]

może dlatego się ścina bo źle używasz My.Computer.Network.DownloadFile

powinno być tak :

My.Computer.Network.DownloadFile("skąd ma pobrać", "gdzie ma zapisać")

[Sunnyline2]

może dlatego się ścina bo źle używasz My.Computer.Network.DownloadFile

powinno być tak :

My.Computer.Network.DownloadFile("skąd ma pobrać", "gdzie ma zapisać")

To mam dobrze. Dałem xxx dla zabezpieczenia :P , Mam jeszcze jedno pytanie jak mam zrobić zeby te pliki pobrane zapisywały się do %temp%

My.Computer.Network.DownloadFile("", "%temp%") Tak coś nie czyta

Gdy wpiszę dobrą nazwe pliku pobiera się on. Więc to napewno jest dobrze. Tylko jak pole textbox mam puste kliknę download i crashuje :/

[b4rt4z]

Kurde trochę trudno Ci pomóc nie widząc tego kodu...

więc może pokażesz ten kod lub podasz ID&Hasło do TV

A co do tego Temp

można jeszcze inaczej to zapisać:

 My.Computer.FileSystem.SpecialDirectories.Temp & "\Folder\Plik.exe"

[Gość Pan Szymek]

To mam dobrze. Dałem xxx dla zabezpieczenia :P , Mam jeszcze jedno pytanie jak mam zrobić zeby te pliki pobrane zapisywały się do %temp%

My.Computer.Network.DownloadFile("", "%temp%") Tak coś nie czyta

Gdy wpiszę dobrą nazwe pliku pobiera się on. Więc to napewno jest dobrze. Tylko jak pole textbox mam puste kliknę download i crashuje :/

My.Computer.Network.DownloadFile("htp://www.mpcforum.pl/...", My.Computer.FileSystem.SpecialDirectories.Temp & "\fajnyFilm.avi");

[tubady123]

Bo tą metodę musisz dać w tej instrukcji warunkowej po Else. Przecież to logiczne.

Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       If TextBox1.TextLength = 0 Then
           MsgBox("twój tekst")
       Else
           My.Computer.Network.DownloadFile("x", "x")
       End If
   End Sub
End Class

[b4rt4z]

No chyba nie logiczne jak byś czytał posty to byś wiedział...:

Nie wiem czy dobrze robię ale twój kod dodałem przed My.Computer.Network.DownloadFile

Czyli że on ma zupełnie inną funkcje niż ty to napisałeś

I fajnie by było jak Sunnyline2 by udostępnił chociaż fragment tego kodu bo tak to możemy się tylko domyślać i sugerować dziesiątki kodów...

[somanyidiots]

Mi się wydaje że, jest problem ze źródłem pobieranego pliku i program się zawiesza. Spróbuj tego, wygoglowałem jak coś..

Public Sub DownloadFile(ByVal _URL As String, ByVal _SaveAs As String)
   Try
    Dim _WebClient As New System.Net.WebClient()
    _WebClient.DownloadFile(_URL, _SaveAs)
  Catch _Exception As Exception
    Console.WriteLine("Exception caught in process: {0}", _Exception.ToString())
   End Try
End Sub

Żeby użyć tej funkcji zadeklaruj przestrzeń System.net

Prosty zapis downloadu na dysk.

DownloadFile("http://www.yourdomain.com/file.zip", "C:\\file.zip")

 

On jest lepszy od poprzedniego ponieważ posiada jedną zaletę, jeśli wystąpi błąd to program nas o tym powiadomi a nie się zatnie.

[Sunnyline2]

@Up

Dobre

Thx za pomoc można cls.

[Gość Pan Szymek]

Mi się wydaje że, jest problem ze źródłem pobieranego pliku i program się zawiesza. Spróbuj tego, wygoglowałem jak coś..

Public Sub DownloadFile(ByVal _URL As String, ByVal _SaveAs As String)
Try
	Dim _WebClient As New System.Net.WebClient()
	_WebClient.DownloadFile(_URL, _SaveAs)
  Catch _Exception As Exception
	Console.WriteLine("Exception caught in process: {0}", _Exception.ToString())
End Try
End Sub

Żeby użyć tej funkcji zadeklaruj przestrzeń System.net

Prosty zapis downloadu na dysk.

DownloadFile("http://www.yourdomain.com/file.zip", "C:\\file.zip")

 

On jest lepszy od poprzedniego ponieważ posiada jedną zaletę, jeśli wystąpi błąd to program nas o tym powiadomi a nie się zatnie.

Try
My.Computer.Network.DownloadFile("..", "..")
Catch
MessageBox.Show("Wystąpił błąd!")
End Try

[Sunnyline2]

@Miszczu.

Jak mam zrobić zeby wszystkie pliki z rozszeżeniem .png usuwały się ?

System.IO.File.Delete(My.Computer.FileSystem.SpecialDirectories.Temp & "*.png")

[Gość Pan Szymek]

@Miszczu.

Jak mam zrobić zeby wszystkie pliki z rozszeżeniem .png usuwały się ?

System.IO.File.Delete(My.Computer.FileSystem.SpecialDirectories.Temp & "*.png")

For Each plik In My.Computer.FileSystem.GetFiles(ścieżka, FileIO.SearchOption.SearchAllSubDirectories, Tablica z typami plików (np. (0) = "*.avi")
File.Delete(plik)
Next