tháng 9 21, 2017

Facebook bot chúc ngủ ngon bạn bè

Bot này dựa trên cái thư viện hôm bữa mình nói là fbchat.
Vì mạng quá yếu nên mình không làm video.
Yêu cầu

Không có yêu cầu, code có sẵn rồi, chỉ việc cài rồi chạy.


Bot sẽ tự động chạy mỗi khi tới 11h đêm, gửi tới từng người có id trong file config.py một tấm hình ngẫu nhiên trong list images, gửi một câu chúc ngẫu nhiên trong list wish.


Bạn có thể thay đổi hay thêm vào nội dung câu chúc tùy ý.

Để cài đặt bot, bạn tải Python 3 installer từ đây https://www.python.org/downloads/
Nhớ chọn phiên bản 3.6. Sau khi cài đặt xong Python 3, bạn tải về mã nguồn của bot tại đây
https://github.com/mrvir/Good-Night-Bot

Bạn mở file config.py lên điền thông tin tài khoản Facebook của bạn vào phần username và password.
Sau đó sửa hoặc thêm danh sách hình ảnh, câu chúc, danh sách bạn bè vào file config.
Bạn có thể dùng công cụ này để lấy uid cho vào file config: https://lookup-id.com/

Sau khi điền đầy đủ thông tin xong, ngay tại vị trí thư mục Good-Night-Bot, bạn nhấn đè phím Shift và chuột phải lên khoảng trống trong thư mục và chọn Open Command Window Here.


Hộp thoại cmd sẽ hiện ra, bạn gõ lệnh
python3 -m pip install -r requirements.txt
python3 bot.py

Nếu python3 không được thì bạn thay bằng python, mình không rõ lắm, lâu lắm không dùng Windows.
Vậy là xong.

Tới 11h đêm nó sẽ gửi tin nhắn cho bạn bè bạn đã điền trong file config.
Bot này do một người trong nhóm J2TeaM đặt mình làm, nay cho mình share lại.
Lưu ý:

Đừng gửi cho quá nhiều người, đừng gửi cho những người không muốn nhận tin nhắn hay những người khó chịu.

Nếu bạn chạy bot trên vps có IP nước ngoài thì nguy cơ bị khóa tài khoản là cực cao, nên nếu sẵn sàng để mở khóa thì hẵng dùng.
Bài sau mình sẽ hướng dẫn làm bot tự trả lời tin nhắn nếu bạn không online.

Nguồn: Area3.org


tháng 9 14, 2017

TẠO HỘP THÔNG BÁO TRƯỢT DỌC CHO BLOGSPOT

Xin chào các bạn, Hôm nay mình sẽ hưỡng dẫn các bạn tạo hộp thông báo cố định trượt dọc theo website.


Cách làm rất là đơn giản :)))

Bước 1: Đăng nhập vào Blogger > Mẫu > Chỉnh sửa HTML > Đặt đoạn CSS dưới đây trên thẻ ]]></b:skin> hoặc </style>

