Просмотр полной версии : Как уставновить связь с антигейт на вб6?
A_n_d_r_e_i
28.04.2010, 22:44
как уставновить связь с антигейт на вб6? :(
плиз.. или чото почитать бросьте а то я не нашел..
сонный, не орите сильно если что..
пожалуйста :o :(
как уставновить связь с антигейт на вб6? :(
плиз.. или чото почитать бросьте а то я не нашел..
сонный, не орите сильно если что..
пожалуйста :o :(
http://kaimi.ru/2009/05/anticaptcha-visual-basic/
A_n_d_r_e_i
28.04.2010, 23:40
новый прикол, как получить картинку например с компонента webbrowser в picturebox? :(
Гет эту картинку отдельно.
A_n_d_r_e_i
29.04.2010, 00:31
ну вот например
Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Public Function SavePictureOnComputer(URL As String, Path As String) As Long
SavePictureOnComputer = URLDownloadToFile(0, URL, Path, 0, 0)
End Function
Private Sub Form_Load()
Dim urlA As String
urlA = "http://www.heroeswm.ru/wimage.php?reg&r=000000000000000000"
WebBrowser1.Navigate urlA
SavePictureOnComputer urlA, "C:\whos89.jpg"
Picture1.Picture = LoadPicture("C:\whos89.jpg")
Picture1.AutoSize = True
End Sub
но тута мы сохраняем определенную картинку. а их там-то много :( :(
ну капча.. ну как? а??
vBulletin® v3.8.14, Copyright ©2000-2026, vBulletin Solutions, Inc. Перевод: zCarot