Toto je cast kodu z programu, ktory mi posiela SMS cez
www.orangeportal.sk
Kód:
/* ========================================================================== */
/* */
/* Filename.c */
/* (c) 2001 Author */
/* */
/* Description */
/* */
/* ========================================================================== */
... "hlavny dialog"
{
CInternetSession InternetSession("MySMSInternetSession");
CHttpConnection *HttpConn;
CString meno_servra, message;
int ret1, ret2;//, ret3;
UpdateData(true);
m_http_file.Empty();
m_http_file2.Empty();
meno_servra = m_server_name;
HttpConn = InternetSession.GetHttpConnection( meno_servra );
ret1 = WwwLogin(HttpConn);
.
.
.
ret1 = WwwSms(HttpConn);
.
.
.
HttpConn->Close();
InternetSession.Close();
}
int CSendSMSDlg::WwwLogin(CHttpConnection *HttpConn)
{
CHttpFile *HttpFile;
CString strHeaders, strFormData, Temp;
DWORD dwRet;
BOOL Success;
HttpFile = HttpConn->OpenRequest( m_method, m_login_action,
NULL, 1, NULL, NULL, INTERNET_FLAG_EXISTING_CONNECT );
strHeaders = m_strHeaders;
HttpFile->AddRequestHeaders(strHeaders);
strFormData =
m_field_login + "=" + m_login_name + "&" +
m_field_password + "=" + m_login_password;
HttpFile->SendRequest(
strHeaders,(LPVOID)(LPCTSTR)strFormData, strFormData.GetLength());
HttpFile->QueryInfoStatusCode(dwRet);
if (dwRet == HTTP_STATUS_OK)
{
.
.
.
HttpFile->Close();
}
else
{
.
.
.
return(-2);
}
return 1;
}
int CSendSMSDlg::WwwSms(CHttpConnection *HttpConn)
{
CHttpFile *HttpFile;
CString tlf_number, sms_message;
CString strHeaders, strFormData, Temp;
DWORD dwRet;
BOOL Success;
int ret, pom;
HttpFile = HttpConn->OpenRequest( m_method, m_sms_action,
NULL, 1, NULL, NULL, INTERNET_FLAG_EXISTING_CONNECT );
strHeaders = m_strHeaders;
HttpFile->AddRequestHeaders(strHeaders);
tlf_number = TlfNoConvert(m_tlf_number_in);
pom = m_podpis.GetLength() + 1;
ret = m_max_sms_length;
if(m_check_podpis.GetCheck()) ret -= pom;
sms_message = m_sms_message_text.Left(ret);
if(m_check_podpis.GetCheck()) sms_message += " " + m_podpis;
strFormData =
m_field_tlf_no + "=" + tlf_number + "&" +
m_field_sms_text + "=" + sms_message + "\r\n";
HttpFile->SendRequest(
strHeaders,(LPVOID)(LPCTSTR)strFormData, strFormData.GetLength());
HttpFile->QueryInfoStatusCode(dwRet);
if (dwRet == HTTP_STATUS_OK)
{
.
.
. }
else
{
.
.
.
}
HttpFile->Close();
return ret;
}