- Tham gia
- 9/10/06
- Bài viết
- 180
- Được thích
- 185
Trong box này thấy mấy anh em hỏi truy cập yahoomail từ excel mấy hôm về lục lại đống VBScript viết lại bằng VBA thấy chạy rất ngon
+ Truy cập Yahoo! mail
Để thực hiện đầu tiên anh em vào trong tools/references
chọn Microsoft Internet control
Để truy cập các trang khác các bạn view source nó và tìm form login(noi thực hiện nhập tên và mật khẩu đăng nhập) sau đó tìm trong đó một dấu hiệu gì đặc trưng để phân biệt với các form khác(với yahoomail thì cái form này có chứa chuỗi "Yahoo! ID:". đựa vào đặc điểm tày để thực hiện việc điền vào các input text username và input text password
sau đó submit form lên server là ok thôi
Nói thêm: Một số bạn thường thắc mắc rằng khi đăng ký các diễn đàn cứ phải nhập 3 cái chữ lằng ngoằng trên một image là sao
Câu trả lời chắc đến giờ bạn đã biết, nếu không có việc chứng thực 3 cái chữ lằng ngoằng ấy thì một người lập trình ở cấp độ mầm non như mình cũng có thể viết 1 thủ tục để điển tất cả các thông tin cần thiết rồi submit lên phát là có ngay 1 thành viên mới
.
+ Truy cập Yahoo! mail
Để thực hiện đầu tiên anh em vào trong tools/references
chọn Microsoft Internet control
Mã:
Private Sub ruadocmail_Click()
Dim ie As InternetExplorer
Set ie = New InternetExplorer
ie.Visible = True
ie.Navigate "[URL="http://www.mail.yahoo.com/"]http://www.mail.yahoo.com[/URL]"
Do Until ie.ReadyState = READYSTATE_COMPLETE
Loop
For Each ieForm In ie.Document.forms
If InStr(ieForm.innertext, "Yahoo! ID:") <> 0 Then
ULogin = True
'login la ten cua input text dung de nhap user
ieForm("login").Value = "nick cua ban"
'passwd la input text dung de nhap pass
ieForm("passwd").Value = "mat khau cua ban"
'sau do la dang nhap
ieForm.submit
Exit For
Else
End If
Next
If ULogin = False Then MsgBox "Ban da dang nhap roi"
Set ie = Nothing
End Sub
End Sub
Để truy cập các trang khác các bạn view source nó và tìm form login(noi thực hiện nhập tên và mật khẩu đăng nhập) sau đó tìm trong đó một dấu hiệu gì đặc trưng để phân biệt với các form khác(với yahoomail thì cái form này có chứa chuỗi "Yahoo! ID:". đựa vào đặc điểm tày để thực hiện việc điền vào các input text username và input text password
sau đó submit form lên server là ok thôi
Nói thêm: Một số bạn thường thắc mắc rằng khi đăng ký các diễn đàn cứ phải nhập 3 cái chữ lằng ngoằng trên một image là sao
Câu trả lời chắc đến giờ bạn đã biết, nếu không có việc chứng thực 3 cái chữ lằng ngoằng ấy thì một người lập trình ở cấp độ mầm non như mình cũng có thể viết 1 thủ tục để điển tất cả các thông tin cần thiết rồi submit lên phát là có ngay 1 thành viên mới
![agfag //**/ //**/](/diendan/styles/smilies/a08.gif)
Lần chỉnh sửa cuối: