delphi 读取网页源代码问题
答案:1 悬赏:80 手机版
解决时间 2021-04-25 17:52
- 提问者网友:嘚啵嘚啵
- 2021-04-24 23:05
delphi 网页里有一个大表格,里面有各种数据。从源代码里知道这个表格的ID。如何用读源代码方法只读这个表格的源代码
最佳答案
- 五星知识达人网友:duile
- 2021-04-25 00:01
获取网页源代码的最简单办法,就是利用 WinInet 单元中的函数:uses WinInet;function GetWebPage(const Url: string):string;var Session, Http文件:HINTERNET; szSizeBuffer:Pointer; dwLengthSizeBuffer:DWord; dwReserved:DWord; dwFileSize:DWord; dwBytesRead:DWord; Contents:PChar;begin Session:=InternetOpen('',0,niL,niL,0); Http文件:=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(blog.asp?name=aliwy);
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