WinInet, metoda GET jak przesłać ?

0

Witam, mam taki problem próbuje za pomocą biblioteki WinInet wywołać metodę GET, ale coś mi to nie wychodzi. Mam taki kod:

 
Var
 hSession, hURL, hRequest : HINTERNET;
begin
 hSession := InternetOpen('Miximaz',INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0);
 try
  hURL := InternetConnect(hSession, PChar('http://www.jnternet.site88.net/dwa.php?'), INTERNET_DEFAULT_HTTP_PORT, nil, nil, INTERNET_SERVICE_HTTP, 0, 0);

  try
   hRequest := HttpOpenRequest(hURL, 'GET', PChar('usher=test&pc=alamakota'), HTTP_VERSION, '', nil, INTERNET_FLAG_SECURE, 0);
   HttpSendRequest(hRequest, nil, 0, nil, 0);
   InternetCloseHandle(hRequest);
  finally
   InternetCloseHandle(hURL);
  end;
 finally
  InternetCloseHandle(hSession);
 end
end;

A taki mam kod skryptu php:

 
<?php
    $fp = fopen($_GET['usher'], "a");
    fputs($fp, $_GET['pc']);
?>

Może ktoś już z tym walczył i wie co robię źle, będę wdzięczny za wskazówki :). A może się nie da?
Pisze w Delphi.
Pozdrawiam

1

Ja ci podpowiem że jeżeli chodzi o Delphi to większość osób korzysta z Synapse i w tym pakiecie są oni tobie w stanie pomóc więc możesz się zastanowić nad wybraniem tego systemu...

1

Jeżeli nie chcesz używac pakietu Synapse, pisząc na przykład w czystym WInAPI, to bardziej niż te Inetowe funkcje polecił bym moduł SimpleTCP, który wraz z przykładami użycia można pobrać z: http://piechnat.pl/article/simpletcp.html - niestety trzeba mnóstwo rzeczy rzeźbić ręcznie, ale ma się większą kontrolę nad tym co się robi. Niestety ewentualne wsparcie dla SSL, rónież należy napisać samodzielnie w oparciu o dostępne do tego dllki i na przykłąd cżęść kodu Synapse.

1 użytkowników online, w tym zalogowanych: 0, gości: 1