Question

怎么用delphi后台刷新网页获取网页验证码

怎么用delphi后台刷新网页？刷新的时候会弹出询问框，怎么点确定？

Answer 1

获取网页源代码的最简单办法，就是利用 WinInet 单元中的函数： uses WinInet; function GetWebPage(const Url: string):string; var Session, HttpFile:HINTERNET; szSizeBuffer:Pointer; dwLengthSizeBuffer:DWord; dwReserved:DWord; dwFileSize:DWord; dwBytesRead:DWord; Contents:PChar; begin Session:=InternetOpen('',0,niL,niL,0); HttpFile:=InternetOpenUrl(Session,PChar(Url),niL,0,0,0); dwLengthSizeBuffer:=1024; HttpQueryInfo(HttpFile,5,szSizeBuffer,dwLengthSizeBuffer,dwReserved); GetMem(Contents,dwFileSize); InternetReadFile(HttpFile,Contents,dwFileSize,dwBytesRead); InternetCloseHandle(HttpFile); InternetCloseHandle(Session); Result:=StrPas(Contents); FreeMem(Contents); end; 使用时，直接把收到的源代码显示出来： Memo1.Text := GetWebPage('http://www.delphibbs.com/delphibbs/listq.asp');
采纳哦

Answer 2

不好意思,没学过delphi.自己学的java都还有很多不懂得地反呢? 呵呵,你等高人来解决吧!