- [C#] Hướng dẫn giải nén file *.rar với tiến trình progress bar winform
- [C#] Chia sẻ source code make Crazy Error Message Effect Bomb Windows
- [C#] Lập trình ứng dụng theo mô hình MVP Model-View-Presenter Pattern Winform
- [C#] Giới thiệu và những thứ hay ho từ thư viện System.Reactive của Microsoft
- [C#] Hướng dẫn tạo ứng dụng Chat với GPT sử dụng Open AI API
- [DEVEXPRESS] Tạo month picker trên DateEdit Winform C#
- [DATABASE] Cách sử dụng và lưu ý khi sử dụng khóa ngoại (Foreign Key) trong Sqlserver
- [C#] Garbage Collector (GC) là gì? Cách giải phóng bộ nhớ trên ứng dụng Winform khi các đối tượng không còn sử dụng
- [C#] Cách tính độ tương phản màu sắc Contrast Color mà con người có thể nhìn thấy được
- [C#] Hướng dẫn mã hóa mật khẩu tài khoản ứng dụng đúng chuẩn Men
- [C#] Sử dụng Open AI Chat GPT viết ứng dụng Count down timer có hiệu ứng trên winform
- [DATABASE] Chia sẻ dữ liệu Pantone Color sql và json api
- [SQLSERVER] Tạo mã sản phẩm tự động như: SP0001, SP0002, SP0003... sử dụng Trigger
- [C#] Hướng dẫn kiểm tra phiên bản NET Framework cài đặt ở máy tính
- [C#] Hướng dẫn đọc file excel đơn giản sử dụng thư viện Epplus
- [C#] ConcurrentBag là gì và cách sử dụng nó trong lập trình bất đồng bộ
- [C#] AutoResetEvent là gì và cách sử dụng
- [DEVEXPRESS] Chia sẻ source code cách tạo biểu đồ sơ đồ tổ chức công ty Org Chart trên Winform C#
- [C#] Hướng dẫn tạo Auto Number trên Datagridview winform
- [DATABASE] Hướng dẫn tạo Procedure String Split in Mysql
Ping - kiểm tra kết nối tới một địa chỉ website trong VB.Net
System.Net.WebResponse
Các lớp WebResponse là trừu tượng lớp cơ sở mà từ đó các lớp học đáp ứng giao thức cụ thể có nguồn gốc. Ứng dụng có thể tham gia vào các giao dịch yêu cầu và đáp ứng một protocol-specific sử dụng trường hợp của lớp WebResponse trong khi các lớp giao thức cụ thể có nguồn gốc từ WebResponse thực hiện các chi tiết của yêu cầu.
Dịch nguyên văn của MSDN, mà google trans là 99% :D
Nói cho rong dài vậy chứ thực chất WebResponse là 1 phương thức cho phép chúng ta bắt những phản hồi trả về khi ta thực hiện "Ping" tức là kiểm tra máy mình có thể kết nối với trang đích hay không.
Mình mạn phép làm 1 ví dụ nho nhỏ về WebResponse.
Đầu tiên tạo 1 form như hình với 1 text edit dùng để nhập địa chỉ web vào, một button để thực thi lệnh, một label ùng để thể hiện kết quả, và một timer để chạy thời gian thực.
Bây giờ bắt đầu viết code cho các sự kiện:
Trước hết bạn tạo một function để xử lý và nhận phản hồi từ địa chỉ web
Private Function IsConnectionAvailable() As Boolean If TextEdit1.Text.Length > 0 Then Dim url As New System.Uri("http://www." & Trim(TextEdit1.Text)) Dim req As System.Net.WebRequest req = System.Net.WebRequest.Create(url) Dim resp As System.Net.WebResponse Try resp = req.GetResponse() resp.Close() req = Nothing Return True Catch ex As Exception req = Nothing Return False End Try End If End Function
Bây giờ viết hàm xử lý cho timer:
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick If IsConnectionAvailable() = True Then XtraMessageBox.Show("Connected!") LabelControl1.ForeColor = Color.Green Timer1.Stop() 'Thread.Sleep(7000) 'LabelControl1.Text = "Again!" Else LabelControl1.Text = "Not connected!" LabelControl1.ForeColor = Color.Red End If End Sub
Cuối cùng để timer chạy, trong sự kiện button1 click, ta thực hiện lệnh khởi động timer:
Timer1.Start()
Run ứng dụng...
Nhấn nút Kiểm tra để xem hết quả.
Mọi thắc mắc vui lòng để lại ở comment.
Have fun.. :)