相关疑难解决方法(0)

如何使用WinInet api在Delphi中发送HTTP POST请求

我正在尝试使用WinInet函数从Delphi发出HTTP请求.

到目前为止,我有:

function request:string;
var
  hNet,hURL,hRequest: HINTERNET;
begin
  hNet := InternetOpen(PChar('User Agent'),INTERNET_OPEN_TYPE_PRECONFIG or INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0);
  if Assigned(hNet) then 
  begin
  try
    hURL := InternetConnect(hNet,PChar('http://example.com'),INTERNET_DEFAULT_HTTP_PORT,nil,nil,INTERNET_SERVICE_HTTP,0,DWORD(0));
    if(hURL<>nil) then
      hRequest := HttpOpenRequest(hURL, 'POST', PChar('param=value'),'HTTP/1.0',PChar(''), nil, INTERNET_FLAG_RELOAD or INTERNET_FLAG_PRAGMA_NOCACHE,0);
    if(hRequest<>nil) then
      HttpSendRequest(hRequest, nil, 0, nil, 0);
    InternetCloseHandle(hNet);
  except
    on E : Exception do
      ShowMessage(E.ClassName+' error raised, with message : '+E.Message);
  end;
  end
end;
Run Code Online (Sandbox Code Playgroud)

但这没有做任何事情(我正在嗅探网络http流量,看它是否有效).我已成功使用InternetOpenURL但我还需要发送POST请求,该功能不会这样做.

有人能告诉我一个简单的例子吗?我想要的结果是将var响应页面作为字符串获取.

delphi post http wininet request

15
推荐指数
1
解决办法
3万
查看次数

Delphi:如何将互联网上的文本文件加载到字符串中?

在我的程序中,我有一个函数来检查程序的当前版本,它来自url:www.tablemaster.webs.com/versioninfo.txt

如您所见,URL只是纯文本.我需要将URL中的这个文本加载到我的程序中的字符串中,我将如何进行此操作?我四处搜寻但一无所获......

PS:我需要最简单的代码..

提前致谢 :)

delphi text download web

4
推荐指数
1
解决办法
6893
查看次数

如何使用Delphi模拟浏览器

我需要构建一个应用程序来获取Web上的证券交易所数据.为此,我需要获取页面代码,有时发送请求(发布和获取).我正在尝试制作类似机器人的东西.有人可以帮帮我吗?

browser delphi bots

0
推荐指数
1
解决办法
496
查看次数

delphi 7 http请求转换成字符串

我想直接将一个url加载到一个没有任何数据流的字符串中,最好的方法是什么,internet open url但它似乎不太清楚.

我不想使用任何组件来阅读一些短消息

delphi http delphi-7

-1
推荐指数
1
解决办法
7654
查看次数

标签 统计

delphi ×4

http ×2

bots ×1

browser ×1

delphi-7 ×1

download ×1

post ×1

request ×1

text ×1

web ×1

wininet ×1