проблемма с HttpSendRequest

Тема в разделе "WASM.NETWORKS", создана пользователем trust, 18 янв 2008.

  1. trust

    trust New Member

    Публикаций:
    0
    Регистрация:
    18 янв 2008
    Сообщения:
    49
    Добрый вечер всем. Не могу понять в чем дело. Вот код:
    Код (Text):
    1. .386
    2. .model flat,stdcall                    
    3. option casemap:none
    4.  
    5. include \masm32\include\windows.inc
    6. include \masm32\include\user32.inc
    7. include \masm32\include\kernel32.inc
    8. include \masm32\include\gdi32.inc                    
    9. include \masm32\include\wininet.inc
    10. includelib \masm32\lib\user32.lib
    11. includelib \masm32\lib\kernel32.lib
    12. includelib \masm32\lib\gdi32.lib                      
    13. includelib \masm32\lib\wininet.lib
    14.  
    15. .data
    16.     Agent db "Mozilla/4.0 (compatible; MSIE 6.0b; Windows NT 5.0; .NET CLR 1.0.2914)",0            
    17.     ServerName db "www.wasm.ru",0                  
    18.     Method db "GET",0
    19.     ObjectName db "index.php",0
    20.    
    21.     Caption db "Warning!",0
    22.     InternetText db "Error InternetOpen function",0
    23.     ConnectText db "Error InternetConnect function",0        
    24.     OpenRequestText db "Error IHttpOpenRequest function",0  
    25.     SendRequestText db "Error HttpSendRequest function",0
    26.     ReadFileText db "Error InternetReadFile function",0          
    27.     Context db "%lu",0
    28.  
    29. .data?
    30.     hInternet       DWORD ?
    31.         hConnect           DWORD ?
    32.         hRequest            DWORD ?                                  
    33.     hInstance              HINSTANCE ?
    34.     CommandLine          LPSTR ?    
    35.  
    36. .code                            
    37.   Start:      
    38.     invoke GetModuleHandle,NULL
    39.     mov     hInstance,eax
    40.     invoke GetCommandLine
    41.     mov     CommandLine,eax        
    42.  
    43.     invoke InternetOpen, addr Agent, INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0
    44.     mov hInternet, eax
    45.     .IF eax == NULL      
    46.         invoke MessageBox, NULL, addr InternetText, addr Caption, MB_OK
    47.     .ENDIF  
    48.    
    49.     invoke InternetConnect, hInternet, addr ServerName, INTERNET_DEFAULT_HTTP_PORT, NULL, NULL, INTERNET_SERVICE_HTTP, 0, addr Context
    50.     mov hConnect, eax      
    51.     .IF eax == NULL                
    52.         invoke MessageBox, NULL, addr ConnectText, addr Caption, MB_OK
    53.     .ENDIF
    54.    
    55.     invoke HttpOpenRequest, hConnect, addr Method, addr ObjectName, NULL, NULL, 0, INTERNET_FLAG_KEEP_CONNECTION, 1
    56.     mov hRequest, eax    
    57.     .IF eax == NULL      
    58.         invoke MessageBox, NULL, addr OpenRequestText, addr Caption, MB_OK
    59.     .ENDIF                            
    60.                    
    61.     invoke HttpSendRequest, hRequest, NULL, 0, NULL, 0
    62.     .IF eax == TRUE
    63.        
    64.                   .....   ......   ......            
    65.  
    66.     .ELSE
    67.         invoke MessageBox, NULL, addr SendRequestText, addr Caption, MB_OK    
    68.     .ENDIF                              
    69.    
    70.     invoke CloseHandle, hRequest
    71.     invoke CloseHandle, hConnect
    72.     invoke CloseHandle, hInternet
    73.    
    74.     invoke ExitProcess, 0
    75.                    
    76.   end Start
    Вопрос, почему HttpSendRequest возвращает ошибку? Почему она возвращает FALSE? Буду рад услышать ваше мнение. Заранее спасибо.
     
  2. 0x56

    0x56 New Member

    Публикаций:
    0
    Регистрация:
    2 янв 2008
    Сообщения:
    63
    trust
    GetLastError быстрее бы сказала
     
  3. trust

    trust New Member

    Публикаций:
    0
    Регистрация:
    18 янв 2008
    Сообщения:
    49
    Может быть у кого нибудь есть работающий код на асме. Буду очень благодарен;)
     
  4. W4FhLF

    W4FhLF New Member

    Публикаций:
    0
    Регистрация:
    3 дек 2006
    Сообщения:
    1.050
    trust

    У меня HttpSendRequest вернула 1. Код нормально отработал.
     
  5. trust

    trust New Member

    Публикаций:
    0
    Регистрация:
    18 янв 2008
    Сообщения:
    49
    W4FhLF странно. Выложи код.
     
  6. W4FhLF

    W4FhLF New Member

    Публикаций:
    0
    Регистрация:
    3 дек 2006
    Сообщения:
    1.050
    trust

    Я из твоего поста скопировал :)
     
  7. trust

    trust New Member

    Публикаций:
    0
    Регистрация:
    18 янв 2008
    Сообщения:
    49
    W4FhLF прикол;)