  | 
	
		
	
	
		Delphi ошибка "connection reset by peer" - Вопросы и ответы, обсуждения - Ваши вопросы по Pascal/Delphi только в данном разделе | 
	 
	 
	
	
	
	
	
	
	
	
	
	
	
		 
	 
 
	
	
		
	
	
    
        
            
             
            24.11.2010, 00:18
            
            
         | 
        
             
            #1
            
         | 
    
 
    
    
  
    | 
    
     | 
     
  
    | 
    
     | 
    
    
     | 
   
  
    
        Разведчик  
     | 
     
 
    
      
  
            
    
      
    
            
                 Регистрация: 24.08.2009  
                
                
                
                 Сообщений: 8
                   
 Популярность: 10  
                  
	 Сказал(а) спасибо: 0  
	
		
			
				Поблагодарили 0 раз(а) в 0 сообщениях
			
		
	 
     
 
             
                
               
                
       
                  
     | 
    
    
    
        
        
            
            
                 
                Delphi ошибка "connection reset by peer"
             
             
            
        
        
        
            
               
    Привет всем. Пишу программу - авторегистратор. Нужно послать GET запрос, но при выполнении программы выдает ошибку "connection reset by peer". Продебажил - переменные все нормальные. Вот неработающий фрагмент. 
	Код: 
	procedure TForm1.ButtonRegClick(Sender: TObject);
var
id,nmail,mail,npas,pas,nrepas,nquest,notvet,otvet,nname,name,nfemely,femely,nday,day,nyear,npol,xregid,ncap:string;
begin
id:=pos(43, 56);//pos- функция парсинга из html кода нужных значений по координатам
nmail:=pos(30, 66);
npas:=pos(34, 79);
nrepas:=pos(45, 81);
nquest:=pos(31, 106);
notvet:=pos(41, 109);
nname:=pos(30, 112);
nfemely:=pos(30, 114);
nday:=pos(28, 117);
nyear:=pos(28, 124);
npol:=pos(17, 127);
xregid:=pos(53, 144);
ncap:=pos(37, 147);
randomize;
mail:='Vasilij'+inttostr(random(1000000)+100000);
pas:=inttostr(random(10000000)+1000000)+'Mr';
otvet:=inttostr(random(100000));
name:='Mr'+inttostr(random(1000000)+100000);
femely:='Ms'+inttostr(random(1000000)+100000);
day:=inttostr(random(30));
memohtml.Lines.Text:=http.Get('http://*****/cgi-bin/reg?ID='+id+'&Count=1&back=%2Fcgi-bin%2Ffolders&browserData=NoJS&'+nmail+'='+mail+'&RegistrationDomain=mail.ru&'+npas+'='+pas+'&'+nrepas+'='+pas+'&Password_Question=%C4%E5%E2%E8%F7%FC%FF+%F4%E0%EC%E8%EB%E8%FF+%EC%E0%F2%E5%F0%E8&'+nquest+'&'+notvet+'='+otvet+'&'+nname+'='+name+'&'+nfemely+'='+femely+'&'+nday+'='+day+'&BirthMonth=2&'+nyear+'=1990&'+npol+'=1&x_reg_id='+xregid+'&security_image_id=&'+ncap+'='+captha.text+'&B1=%D0%E5%E3%E8%F1%F2%F0%E0%F6%E8%FF');
//короче нельзя, пост не катит на этом сайте.
end;
 В http.request все выставлено как словил в сниффере, кроме кодировки.
 
Самое главное, что если сгенерированую ссылку вставить в браузер то все правильно работает. Версия delphi 7. В гугле ничего толкового не нашел. Прошу дельного совета.  
     
         
        
        
        
        
        
        
        
     | 
 
    | 
        
        
        
        
         
     | 
    
    
    
        
        
        
        
             
        
        
        
        
        
        
        
            
        
        
        
     | 
 
 
 
  
	 
	
		 
	 
 
	
	
		
	
	
    
        
            
             
            24.11.2010, 01:56
            
            
         | 
        
             
            #2
            
         | 
    
 
    
    
  
    | 
    
     | 
     
  
    | 
    
     | 
    
    
     | 
   
  
    
        Сержант  
     | 
     
 
    
      
  
            
    
      
    
            
                 Регистрация: 20.07.2010  
                
                
                
                 Сообщений: 138
                   
 Популярность: 26409  
                  
	 Сказал(а) спасибо: 53  
	
		
			
				Поблагодарили 567 раз(а) в 198 сообщениях
			
		
	 
     
 
             
                
               
                
       
                  
     | 
    
    
    
        
        
            
            
                 
                Re: Delphi ошибка "connection reset by peer"
             
             
            
        
        
        
            
               
    Установи нормальный юзер агент и рефферер - остальное оставь пустым. Включи редиректы. Если не поможет подключи куки и сначала делай запрос на страницу входа (регистрации), чтобы забрать куки, а потом уже регай. Если 7 делфи - обнови Indy.
     
         
        
        
        
        
        
        
            
             ________________  
                 Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). 
             
        
        
        
        
     | 
 
    | 
        
        
        
        
         
     | 
    
    
    
        
        
        
        
             
        
        
        
        
        
        
        
            
        
        
        
     | 
 
 
 
  
	 
	
		 
	 
 
	
	
		
	
	
    
        
            
             
            24.11.2010, 02:08
            
            
         | 
        
             
            #3
            
         | 
    
 
    
    
  
    | 
    
     | 
     
  
    | 
    
     | 
    
    
     | 
   
  
    
        Разведчик  
     | 
     
 
    
      
  
            
    
      
    
            
                 Регистрация: 24.08.2009  
                
                
                
                 Сообщений: 8
                   
 Популярность: 10  
                  
	 Сказал(а) спасибо: 0  
	
		
			
				Поблагодарили 0 раз(а) в 0 сообщениях
			
		
	 
     
 
             
                
               
                
       
                  
     | 
    
    
    
        
        
            
            
                 
                Re: Delphi ошибка "connection reset by peer"
             
             
            
        
        
        
        
        
        
        
        
        
        
     | 
 
    | 
        
        
        
        
         
     | 
    
    
    
        
        
        
        
             
        
        
        
        
        
        
        
            
        
        
        
     | 
 
 
 
  
	 
	
		 
	 
 
 
	
		
	
	
	
	
	
		
	
		 
		Ваши права в разделе
	 | 
 
	
		
		Вы не можете создавать новые темы 
		Вы не можете отвечать в темах 
		Вы не можете прикреплять вложения 
		Вы не можете редактировать свои сообщения 
		 
		
		
		
		
		HTML код Выкл. 
		 
		
	  | 
 
 
	 | 
	
		
	 | 
 
 
 
Заявление об ответственности / Список мошенников
Часовой пояс GMT +4, время: 10:55. 
		 
	 
 
 | 
  |