用VC编程实现网页中POST提交的功能，100分。PPP

[vcbacker]

虽然前面有很多类似的讨论，但是结论我不是很清楚。
请各位帮忙给我解决一下。
用vc提交一下数据给cgi程序。
最好是用post。

[vcbacker]

需要用vc实现，难道不能模拟post吗？

[vcbacker]

.

[vcbacker]

2001年6月26日22时21分53秒

[ssh_zy]

建议：用TSOCKSPY32看POST发的数据，然后照抄一遍试试（注意结束的13h 和 10h）

[hello008]

哈哈，简单得很！
去www.programsalon.com查找upload,就可以找到asp上载控件的VC源码，里面有个处理request的方法：
#include <asptlb.h>
STDMETHODIMP CUploader::StartUpload(IUnknown *pIUnk)
{
// TODO: Add your implementation code here
IRequest* pIRequest; // asp提供的接口
HRESULT hr = pIUnk->QueryInterface(IID_IRequest, reinterpret_cast<LPVOID*>(&pIRequest));
......
HRESULT hr = pIRequest->get_TotalBytes(&m_lDataSize);
hr = pIRequest->BinaryRead(&varBytesToRead, &sarrayBytes);
....

如果觉得符合你的要求，100分至少也德分给我80分吧？

[hello008]

搞反了，你说的是Client端程序？!
呵呵！

[vcbacker]

是客户端程序阿。

[Kevin_qing]

//char *data;
//char *pUrl;

//SOCKET s;
//s=socket(...);
//connect(s,...);

char request[4096];
_snprintf(request,4096,
"POST %s HTTP/1.0\r\n"
"Host: %s\r\n"
"Content-Length: %u\r\n"
"\r\n",
GetUrlPath(pUrl),
GetServer(pUrl),
strlen(data));

send(s,request,strlen(request),0);
send(s,data,strlen(data));//发送数据

recv(s,.......);//接收结果

[vcbacker]

void Navigate2( LPCTSTR lpszURL, DWORD dwFlags, CByteArray& baPostedData, LPCTSTR lpszTargetFrameName = NULL, LPCTSTR lpszHeader = NULL );

能不能用这个？
lpvPostData
Data to send with the HTTP POST transaction. For example, the POST transaction is used to send data gathered by an HTML form. If this parameter does not specify any post data, Navigate2 issues an HTTP GET transaction. This parameter is ignored if URL is not an HTTP URL.
我想用这个，但是不知道到底怎么用？

[Kevin_qing]

或者用wininet实现

[plato]

还是用wininet实现比较简单

[vcbacker]

lpszHeader 这个参数应该怎么设定？

另：wininet怎么实现？能不能给一些代码

[Kevin_qing]

MSDN里面有，index :HttpOpenRequest()

[vcbacker]

用vc做这个怎么这么困难阿

[plato]

Posting Data to the Server
To post data to a server, the verb in the call to HttpOpenRequest must be either POST or PUT. The address of the buffer containing the POST data should then be passed to the lpOptional parameter in HttpSendRequest. The dwOptionalLength parameter should be set to the size of the data.

[vcbacker]

举个例子，谢谢！

[plato]

先HttpOpenRequest得到hRequest,open参数指定"POST"

然后HttpAddRequestHeaders加入"Content-Type: application/x-www-form-urlencoded\r\n"

然后HttpSendRequest指定lpPostData诸如"lname=Doe&fname=John"

然后InternetReadFile循环

最后关闭所有的句炳，OK?

[plato]

以前写过的VC程序不在手边，否则就贴出来了。
MSDN中有VB用wininet发Post的例子，你改造一下就可以了:
标题：

INFO: Header Required Posting HTML Form Encoded Data to ASP Page

[plato]

或者用Navigate2也可以，关键参数这两个：
headers = "Content-Type: application/x-www-form-urlencoded\r\n"

postdata = "lname=Doe&fname=John"

[格利高里]

CString szContent;
CAsyncSocket* pClient = new CAsyncSocket;
char *szContent = "POST /sms/sms.asp?txt=12345789"
n = pClient->Create();
n = pClient->Connect("192.168.10.10", 80);
Sleep(2000);
n = pClient->Send(szContent, strlen(*szContent));
do
{
Sleep(40);
if (i++ > 50) break;
n = pClient->Receive(rbuf, sizeof(rbuf));
} while (n <= 0);
pClient->Close();
delete pClient;