Thông báo thành lập công ty....

HEY, CHO CHỊ ĐẶT HÀNG CÁI LÀM THẾ NÀO ĐỂ TĂNG SỐ NGƯỜI ĐỌC BÀI (ĐỂ HỌC THÔI CHỨ CHỊ HỨA KHÔNG CHEAT NGƯỜI KHÁC)
CHỊ TRẢ BẰNG KISS ĐƯỢC KHÔNG ???? THẾ THÌ DÁM ĐỐC CỦA EM LỜI TO.
KISS THEN KICK//KILL

Men ask women anything
GoingCrazy

Kiểu này tui phải đăng kí chức tổng giám đốc thôi .
You bring my heart away .

Thế thì cưng muốn KICK hay KILL hả???
KISS THEN KICK//KILL

Men ask women anything
GoingCrazy

thế này ạ, cháu xin bật mý bí quyết công ty cháu, chả biết dám đốc có mắng cháu là học mẫu giáo mà đã tham hun hít không
Để tăng số bài 1 lần, mọi người có thể ấn F5 để refresh lại.
Để tăng số bài nhiều lần mọi người có thể ấn F5 nhiều lần, tất nhiên là vậy. Nên cháu mới viết cái chương trình ngắn ngắn mấy dòng thui, để nó tự refresh lại cho nó nhanh, nên trong vòng 1 phút cháu có thể tăng được độ 150-200 bài tuỳ thuộc tốc độ mạng nhanh hay chậm.
Thế đấy...

​

hoc mau giao thi hun theo kieu mau giao ... hehe
ma chau nay!
sao cai vai dong ngan ngan ay la cai quan trong nhat thi chau lai khong post len ha??????????????

Men ask women anything
GoingCrazy

okay, okay, nhưng mà trả công kiểu rề, bây rờ cũng có hun trả góp à , mà ở mẫu giáo các cô chỉ kiểm tra răng miệng cháu thui, chả thấy hun bao rờ
Cái nè viết bằng VB cho dễ nhé
Cái form gồm có
một nút bấm : tên Command1
một cái Active X webbrowser : tên là w
(cái này add bằng cách ấn Ctrl-T, check vào ô Microsoft Internet Control và OK).
Đây là đoạn code
Option Explicit
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) 'delay thui mà
Private Sub Command1_Click()
Dim i
i = 0
Do Until i = 10000 'số tượng trưng thôi, nhỡ may nhanh quá các bác ý lại kêu
w.Refresh2 (3) 'refresh2 cho chắc chắn là ko đọc trên cache của máy tính
i = i + 1
Sleep (500) 'delay, chỗ này tuỳ máy nhanh hay chậm, tốc độ Internet nhanh hay chậm mà chỉnh số nếu ko sẽ ko hiệu qủa
DoEvents 'cái này cắm vào để stop nó lại cho dễ
Loop
MsgBox "OK"
End Sub
Private Sub Form_Load()
w.Navigate XYZ ' XYZ là chuỗi URL của bài đó, ví dụ "http://203.162.130.221/forum/topic.asp?TOPIC_ID=46290&whichpage=2&ARCHIVE="
'nên load lại lúc đầu tiên vì có thể dễ bị lưu trên cache trong máy tính
End Sub
Thế thui mà, cô ạ, tại nó ngắn mới lại đơn giản quá nên cháu xấu hổ không dám post lên

Men ask women anything
Women do something
and...
Thế đấy...

​

Chau gioi ghe, rui co se thuong, nhung ne sao dam them bot gi sign of co day. and la and the nao???
men xin xo women du thu

Men ask women anything
GoingCrazy

hì hì, thêm bớt tý cho vui vẻ
Thế đấy...

​

god, sao công ty cháu ế ẩm thế, wảng cáo đi chứ

Men ask women anything
GoingCrazy

god, sao công ty cháu ế ẩm thế, wảng cáo đi chứ
chịu thui, đến hun còn chưa được trả muh thì làm ăn thế nào được, thế cô có cần rì nữa ko ???
Thế đấy...

​