If messagebox??? Jak to zrobić?

Scania

2011-07-16 13:42

Scania2011-07-16 13:42

Witam.
Mam kolejny problem.

Kopiuj

 Catch ex As SmtpException
MessageBox.Show("There was an error!!!" & vbNewLine &
"Program cannot connect to the server!!" & vbNewLine &
"Please try again later, or check your Account numer, password and internet connection.")

Mam taki kodzik. Wyświetla on okno, jeśli nie zostanie wysłany e-mail. Jak mam teraz zatrzymać zegar, jeśli wyskoczy ten błąd. Aktualnie po wyświetlaniu okna pasek mknie dalej aż do maxminum.
Chciałbym aby zatrzymał się jeśli wyświetli się w.w okno.
Próbowałem takie coś lecz nie działa. Przepraszam, jeśli to banalne pytanie, lecz dopiero zaczynam zabawę z programowaniem.
If MessageBox.Show = True Then
Timer1.Stop()
End If

Wronq

2011-07-16 13:49

Wronq2011-07-16 13:49

Rejestracja:około 17 lat
Ostatnio:prawie 11 lat

Może należy go zatrzymać przed pokazaniem tego MessageBoxa?

scania

2011-07-16 14:02

scania2011-07-16 14:02

Dzięki oczywiście pomogło
Tak to jest jak się dopiero zaczyna z czymś. czasami najprostsze rozwiązanie jest najlepsze.
Korzystam z video na youtube i poradników, np na jakiś program i dokładam swoje moduły, okienka itp.
Dzięki za odpowiedź można do kosza.

Scania

2011-07-16 15:07

Scania2011-07-16 15:07

Mam jeszcze 1 pytanie, a nie chcę tworzyć nowego tematu. Tworzę taki jakby formularz, którego dane są wysyłana na email.
Czy da radę zrobić tak, aby pokazywało ip komputera, jego nazwę itp. z którego został wysłany ten formularz na mój email.
Robię w Vsisual basic 2010.

Wronq

2011-07-16 16:18

Wronq2011-07-16 16:18

Rejestracja:około 17 lat
Ostatnio:prawie 11 lat

Nie podpowiem Ci jakby to wyglądało w VB. Podam Ci natomiast kod w C#, a są one dosyć podobne i może dasz sobie radę:

To jest pobieranie adresu ip komputera (sęk w tym, że przynajmniej mi podaje adres w sieci lokalnej, a nie ten "na wyjściu"):

Kopiuj

System.Net.Dns.GetHostAddresses(System.Net.Dns.GetHostName())

Kiedyś, kiedyś, sto lat temu napisałem coś takiego:

Kopiuj

private string CheckIp()
        {
            try
            {
                HttpWebRequest zapytanie = (HttpWebRequest)WebRequest.Create("http://automation.whatismyip.com/n09230945.asp");
                HttpWebResponse odpowiedz;
                StreamReader odpowiedzSTR;
                String DaneOdebrane;
                zapytanie.Method = "GET";
                zapytanie.UserAgent = "Mozilla/5.0 (Windows; U; Windows NT 5.1; pl; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3 (.NET CLR 3.5.30729)";
                zapytanie.ContentType = "application/x-www-form-urlencoded";
                zapytanie.KeepAlive = true;
                zapytanie.Accept = "text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8";
                zapytanie.AllowAutoRedirect = true;
                zapytanie.Timeout = 1000;
                odpowiedz = (HttpWebResponse)zapytanie.GetResponse();
                odpowiedzSTR = new StreamReader(odpowiedz.GetResponseStream());
                DaneOdebrane = odpowiedzSTR.ReadToEnd();
                return DaneOdebrane;
            }
            catch { return ""; }
        }

W zasadach whatismyip.com można wyczytać, że sprawdzać ip w ten sposób można co jakiś czas (5 minut chyba) - w praktyce działa to za każdym razem, no ale zasady to zasady, prawda? :D

Co do informacji o systemie/maszynie to klasa System.Enviroment i WMI.