отправить POST через wininet.dll

 

Что я делаю неправильно ? 

#import "wininet.dll"
int InternetAttemptConnect(int x);
int InternetOpenW(string sAgent, int lAccessType,
                  string sProxyName = "", string sProxyBypass = "",
                  int lFlags = 0);
int InternetOpenUrlW(int hInternetSession, string sUrl,
                     string sHeaders = "", int lHeadersLength = 0,
                     int lFlags = 0, int lContext = 0);

int HttpOpenRequestW(int hConnect, string lpszVerb,string lpszObjectName,string lpszVersion,string lpszReferer,string lpszAcceptTypes, bool dwFlags, int dwContext);

//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int InternetReadFile(int hFile, int& sBuffer[], int lNumBytesToRead,
                     int& lNumberOfBytesRead[]);
int InternetCloseHandle(int hInet);
#import
//+------------------------------------------------------------------+
//| script program start function                                    |
//+------------------------------------------------------------------+
int start()
  {
   if(!IsDllsAllowed())
     {
      Alert("Необходимо в настройках разрешить использование DLL");
      return(0);
     }
   int rv = InternetAttemptConnect(0);

   int hInternetSession = InternetOpenW("Microsoft Internet Explorer",
                                        0, "", "", 0);
   if(hInternetSession <= 0)
     {
      Alert("Ошибка при вызове InternetOpenW()");
      return(0);
     }


   int po = HttpOpenRequestW(rv,"POST","test_json.json", NULL, NULL, NULL, 0, 0);
   //Print ("req = ", po);

   int hURL = InternetOpenUrlW(hInternetSession,
                               "https://srforex.itways.top/post_news", "", 0, 0, 0);
   Print ("hURL =  ", hURL );
   if(hURL <= 0)
     {
      Alert("Ошибка при вызове InternetOpenUrlW()");
      InternetCloseHandle(hInternetSession);
      return(0);
     }

   else
      Print("URL GOOD!");


   InternetCloseHandle(hInternetSession);
   return(0);
  }
 

Тоже сижу сейчас разбираюсь с wininet, т.к. webrequest не работает из индикаторов

у меня вылетает на

HttpOpenRequestW
Странно но у вас нет атрибутов для функции
 
Fedor Arkhipov:

Тоже сижу сейчас разбираюсь с wininet, т.к. webrequest не работает из индикаторов

у меня вылетает на

Странно но у вас нет атрибутов для функции

как это нет ?

int po = HttpOpenRequestW(rv,"POST","test_json.json", NULL, NULL, NULL, 0, 0);