[Visual Basic] Short Link Tiny Url By HungCoder.Com.

 Hi mọi người, Hùng Coder đã quay trở lại rồi nè :D, và ra một thủ thuật mới cực hay và đơn giản cho anh em trong ngành lập trình tìm hiểu và cho ra nhiều chương trình hay tích hợp với thủ thuật này nhé.


Nhìn lên hình ảnh bên trên các bạn cũng đã đoán sơ qua là code nó hoàn toàn đơn giản chứ không phức tạp gì hết cả nhé. Các bạn chỉ cần thêm vào form : 1 Button và 2 Textbox thế là xong còn các bạn muốn tùy biến hơn hay làm gì thì tùy thuộc vào khả năng của các bạn.

FULL CODE :

Imports System.Net
Imports System.IO

Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim webclient As New Net.WebClient
TextBox2.Text = webclient.DownloadString("https://tinyurl.com/api-create.php?url=" & TextBox1.Text)
End Sub
End Class

Các bạn nhớ thêm 2 dữ kiện mà Hùng bôi đen phía trên nhé để có thể lấy dữ liệu web.

Nhìn vào code trên các bạn cũng đã thấy đường linh tinyurl đó là để rút gọn link rồi phải không :D :D

Mình chỉ thêm một số bổ trợ để rút gọn link nhanh hơn chút chứ không phức tạp nhé, nếu có thời gian mình sẽ giới hạn rút gọn link trên ứng dụng là cứ 1p hay 5p mới rút link 1 lần để bắt người dùng mua bản quyền tool =))) ( Đó là ý tưởng vui chơi thôi chứ không thực hiện nha mọi người)

DOWNLOAD

Chúc các bạn thành công.