Hôm nay lại một ngày rảnh rổi quá, nên mình mạn phép làm ứng dụng posted facebook được viết vằng "VISUAL BASIC" và sữ dụng "TOKEN" của "FACEBOOK". Ứng dụng hoàn toàn đơn giản không cầu kì các bạn nhé ^^ ai cần thì để lại email mình send Project cho nhé ^^
FULL CODE
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim post As New System.Net.WebClient post.Encoding = System.Text.Encoding.UTF8 post.UploadString("https://graph.facebook.com/me/feed?method=POST&message=" + TextBox1.Text + Nothing, "&access_token=" + TextBox2.Text) MessageBox.Show("Bạn Chưa Điền Token Facebook", "Thông Báo") End Sub
Mọi người để lại bình luận góp ý, nhận xét về những bài viết mà mình chia sẽ văn minh lịch sự hay kích động, Không spam, không chèn link quảng cáo, bán hàng, Không sử dụng từ ngữ thô tục, xúc phạm, kích động, Link chỉ được phép khi thực sự liên quan đến nội dung bài viết, Không mạo danh người khác hoặc sử dụng email giả, Bình luận vi phạm sẽ bị xóa không cần thông báo trước.
Mọi người lưu ý răng, nếu muốn chia sẽ code ở bình luần thì cần mã hóa code trước khi bỏ vào khung nhé. :)
⑴ Chèn ℂ𝕤𝕤 theo mẫu : [pre css] ℂ𝕤𝕤 [/pre]
⑵ Chèn ℍ𝕥𝕞𝕝 theo mẫu : [pre html] ℍ𝕥𝕞𝕝 [/pre]
⑶ Chèn 𝕁𝕒𝕧𝕒𝕤𝕔𝕣𝕚𝕡𝕥 theo mẫu : [pre js] 𝕁𝕒𝕧𝕒𝕤𝕔𝕣𝕚𝕡𝕥 [/pre]
🖼️ Chèn 𝕀𝕞𝕒𝕘𝕖 theo mẫu : [img] 𝕃𝕚𝕟𝕜 𝕀𝕞𝕒𝕘𝕖 [/img]
🎞️ Chèn Video 𝕐𝕠𝕦𝕥𝕦𝕓𝕖 theo mẫu : [youtube] 𝕃𝕚𝕟𝕜 𝕪𝕠𝕦𝕥𝕦𝕓𝕖 [/youtube]
Đúng rồi bạn :D mình cũng đã FIX lại rồi ;) có lẽ sau này mình sẽ thêm vào app để mình biết có bao nhiêu người dùng app rồi nó sẽ tự đăng lên FB để mình theo dõi cho tiện quá ^^
Hiện tại ứng dụng ko dùng được nữa nhé mọi người !
Trả lờiXóaMình đã test. Dùng rất OK và m đã thêm pictures khi bỏ token vào và get rồi :) rất OK luôn :D
XóaĐúng rồi bạn :D mình cũng đã FIX lại rồi ;) có lẽ sau này mình sẽ thêm vào app để mình biết có bao nhiêu người dùng app rồi nó sẽ tự đăng lên FB để mình theo dõi cho tiện quá ^^
Xóa