38946번 글과 그 밑에 붙어있는 글을 보시면 여기에 대한 내용이 나와있습니다.
저도 한번 사용해 본 결과 잘 사용되구요. 다만 중요(하진 않은)한 것은 저기에 있는 구분자를 &로 하면 안되고 &&를 쓰셔야 하더군요.
그니까.. 이런 식으로 쓰시면 됩니다.
/*38946번에 있는 함수 그대로 복사한 것 -_-;;;; */
void TForm1::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;
WideString Head = "Content-Type: application/x-www-form-urlencoded\r\n"
"Accept-Language: ko\r\n"
"Accept-Encoding: gzip, deflate\r\n";
//"Referer:
http://127.0.0.1/login.htm\r\n";
bstrHeaders = SysAllocString(Head);
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->Navigate2(&(TVariant)sURL, &vFlags, &vTargetFrameName, &vPostData, &vHeaders);
}
/*38946번에 있는 함수 그대로 복사한 것 -_-;;;; */
void __fastcall TForm1::Button1Click(TObject *Sender)
{
String sTemp = "";
sTemp = "userid=" +Edit1->Text.Trim()+
"&&passwd=" +Edit2->Text.Trim()+
"&&sender=" +Edit3->Text.Trim()+
"&&reciver=" +Edit4->Text.Trim()+
"&&message="+Edit5->Text.Trim()+
"&&receiver_name="+Edit6->Text.Trim()+
"&&email2="+Edit7->Text.Trim();
WebPostData ( WebBrowser, "
http://www.winc7788.co.kr/MSG/send/web_admin_send.htm",sTemp);
}
이성제 님이 쓰신 글 :
: 포맷 메소드를 쓰면 된다고 하던데.. 잘 모르겠습니다. (머쓱)
:
: form method=post name=all target=hidfrm action=http://www.winc7788.co.kr/MSG/send/web_admin_send.htm>
: input type=hidden name=userid value=문자나라아이디>
: input type=hidden name=passwd value=문자나라비밀번호>
: input type=hidden name=sender value=보내는번호>
: Input type=hidden name=receiver value=받는번호>
: input type=hidden name=message value=보내는메시지>