/* BLANTER Notif Box Created by Idblanter.com - REUP BY WEE2K*/#notif-wrapper{position:fixed;width:100%;z-index:999}
.blanternotif{background:#d32f2f;color:#FFF;width:50px;height:50px;border-radius:100%;position:fixed;z-index:999;bottom:45%;left:20px;-webkit-animation-duration:5s;-webkit-animation-iteration-count:infinite;-webkit-animation-name:notifklik;animation-duration:5s;animation-iteration-count:infinite;animation-name:notifklik;transition:all 5s ease-in-out}
.blanternotif i{color:#FFF;font-size:25px;margin:11px 10px 10px 13px;-webkit-animation-duration:2s;-webkit-animation-iteration-count:infinite;-webkit-animation-name:notificon;animation-duration:2s;animation-iteration-count:infinite;animation-name:notificon;transition:all 2s ease-in-out}@keyframes notifklik{0%{transform:scale(1)}50%{transform:scale(1.2)}100%{transform:scale(1)}}@keyframes notificon{0%{transform:rotate(-30deg)}50%{transform:rotate(30deg)}100%{transform:rotate(-30deg)}}@keyframes notifbox{0%{transform:rotateZ(-45deg);visibility:visible;opacity:0;bottom:68%;left:78px}100%{transform:none;visibility:visible;opacity:1;bottom:41%;left:110px}}
.notifbox{padding:20px;border-radius:3px;position:fixed;resize:none;line-height:1.5;z-index:999;left:110px;bottom:41%;max-width:30rem;background:#d32f2f;border:1px solid #d32f2f;color:#fff;font-size:13px;box-shadow:0 1px 1px 0 rgba(0,0,0,0.07),0 1px 1px 0 rgba(0,0,0,0.06);display:inline-block;opacity:0;visibility:hidden;transition:.4s ease-in-out}
.notifbox:before{content:"";width:0;height:0;position:absolute;top:-.7px;left:-15px;border-width:8px;border-style:solid;border-color:#d32f2f #d32f2f transparent transparent;display:block}.blanterxE5CD{display:none!important}#notif-wrapper.aktif .blanterxE5CD{display:block!important;animation-name:none!important}#notif-wrapper.aktif .blanterxE7F4{display:none!important}
.notifbox.aktif{-webkit-animation-duration:1s;-webkit-animation-iteration-count:1;-webkit-animation-name:notifbox;animation-duration:1s;animation-iteration-count:1;animation-name:notifbox;transition:all 1s ease-in-out;opacity:1;visibility:visible}@media screen and (max-width:680px){.notifbox:before{display:none}
.notifbox{left:0%!important;bottom:0}@keyframes notifbox{0%{left:0!important}100%{left:0!important}}}

Bước 2: Dán đoạn mã này vào sau thẻ <body> hoặc trước thẻ </body>

<div id='notif-wrapper'><a class='blanternotif' href='javascript:;' title='Notifications'><i class='material-icons blanterxE7F4'>&#59380;</i><i class='material-icons blanterxE5CD'>&#58829;</i></a><div class='notifbox'>BỜM KHÙNG BLOGGER - BLOG CHIA SẺ THỦ THUẬT CÔNG NGHỆ MIỄN PHÍ, THỦ THUẬT HAY, PHẦN MỀM TIỆN ÍCH
</div></div>

Bước 3: Đặt JavaScript sau ngay trên mã </body>

<script type='text/javascript'> $(document).ready(function(){$(".blanternotif").click(function(){$(".notifbox,#notif-wrapper").toggleClass("aktif");});}); </script> 

Nếu như blog bạn chưa có CSS ICON thì hãy đặt đoạn mã này vào trên thẻ </head>

<link href="https://fonts.googleapis.com/icon?family=Material+Icons" rel="stylesheet"/>

Chúc các bạn thành công và tận hưỡng thành quả của mình khi làm ứng dụng này :)

DEMO bên tay trang của các bạn nhé ^^



tháng 9 13, 2017

Tạo Button Download với hiệu ứng thời gian đếm ngược cho blogspot

Bạn muốn trau truốt blog của mình, bạn muốn blog của mình thêm cầu kì hay đơn giản bạn muốn khách ghé thăm blog của bạn được lâu hơn...

Bạn muốn tạo ấn tượng với Button Download của mình, Hôm nay mình sẽ hưỡng dẫn các bạn cách để tạo ra Button Download hoặc là Demo với hiệu ứng thời gian đếm ngược.


Cách làm:

Bước 1: Dán đoạn Javascript này vào trên thẻ </head> hoặc </body>

<script type="text/javascript">
    //<![CDATA[
    function generate() {
        var linkDL = document.getElementById("download"),
            btn = document.getElementById("btn"),
            direklink = document.getElementById("download").href,
            waktu = 10;
        var teks_waktu = document.createElement("span");
        linkDL.parentNode.replaceChild(teks_waktu, linkDL);
        var id;
        id = setInterval(function () {
            waktu--;
            if (waktu < 0) {
                teks_waktu.parentNode.replaceChild(linkDL, teks_waktu);
                clearInterval(id);
                window.location.replace(direklink);
                linkDL.style.display = "inline";
            } else {
                teks_waktu.innerHTML = "Sẽ chuyển hướng sau" + waktu.toString() + "";
                btn.style.display = "none";
            }
        }, 1000);
    }
    //]]>
    </script> 

Cần thay đổi: waktu = 10; Thời gian đếm ngược

CSS

#link-download {display: none}
    #btn {display: inline-flex;
        border-radius: 4px;
        cursor: pointer;
        box-shadow: 0 2px 5px 0 rgba(0,0,0,0.16), 0 2px 10px 0 rgba(0,0,0,0.12);
        font-size: 13px;
        font-weight: 700;
        text-transform: uppercase;
        color: #FFF!important;
        background-color: #22a1c4!important;
        margin: 5px;
        padding: 8px 20px;
        text-shadow: none;
        transition: all 1s;
    }

Cách sử dụng:

Vào phần bài viết chuyển sang chế độ HTML và Copy đoạn code dưới đây vào nơi muốn hiển thị

<button onclick="generate()" id="btn">Download</button> <a id="download" href="link-download" style="display:none">Download</a>

DEMO



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




tháng 9 12, 2017

[VB.NET] Code Change ICO Ỗ Đĩa PC

Hôm nay mình xin hướng dẫn các bạn một ứng dụng mới của mình đó là "CHANGE ICO Ổ ĐĨA" một cách đơn giản mà không cần hiểu rỏ về máy tính. :D


Nhìn sơ qua thì các bạn cũng biết thêm gì rồi chứ :D, mình cũng không nói rỏ thêm nữa :D hoặc các bạn cũng có thể Download Full bộ SOURCE bên dưới về và tìm hiểu rỏ nhé :D

FULL CODE

Public Class Form1
    Dim image As System.Drawing.Image
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ComboBox1.SelectedItem = "C"
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        OpenFileDialog1.ShowDialog()
        TextBox1.Text = OpenFileDialog1.FileName
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If TextBox1.Text = "" Then
            MsgBox("Please select an icon.", MsgBoxStyle.Exclamation)
        End If
        If ComboBox1.SelectedItem = "" Then
            MsgBox("Please select a drive letter.", MsgBoxStyle.Exclamation)
        Else
            My.Computer.Registry.CurrentUser.CreateSubKey("Software\\Classes\\Applications\\Explorer.exe\\Drives" & "\\" & ComboBox1.SelectedItem & "\\" & "DefaultIcon")
            My.Computer.Registry.SetValue("HKEY_CURRENT_USER\Software\Classes\Applications\Explorer.exe\Drives\" & ComboBox1.SelectedItem & "\" & "DefaultIcon", "", TextBox1.Text, Microsoft.Win32.RegistryValueKind.String)
            MsgBox("Icon changed successfully!", MsgBoxStyle.Information)
        End If
    End Sub

    Private Sub TextBox1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.Click
        OpenFileDialog1.ShowDialog()
        TextBox1.Text = OpenFileDialog1.FileName
    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        If ComboBox1.SelectedItem = "" Then
            MsgBox("Please select the drive letter of which you want to reset the icon.", MsgBoxStyle.Exclamation)
        Else
            Try
                My.Computer.Registry.CurrentUser.DeleteSubKey("Software\Classes\Applications\Explorer.exe\Drives\" & ComboBox1.SelectedItem & "\" & "DefaultIcon")
                My.Computer.Registry.CurrentUser.DeleteSubKey("Software\Classes\Applications\Explorer.exe\Drives\" & ComboBox1.SelectedItem)
                MsgBox("Success!", MsgBoxStyle.OkOnly)
            Catch ex As Exception
                MsgBox("That drives icon was never changed.", MsgBoxStyle.Exclamation)
            End Try
        End If
    End Sub

    Private Sub OpenFileDialog1_FileOk(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog1.FileOk
        PictureBox2.Image = System.Drawing.Image.FromFile(OpenFileDialog1.FileName)
    End Sub
End Class

Hướng dẫn sơ qua: Bạn muốn thay đỗi hình ảnh ổ đĩa thì các bạn có thể tìm kiếm 1 file ảnh dạng "HINHANH.ICO" đó là đuôi "*.ICO" và các bạn thêm vào ứng dụng và chọn ổ đĩa muốn thay đỗi và ấn vào button thay đỗi ico là các bạn đã thay đỗi thành công rồi đó :D chúc các bạn thành công :D

Video DEMO cho các bạn :p



DOWNLOAD FILE EXE DOWNLOAD SOURCE

Chúc các bạn thành công. Và các bạn cũng lưu ý dùm mình là nếu copy bài viết này thì các bạn làm phiền dẫn nguồn về trang bài viết này nhé, để tôn trọng tác giả :D



tháng 9 11, 2017

[VB.NET] My Computer Info (Thông tin máy tính)

Hôm nay mình xin giới thiệu cho các bạn một ứng dụng mới của mình. Ứng dụng này giúp cho các bạn chưa hiểu rỏ tìm hiểu máy tính của mình như thế nào và giúp in ra thông tin ngay trên ứng dụng cho các bạn thấy :D.


Qua hình ảnh bên trên các bạn cũng đã nhìn thấy những gì mình cần rồi chứ :D
Máy mình đang ngồi ở tiệm net là " MÁY 2"
User Name : là " MÁY 2 "
Os Name : Window 7 Enterprise
RAMCPU đang ở rất thập vì mình không mở nhiều ứng dụng nhé :D

VIDEO DEMO của ứng dụng này :



FULL Đoạn code của ứng dụng cho các bạn coder tìm hiểu.

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Try
   'Đoạn code nhận biết RAM và CPU tốc độ như thế nào
 ProgressBar1.Value = PerformanceCounter1.NextValue
            ProgressBar2.Value = PerformanceCounter2.NextValue
            Label1.Text = ProgressBar1.Value & " %"
            Label2.Text = ProgressBar2.Value & " %"
'Đoạn code giúp nhận biết thông số máy tính 
            Label3.Text = My.Computer.Name
            Label4.Text = My.User.Name
            Label5.Text = My.Computer.Info.OSFullName
            Label6.Text = My.Computer.Clock.LocalTime
        Catch ex As Exception
            MessageBox.Show("Không Thể Hiện Thị Đầy Đủ Thông Tin Được", "Thông Báo")
        End Try
    End Sub

Các bạn có thế DOWNLOAD đoạn code tại đây.
DOWNLOAD DOWNLOAD SOURCE 2010

PassWord Giải Nén Source: bomkhung.info

Các bạn cũng lưu ý khi các bạn copy bài viết này, thì làm phiền các bạn nhớ để nguồn bài viết về Bờm Khùng Blogger giúp mình để tôn trọng công sức của tác giả bài viết này! Xin cảm ơn


tháng 9 07, 2017

Ứng Dụng NoTePad Lưu Trữ Thông Tin Online (Offline)

Hôm nay mình xin ra mắt một ứng dụng cũng đã lâu rồi, trước đây mình cũng đã ra mắt ứng dụng này nhưng chỉ là bản hổ trở "OFFLINE" chứ không phải như bản này có hổ trợ "ONLINE" để lưu trử một cách thoải mái mà không sợ bị mất dữ liệu nữa rồi ;)


Một số thông tin cơ bản của ứng dụng này nhé mọi người
1, Ứng dụng hoàn toàn MIỄN PHÍ không có phí gì nhé mọi người !
2, Tuyết đối không có đính kèm VIRUS hay BOTNET gì nhé mọi người. Nếu mọi người tải ở trang khác ngoài trang BOMKHUNG.INFO này thì mọi người nên cẩn thận nhé.
3, Ở chế độ lưu ONLINE thì các bạn sẽ được lưu trữ giữ liệu lên PASTEBIN.COM nhé. Một trang lưu trữ thông tin khá phổ biến của các CODER or HACKER.
4, Khi có chế độ UPDATE thì ứng dụng sẽ thông báo cho người sữ dụng nhé :)
5, Khi Save lại thì nó sẽ nằm trong ổ C:\ nhé. Vì mình chưa có thời gian rảnh cho lắm nên chưa phát triển nó thêm, các bạn thông càm cho mình nhé.

Anh em nào cần thì cũng như các ứng dụng khác để lại email mình send cho test thứ nhé ;). Chứ mình không tiện để button Download. Vì sợ 1 số anh em lạm dụng nó để chơi xấu mọi người.

Cập nhật video DEMO cho mọi người



Bạn nào copy bài viết này thì làm ơn để lại nguồn từ blog này nhé. Để tôn trọng người viết.

tháng 9 06, 2017

Auto View Link Phiên Bản Mới...

Hôm nay mình xin ra mắt cho anh em 1 ứng dụng mới của mình! Ứng dụng này dùng để chủ yếu câu view (Lượt truy cập) cho mọi người. Hiện tại ứng dụng này mình viết cũng lâu rồi nhưng chưa phát hành (dùng cho cá nhân) là chú yếu :D. Nên hôm nay mình đem ra share cho mọi người câu view cho blog. Và có thể làm tốt để đăng ký được em Google Adsense


Nói là phiên bản mới nhưng đây là ứng dụng lâu năm rồi nhé mọi người! :D
Ai cần thì để lại email mình send cho nhé. Và các bạn cũng lưu ý luôn là ở phiên bản này không có hổ trợ hoặc lỗi gì nhé, vì ứng dụng này mình không còn "SOURCE" nữa rồi nên khó mà hổ trợ cho các bạn nhé !

Khi các bạn copy bài đăng từ blog này. Thì làm phiền các bạn để lại nguồn nhé, để tôn trọng người viết nhé :D