1. Tải bản cài đặt AutoIT mới nhất

    Chào Khách. Nếu bạn mới tham gia và chưa cài đặt AutoIT.
    Vui lòng vào topic trên để tải bản AutoIT mới nhất nhé
    Dismiss Notice
  2. Quy định và nội quy

    Chào Khách. Vui lòng đọc kỹ nội quy và quy định của diễn đàn
    Để tránh bị ban một cách đáng tiếc nhé!
    Dismiss Notice
  3. Hướng dẫn chèn mã AutoIT trong diễn đàn

    Chào Khách. Vui lòng xem qua bài viết này
    Để biết cách chèn mã AutoIT trong diễn đàn bạn nhé :)
    Dismiss Notice

UDF Tương tác với Facebook bằng WinHttp

Thảo luận trong 'Chia sẻ mã nguồn' bắt đầu bởi Nguyễn Quốc Tuấn, 3/8/16.

  1. Nguyễn Quốc Tuấn

    Nguyễn Quốc Tuấn Thành viên năng động
    • 48/68

    Tham gia ngày:
    29/7/16
    Bài viết:
    3
    Đã được thích:
    941
    1/ Giới thiệu
    Mình đang học WinHTTP, nên viết cái UDF này cho bạn nào muốn nghiên cứu về facebook :3, thật ra dùng API vẫn dễ hơn nhé!

    2/ Các hàm chính UDF này gồm:
    + FB_Login
    + FB_Post
    + FB_Share
    + FB_Comment
    + FB_React
    + FB_Poke
    Hướng dẫn sử dụng đã viết rõ trong source.

    3/ Demo
    [​IMG]
    Tất cả chỉ việc chạy code :autoit:
    4/ Link dowload

    Lưu ý: Nếu đã nhấn Thích mà vẫn không hiện địa chỉ tải thì bạn hãy bấm KHÔNG THÍCH NỮA, sau đó nhấn Thích lại 1 lần nữa sẽ hiện Link

    V1:
    Nội dung bị ẩn:
    ** Nội dung ẩn: Bạn phải nhấn 'Like' trước khi bạn có thể xem các dữ liệu ẩn chứa ở đây. **
    V2: Sửa lỗi login không thành công:
    Nội dung bị ẩn:
    ** Nội dung ẩn: Bạn phải nhấn 'Like' trước khi bạn có thể xem các dữ liệu ẩn chứa ở đây. **
    V3: Các hàm bổ sung:
    + FB_Comment: bổ sung sticker (ID như hình bên dưới)
    + FB_Share: nghe tên là hiểu rồi :D
    + FB_Poke: một tính năng vô dụng, ít ai để ý nhất trên facebook -> Chọc :3, cứ thử đi nhé
    Sửa lỗi: FB_Post không trả về post ID khi đăng lên tường nhà người khác
    Link download:
    Nội dung bị ẩn:
    ** Nội dung ẩn: Bạn phải nhấn 'Like' trước khi bạn có thể xem các dữ liệu ẩn chứa ở đây. **
    *Lưu ý 1: Tải xong bạn cần mở Facebook.au3 lên, xoá cái Example đi, không là trong quá trình sử dụng nó sẽ hiện thông báo lỗi.
    *Lưu ý 2: Stickers's ID sẽ được rút gọn thành số thứ tự như hình sau:

    [​IMG]

    5/ Lưu ý
    Hàm FB_Login() sẽ trẻ về một mảng gồm 3 giá trị:
    + $Array[0] là cookie
    + $Array[1] là id của facebook đó
    + $Array[2] là fb_dtsg (gần giống với access token của Facebook)
    Bạn có thể lưu mảng này vào một file ini chẳng hạn, để lấy ra và gán vào, không cần FB_Login() lại lần nữa :D

    6/ Lời cuối
    - Khuyến khích nghiên cứu học hỏi, góp ý các kiểu, nghiêm cấm sử dụng với mục đích spam
    - Có thể tham khảo thêm hàm FB_LoginEx là một hàm mở rộng của FB_Login: https://autoitvn.com/threads/fb_loginex-ver-3-ham-login-facebook.889/
     
  2. Huân Hoàng

    Huân Hoàng Administrator Thành viên BQT Administrator Super Moderator
    • 93/113

    Tham gia ngày:
    29/9/15
    Bài viết:
    642
    Đã được thích:
    1,181
    Nguyên đống code trên thým cho nén file zip cho nó gọn, rồi thêm vào tập tính Purchase của bài viết để kiếm Credits nữa, chứ code ra mà không kiếm được gì hơi phí :)):)):))

    Cơ mà khi nào thým Vinh Phạm onl và không đồng ý để chủ đề này thì xác định huỷ bài nha thým :|
     
  3. Vinh Phạm

    Vinh Phạm Super Moderator Thành viên BQT Super Moderator
    • 33/34

    Tham gia ngày:
    13/12/15
    Bài viết:
    53
    Đã được thích:
    134
    Nơi ở:
    HCM
    Việc nghiên cứu làm ba cái này ko phải là xấu :)) nên iêm cũng ko có ý kiến :)) chỉ là sợ mấy ba mấy má trẩu trên gr thấy nó lấy lại nó spam thôi :| nên iêm xin phép ẩn link, chỉ cho member xem
     
  4. Nguyễn Quốc Tuấn

    Nguyễn Quốc Tuấn Thành viên năng động
    • 48/68

    Tham gia ngày:
    29/7/16
    Bài viết:
    3
    Đã được thích:
    941
    Mình đã ẩn nhé :D
     
    qn8800, kamsamita1 and Vinh Phạm like this.
  5. emga9xkc

    emga9xkc Thành viên năng động
    • 43/45

    Tham gia ngày:
    7/3/16
    Bài viết:
    232
    Đã được thích:
    205
    good good, tks bác :D
     
  6. Hagonomo

    Hagonomo Thành viên mới
    • 1/6

    Tham gia ngày:
    3/8/16
    Bài viết:
    1
    Đã được thích:
    1
    Sao mình toàn bị đăng nhập thất bại nhỉ. Thử 2 nick oy :((
     
    kamsamita1 thích bài này.
  7. Ngọc Yến

    Ngọc Yến Thành viên
    • 13/23

    Tham gia ngày:
    11/6/16
    Bài viết:
    24
    Đã được thích:
    27
    yêu thím rồi đó :v
     
    kamsamita1 and Sirius like this.
  8. Huân Hoàng

    Huân Hoàng Administrator Thành viên BQT Administrator Super Moderator
    • 93/113

    Tham gia ngày:
    29/9/15
    Bài viết:
    642
    Đã được thích:
    1,181
    @Hagonomo mình chạy bao nhiêu lần thì nó vẫn ra chính xác đâu có lỗi lầm gì đâu nhỉ :p

    [​IMG]
     
    kamsamita1 and Hagonomo like this.
  9. copcoi

    copcoi Thành viên mới
    • 1/6

    Tham gia ngày:
    4/8/16
    Bài viết:
    1
    Đã được thích:
    1
    nó báo thế này là sao hả bác, file _HttpRequest
    $iMode = ($iReturn > 0 ? Default : 2)
    $iMode = ($iReturn > 0 ^ ERROR
    >Exit code: 1 Time: 0.228
     
    kamsamita1 thích bài này.
  10. Nguyễn Quốc Tuấn

    Nguyễn Quốc Tuấn Thành viên năng động
    • 48/68

    Tham gia ngày:
    29/7/16
    Bài viết:
    3
    Đã được thích:
    941
    Vừa sửa đấy bạn, :D do lỗi cookie thôi
     
    kamsamita1 and Hagonomo like this.
  11. tuanms

    tuanms Thành viên mới
    • 3/6

    Tham gia ngày:
    26/2/16
    Bài viết:
    3
    Đã được thích:
    1
    Em tìm cách lấy toàn bộ groups đã tham gia mà ko đc đang vướng chỗ token access bác giúp em với :D
     
    kamsamita1 thích bài này.
  12. jetjoker

    jetjoker Thành viên mới
    • 3/6

    Tham gia ngày:
    1/4/16
    Bài viết:
    3
    Đã được thích:
    3
    cảm ơn bác nhe.. rất mong đợi
     
    kamsamita1 thích bài này.
  13. emga9xkc

    emga9xkc Thành viên năng động
    • 43/45

    Tham gia ngày:
    7/3/16
    Bài viết:
    232
    Đã được thích:
    205
    Bổ sung chức năng thoát nhóm theo ID:
     
  14. Huân Hoàng

    Huân Hoàng Administrator Thành viên BQT Administrator Super Moderator
    • 93/113

    Tham gia ngày:
    29/9/15
    Bài viết:
    642
    Đã được thích:
    1,181
    @emga9xkc
    Ghê vậy thým, cơ mà thým xây dựng dựa trên cái UDF có sẵn á, ví dụ chỗ đăng nhập thì mình xài hàm FB_Login của UDF, rồi xài $Handle mà nó trả về để thực hiện tiếp mục đích "Thoat Group", coi như bổ sung hàm mới cho UDF luôn :p
    Thứ 2 là nhận của iêm 1 like nhoé, không biết nói gì hơn, nhớ ngày nào thým chập chững học winhttp, giờ làm được đến như thế này rồi, tuyệt vời (y)<3
     
    kamsamita1 thích bài này.
  15. emga9xkc

    emga9xkc Thành viên năng động
    • 43/45

    Tham gia ngày:
    7/3/16
    Bài viết:
    232
    Đã được thích:
    205
    :D nhờ bác mà e mới học đk như vậy mà. (y)
    - E không nghiên cứu nhiều về Func, nên e viết lại cho e dễ hiểu thui. :D nhìn mấy cái biến trongFunc hoa mắt, khó hiểu lắm bác ơi.
    - e lấy ra được số groups đã tham gia, tên groups, đường dẫn. Cơ mà không biết làm sao để đưa nó vào listview hay hiện thị ra đk sao cho đẹp, để chỉ cần chọn vào Tên là lấy đk ID rùi ấn xóa là xong. Mà kiến thức Gui của e yếu quá ko sao làm đk, bác giúp e cái vụ này với.
     
    kamsamita1 thích bài này.
  16. Huân Hoàng

    Huân Hoàng Administrator Thành viên BQT Administrator Super Moderator
    • 93/113

    Tham gia ngày:
    29/9/15
    Bài viết:
    642
    Đã được thích:
    1,181
    GUI thì dễ mà, cơ mà iêm ếu có khiếu thẩm mĩ, thým nhờ người khác đê =)) thým Vinh Phạm chẳng hạn :)):))
     
    kamsamita1 and emga9xkc like this.
  17. sgdavid

    sgdavid Thành viên
    • 8/11

    Tham gia ngày:
    23/10/15
    Bài viết:
    28
    Đã được thích:
    12
    Mình chạy toàn bị login thất bại :(
     
    kamsamita1 thích bài này.
  18. Huân Hoàng

    Huân Hoàng Administrator Thành viên BQT Administrator Super Moderator
    • 93/113

    Tham gia ngày:
    29/9/15
    Bài viết:
    642
    Đã được thích:
    1,181
    kamsamita1 and sgdavid like this.
  19. Huân Hoàng

    Huân Hoàng Administrator Thành viên BQT Administrator Super Moderator
    • 93/113

    Tham gia ngày:
    29/9/15
    Bài viết:
    642
    Đã được thích:
    1,181
    Bổ sung hàm Lấy toàn bộ Group mình đã tham gia (@tuanms):
    - $Handle: Giá trị trả về của hàm FB_Login()
    - Giá trị trả về FB_ListGroups: Mảng, với: array chẵn: ID group, array lẻ: Tên Group

    Mã (AutoIt):
    Func FB_ListGroups($Handle)
        If Not IsArray($Handle) Then Return SetError(1, '', False)
        Local $Request = _HttpRequest(2, 'https://www.facebook.com/bookmarks/groups/', '', $Handle[0])
        Local $ListFilter = StringRegExp($Request, 'BookmarkSeeAllEntsSectionController(.*?)</script>', 1)
        If @error Then Return SetError(2, '', False)
        Local $aRet = StringRegExp($ListFilter[0], '{id:"(\d+?)",name:"(.*?)",count:', 3)
        If @error Then Return SetError(3, '', False)
        Return $aRet
    EndFunc
    [​IMG]
     
  20. sgdavid

    sgdavid Thành viên
    • 8/11

    Tham gia ngày:
    23/10/15
    Bài viết:
    28
    Đã được thích:
    12
    E đăng nhập ok ạ anh share source cho e tham khảo với :D
    Thanks a
     
    kamsamita1 thích bài này.

Chia sẻ trang này

Đang tải...