#property copyright "Copyright © 2010, sangmane"
#property link      "steven00@fastmail.fm"
#property show_inputs

#define INTERNET_OPEN_TYPE_DIRECT 1
#define INTERNET_FLAG_PRAGMA_NOCACHE 0x100

#import "wininet.dll"

int InternetOpenA(
  string lpszAgent,
  int    dwAccessType,
  string lpszProxyName,
  string lpszProxyBypass,
  int    dwFlags
);

bool InternetCloseHandle(
  int    hInternet
);

int InternetOpenUrlA(
  int    hInternet,
  string lpszUrl,
  string lpszHeaders,
  int    dwHeadersLength,
  int    dwFlags,
  int    dwContext
);

#import

int hInternet=0;

void post_trade(string scriptUrl, int ticket)
  {
    if(!OrderSelect(ticket,SELECT_BY_TICKET))
    {
      Print("Invalid ticket.");
      return;
    }
    hInternet = InternetOpenA("Your Agent",INTERNET_OPEN_TYPE_DIRECT,"","",0);
    if(hInternet>0)
    {
      //form query string
      string sQry = StringConcatenate(
         "?ticket=",OrderTicket(),"&",
         "opentime=",OrderOpenTime(),"&",
         "pair=",OrderSymbol(),"&",
         "position=",OrderType(),"&",
         "lot=",DoubleToStr(OrderLots(),2),"&",
         "openprice=",DoubleToStr(OrderOpenPrice(),Digits),"&",
         "sl=",DoubleToStr(OrderStopLoss(),Digits),"&",
         "tp=",DoubleToStr(OrderTakeProfit(),Digits));
      sQry = scriptUrl+sQry;
      Print(sQry);
      Print("hInternet opened");
      int dwContext[1] = {0};
      string AdditionalHeader = "Connection: close";
      int hUrl = InternetOpenUrlA(hInternet,
                                 sQry,
                                 AdditionalHeader,
                                 StringLen(AdditionalHeader),
                                 INTERNET_FLAG_PRAGMA_NOCACHE,
                                 0
      );
      if(hUrl>0)
      {
        Print("URL opened.");
        InternetCloseHandle(hUrl);
      }
      InternetCloseHandle(hInternet);        
    }
    return(0);
  }
//+------------------------------------------------------------------+