Article View: borland.public.cppbuilder.internet.web
Article #1594Re: Post
From: Francisco Navarro
Date: Wed, 27 Oct 2004 10:49
Date: Wed, 27 Oct 2004 10:49
60 lines
2733 bytes
2733 bytes
I never thought that make an Post was so hard....
I have tried with
TVariant Datos = "usuario=paco123&password=paco123";
MyTccpWebBrowser -> Navigate
(http://www.iberware.com/enercut/parametros.php",NULL,NULL,Datos);
The url is the real url, and the usuario and password are real too. this
pages is made only for try, and it show in screen the
parametros that catch with Get. Is written in asp
I try with with this code too.
void WebPostData(TCppWebBrowser *CppWebBrowser, String sURL, String
sPostData)
{
BSTR bstrHeaders = NULL;
TVariant vFlags = {0}, vTargetFrameName={0}, vPostData={0}, vHeaders={0};
LPSAFEARRAY psa;
LPCTSTR cszPostData = sPostData.c_str();
UINT cElems = lstrlen(cszPostData);
LPSTR pPostData;
LPVARIANT pvPostData;
bstrHeaders = SysAllocString(L"Content-Type:
application/x-www-form-urlencodedrn");
if (!bstrHeaders){
Application->MessageBox("Could not allocate bstrHeaders", "Warning",
MB_OK | MB_ICONWARNING);
return;
}
V_VT(&vHeaders) = VT_BSTR;
V_BSTR(&vHeaders) = bstrHeaders;
pvPostData = vPostData;
if(pvPostData){
VariantInit(pvPostData);
psa = SafeArrayCreateVector(VT_UI1, 0, cElems);
if(!psa){
return;
}
SafeArrayAccessData(psa, (LPVOID*)&pPostData);
memcpy(pPostData, cszPostData, cElems);
SafeArrayUnaccessData(psa);
V_VT(pvPostData) = VT_ARRAY | VT_UI1;
V_ARRAY(pvPostData) = psa;
}
CppWebBrowser->Navigate((TVariant)sURL, &vFlags, &vTargetFrameName,
&vPostData, &vHeaders);
}
but send noting..
is impossible to pass two string ?
Technical Details
Message-ID:
<417f7c6c$1@newsgroups.borland.com>Path:
arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!proxad.net!fr.ip.ndsoftware.net!border2.nntp.ams.giganews.com!border1.nntp.ams.giganews.com!nntp.giganews.com!news-hub.cableinet.net!blueyonder!news-peer-test!btnet!newsfeed.bt.es!195.5.65.34.MISMATCH!caladan.arrakis.es!caladan.landsraad.net!newsgroups.borland.com!not-for-mailReferences:
<417e4d44@newsgroups.borland.com> <417e519d@newsgroups.borland.com> <417e6e3e@newsgroups.borland.com> <417e7974$1@newsgroups.borland.com>Show Full Headers
Complete Article Headers
X-Google-Thread: feeec,77418a7a384f2c1c X-Google-Attributes: gidfeeec,public X-Google-Language: ENGLISH,ASCII-7-bit From: "Francisco Navarro" <newtuningmad@telefonica.net> Newsgroups: borland.public.cppbuilder.internet.web References: <417e4d44@newsgroups.borland.com> <417e519d@newsgroups.borland.com> <417e6e3e@newsgroups.borland.com> <417e7974$1@newsgroups.borland.com> Subject: Re: Post Date: Wed, 27 Oct 2004 12:49:23 +0200 Lines: 64 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2800.1106 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1106 NNTP-Posting-Host: 83.34.211.104 Message-ID: <417f7c6c$1@newsgroups.borland.com> X-Trace: newsgroups.borland.com 1098873964 83.34.211.104 (27 Oct 2004 03:46:04 -0700) Path: arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!proxad.net!fr.ip.ndsoftware.net!border2.nntp.ams.giganews.com!border1.nntp.ams.giganews.com!nntp.giganews.com!news-hub.cableinet.net!blueyonder!news-peer-test!btnet!newsfeed.bt.es!195.5.65.34.MISMATCH!caladan.arrakis.es!caladan.landsraad.net!newsgroups.borland.com!not-for-mail