BorlandTalk.com Forum Index BorlandTalk.com
Borland discussion newsgroups
 
Archives   FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Post With htppcli

 
Post new topic   Reply to topic    BorlandTalk.com Forum Index -> Delphi Internet Winsock
View previous topic :: View next topic  
Author Message
Guest






PostPosted: Sun Sep 11, 2005 3:43 pm    Post subject: Post With htppcli Reply with quote



Hi
I use Indy 10 with D7
I am trying to connect to a server but can't.

The trace of the explorer's post is this


POST /webp/login.aspx HTTP/1.1
Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg,
application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword,
application/x-shockwave-flash, */*
Referer: https://adressof server.com/webp/login.aspx
Accept-Language: en
Content-Type: application/x-www-form-urlencoded
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR
1.1.4322)
Host: addressofserver.com
Content-Length: 1403
Connection: Keep-Alive
Cache-Control: no-cache
Cookie: ASP.NET_SessionId=d2nyy3audr5rqsulm0zwnsis

__VIEWSTATE=dDwtMTY5OTA4NzY1Njt0PDtsPGk8MT47aTwzPjs%2BO2w8dDw7bDxpPDU%2BOz47bDx0PHA8cDxsPFRleHQ7PjtsP
FxlOz4%2BOz47Oz47Pj47dDxwPGw8aW5uZXJodG1sOz47bDxcPHRhYmxlIGNlbGxzcGFjaW5nPSIwIiBjZWxscGFkZGluZz0iMCIg
Ym9yZGVyPSIwIiBiZ2NvbG9yPSIjRTFGNEZFIiB3aWR0aD0iMjI4Ilw%2BXDx0clw%2BXDx0ZCBzdHlsZT0icGFkZGluZzoxMXB4I
DEwcHggMCAxMHB4XDsiXD5cPGRpdiBzdHlsZT0icGFkZGluZzoxMHB4IDEwcHggMTBweCAxNXB4XDtiYWNrZ3JvdW5kLWNvbG9yOn
doaXRlXDtib3JkZXItYm90dG9tOjFweCBzb2xpZCAjQ0VFN0Y4XDtib3JkZXItcmlnaHQ6MXB4IHNvbGlkICNDRUU3RjhcO2ZvbnQ
td2VpZ2h0OmJvbGRcO1w7Y29sb3I6IzQ2ODdDOVw7Zm9udC1zaXplOjE5cHhcO2xpbmUtaGVpZ2h0OjMwcHhcOyJcPsSwbnRlcm5l
dCDFnnViZW1peiAnaGFmaWZsZWRpJy4uLlw8L2Rpdlw%2BXDwvdGRcPlw8L3RyXD5cPHRyXD5cPHRkIHN0eWxlPSJwYWRkaW5nOiA
xMHB4IDEwcHggMTBweCAxMHB4XDtjb2xvcjojMjc1NTgzXDtib3JkZXI6MTBweCBzb2xpZCAjRTFGNEZFXDtmb250OjExcHggVmVy
ZGFuYSwgVGFob21hLCBBcmlhbCwgc2Fucy1zZXJpZlw7bGluZS1oZWlnaHQ6MTRweFw7IiBiZ2NvbG9yPSIjRUZGOUZFIlw%2BxLB
udGVybmV0IMWedWJlbWl6aW4gZGFoYSBkYSBoxLF6bMSxIMOnYWzEscWfbWFzxLEgacOnaW4geWVuaSBkw7x6ZW5sZW1lbGVyIHlh
cHTEsWsuIFlhbmkgxZ91YmVtaXppICdcPHN0cm9uZ1w%2BaGFmaWZcPC9zdHJvbmdcPidsZXR0aWsuXDxiclw%2BXDxiclw%2BU29
ydWxhcsSxbsSxeiB2ZSBnw7Zyw7zFn2xlcmluaXogacOnaW4gXDxiXD40NDQgMCAxNDRcPC9iXD4gRMSxxZ9iYW5rIFRlbGVmb24g
QmFua2FjxLFsxLHEn8SxJ27EsSBhcmF5YWJpbGlyc2luaXouXDwvdGRcPlw8L3RyXD5cPC90YWJsZVw%2BOz4%2BOzs%2BOz4%2BO
z7Veei8APRfUd5KwrPnD7KnU%2BGLpw%3D%3D
p_username=myuser
p_password=mypass
btnLogin=Continue

And I post like this


form1.LClient.Request.Accept := 'image/gif, image/x-xbitmap,
image/jpeg, image/pjpeg, application/vnd.ms-excel,
application/vnd.ms-powerpoint, application/msword,
application/x-shockwave-flash, */*' ;
form1.LClient.Request.Referer :=
'https://isube.disbank.com.tr/webp/login.aspx' ;
form1.LClient.Request.AcceptLanguage := 'tr' ;
form1.LClient.Request.ContentType :=
'application/x-www-form-urlencoded' ;
form1.LClient.Request.AcceptEncoding := 'gzip, deflate' ;
form1.LClient.Request.UserAgent := 'Mozilla/4.0 (compatible; MSIE
6.0;Windows NT 5.1; SV1; .NET CLR 1.1.4322)';
form1.LClient.Request.Host := 'isube.disbank.com.tr' ;
form1.LClient.Request.ContentLength := 1403 ;
form1.LClient.Request.Connection := 'Keep-Alive' ;
form1.LClient.Request.CacheControl := 'no-cache' ;

PList := TStringList.Create ;

PList.Add('__VIEWSTATE=dDwtMTY5OTA4NzY1Njt0PDtsPGk8MT47aTwzPjs%2BO2w8dDw7bDxpPDU%2BOz47bDx0PHA8cDxsPFRleHQ7PjtsP
PList.Add('FxlOz4%2BOz47Oz47Pj47dDxwPGw8aW5uZXJodG1sOz47bDxcPHRhYmxlIGNlbGxzcGFjaW5nPSIwIiBjZWxscGFkZGluZz0iMCIg
PList.Add('Ym9yZGVyPSIwIiBiZ2NvbG9yPSIjRTFGNEZFIiB3aWR0aD0iMjI4Ilw%2BXDx0clw%2BXDx0ZCBzdHlsZT0icGFkZGluZzoxMXB4I
PList.Add('DEwcHggMCAxMHB4XDsiXD5cPGRpdiBzdHlsZT0icGFkZGluZzoxMHB4IDEwcHggMTBweCAxNXB4XDtiYWNrZ3JvdW5kLWNvbG9yOn
PList.Add('doaXRlXDtib3JkZXItYm90dG9tOjFweCBzb2xpZCAjQ0VFN0Y4XDtib3JkZXItcmlnaHQ6MXB4IHNvbGlkICNDRUU3RjhcO2ZvbnQ
PList.Add('td2VpZ2h0OmJvbGRcO1w7Y29sb3I6IzQ2ODdDOVw7Zm9udC1zaXplOjE5cHhcO2xpbmUtaGVpZ2h0OjMwcHhcOyJcPsSwbnRlcm5l
PList.Add('dCDFnnViZW1peiAnaGFmaWZsZWRpJy4uLlw8L2Rpdlw%2BXDwvdGRcPlw8L3RyXD5cPHRyXD5cPHRkIHN0eWxlPSJwYWRkaW5nOiA
PList.Add('xMHB4IDEwcHggMTBweCAxMHB4XDtjb2xvcjojMjc1NTgzXDtib3JkZXI6MTBweCBzb2xpZCAjRTFGNEZFXDtmb250OjExcHggVmVy
PList.Add('ZGFuYSwgVGFob21hLCBBcmlhbCwgc2Fucy1zZXJpZlw7bGluZS1oZWlnaHQ6MTRweFw7IiBiZ2NvbG9yPSIjRUZGOUZFIlw%2BxLB
PList.Ad('udGVybmV0IMWedWJlbWl6aW4gZGFoYSBkYSBoxLF6bMSxIMOnYWzEscWfbWFzxLEgacOnaW4geWVuaSBkw7x6ZW5sZW1lbGVyIHlh
PList.Add('cHTEsWsuIFlhbmkgxZ91YmVtaXppICdcPHN0cm9uZ1w%2BaGFmaWZcPC9zdHJvbmdcPidsZXR0aWsuXDxiclw%2BXDxiclw%2BU29
PList.Add('ydWxhcsSxbsSxeiB2ZSBnw7Zyw7zFn2xlcmluaXogacOnaW4gXDxiXD40NDQgMCAxNDRcPC9iXD4gRMSxxZ9iYW5rIFRlbGVmb24g
PList.Add('QmFua2FjxLFsxLHEn8SxJ27EsSBhcmF5YWJpbGlyc2luaXouXDwvdGRcPlw8L3RyXD5cPC90YWJsZVw%2BOz4%2BOzs%2BOz4%2BO
PList.Add('z7Veei8APRfUd5KwrPnD7KnU%2BGLpw%3D%3D
PList.Add('p_username=myuser') ;
PList.Add('p_password=mypass') ;
PList.Add('btnLogin=Continue') ;

Form1.Memo1.Text := form1.LClient.Post
('https://addresofserver.com/webp/login.aspx', Plist) ;


but cant login

any idea


Back to top
Guest






PostPosted: Mon Sep 12, 2005 4:47 pm    Post subject: Re: Post With htppcli Reply with quote



Ok

I Made it like this

PList.Add('__VIEWSTATE=dDwtMTY5OTA4NzY1Njt0PDtsPGk8MT47aTwzPjs...' +
'2BO2w8dDw7bDxpPDU%2BOz47bDx0PHA8cDxsPFRleHQ7PjtsP...' +
'ydWxhcsSxbsSxeiB2ZSBnw7Zyw7zFn2xlcmluaXogacOnaW4gXDxiXD40NDQ...') ;
PList.Add('p_username=myuser') ;
PList.Add('p_password=mypass') ;
PList.Add('btnLogin=Continue') ;




<fer>, haber iletisinde şunları yazdı:4324504d (AT) newsgroups (DOT) borland.com...
Quote:
Hi
I use Indy 10 with D7
I am trying to connect to a server but can't.

The trace of the explorer's post is this


POST /webp/login.aspx HTTP/1.1
Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg,
application/vnd.ms-excel, application/vnd.ms-powerpoint,
application/msword, application/x-shockwave-flash, */*
Referer: https://adressof server.com/webp/login.aspx
Accept-Language: en
Content-Type: application/x-www-form-urlencoded
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET
CLR 1.1.4322)
Host: addressofserver.com
Content-Length: 1403
Connection: Keep-Alive
Cache-Control: no-cache
Cookie: ASP.NET_SessionId=d2nyy3audr5rqsulm0zwnsis

__VIEWSTATE=dDwtMTY5OTA4NzY1Njt0PDtsPGk8MT47aTwzPjs%2BO2w8dDw7bDxpPDU%2BOz47bDx0PHA8cDxsPFRleHQ7PjtsP
FxlOz4%2BOz47Oz47Pj47dDxwPGw8aW5uZXJodG1sOz47bDxcPHRhYmxlIGNlbGxzcGFjaW5nPSIwIiBjZWxscGFkZGluZz0iMCIg
Ym9yZGVyPSIwIiBiZ2NvbG9yPSIjRTFGNEZFIiB3aWR0aD0iMjI4Ilw%2BXDx0clw%2BXDx0ZCBzdHlsZT0icGFkZGluZzoxMXB4I
DEwcHggMCAxMHB4XDsiXD5cPGRpdiBzdHlsZT0icGFkZGluZzoxMHB4IDEwcHggMTBweCAxNXB4XDtiYWNrZ3JvdW5kLWNvbG9yOn
doaXRlXDtib3JkZXItYm90dG9tOjFweCBzb2xpZCAjQ0VFN0Y4XDtib3JkZXItcmlnaHQ6MXB4IHNvbGlkICNDRUU3RjhcO2ZvbnQ
td2VpZ2h0OmJvbGRcO1w7Y29sb3I6IzQ2ODdDOVw7Zm9udC1zaXplOjE5cHhcO2xpbmUtaGVpZ2h0OjMwcHhcOyJcPsSwbnRlcm5l
dCDFnnViZW1peiAnaGFmaWZsZWRpJy4uLlw8L2Rpdlw%2BXDwvdGRcPlw8L3RyXD5cPHRyXD5cPHRkIHN0eWxlPSJwYWRkaW5nOiA
xMHB4IDEwcHggMTBweCAxMHB4XDtjb2xvcjojMjc1NTgzXDtib3JkZXI6MTBweCBzb2xpZCAjRTFGNEZFXDtmb250OjExcHggVmVy
ZGFuYSwgVGFob21hLCBBcmlhbCwgc2Fucy1zZXJpZlw7bGluZS1oZWlnaHQ6MTRweFw7IiBiZ2NvbG9yPSIjRUZGOUZFIlw%2BxLB
udGVybmV0IMWedWJlbWl6aW4gZGFoYSBkYSBoxLF6bMSxIMOnYWzEscWfbWFzxLEgacOnaW4geWVuaSBkw7x6ZW5sZW1lbGVyIHlh
cHTEsWsuIFlhbmkgxZ91YmVtaXppICdcPHN0cm9uZ1w%2BaGFmaWZcPC9zdHJvbmdcPidsZXR0aWsuXDxiclw%2BXDxiclw%2BU29
ydWxhcsSxbsSxeiB2ZSBnw7Zyw7zFn2xlcmluaXogacOnaW4gXDxiXD40NDQgMCAxNDRcPC9iXD4gRMSxxZ9iYW5rIFRlbGVmb24g
QmFua2FjxLFsxLHEn8SxJ27EsSBhcmF5YWJpbGlyc2luaXouXDwvdGRcPlw8L3RyXD5cPC90YWJsZVw%2BOz4%2BOzs%2BOz4%2BO
z7Veei8APRfUd5KwrPnD7KnU%2BGLpw%3D%3D
p_username=myuser
p_password=mypass
btnLogin=Continue

And I post like this


form1.LClient.Request.Accept := 'image/gif, image/x-xbitmap,
image/jpeg, image/pjpeg, application/vnd.ms-excel,
application/vnd.ms-powerpoint, application/msword,
application/x-shockwave-flash, */*' ;
form1.LClient.Request.Referer :=
'https://isube.disbank.com.tr/webp/login.aspx' ;
form1.LClient.Request.AcceptLanguage := 'tr' ;
form1.LClient.Request.ContentType :=
'application/x-www-form-urlencoded' ;
form1.LClient.Request.AcceptEncoding := 'gzip, deflate' ;
form1.LClient.Request.UserAgent := 'Mozilla/4.0 (compatible; MSIE
6.0;Windows NT 5.1; SV1; .NET CLR 1.1.4322)';
form1.LClient.Request.Host := 'isube.disbank.com.tr' ;
form1.LClient.Request.ContentLength := 1403 ;
form1.LClient.Request.Connection := 'Keep-Alive' ;
form1.LClient.Request.CacheControl := 'no-cache' ;

PList := TStringList.Create ;


PList.Add('__VIEWSTATE=dDwtMTY5OTA4NzY1Njt0PDtsPGk8MT47aTwzPjs%2BO2w8dDw7bDxpPDU%2BOz47bDx0PHA8cDxsPFRleHQ7PjtsP

PList.Add('FxlOz4%2BOz47Oz47Pj47dDxwPGw8aW5uZXJodG1sOz47bDxcPHRhYmxlIGNlbGxzcGFjaW5nPSIwIiBjZWxscGFkZGluZz0iMCIg

PList.Add('Ym9yZGVyPSIwIiBiZ2NvbG9yPSIjRTFGNEZFIiB3aWR0aD0iMjI4Ilw%2BXDx0clw%2BXDx0ZCBzdHlsZT0icGFkZGluZzoxMXB4I

PList.Add('DEwcHggMCAxMHB4XDsiXD5cPGRpdiBzdHlsZT0icGFkZGluZzoxMHB4IDEwcHggMTBweCAxNXB4XDtiYWNrZ3JvdW5kLWNvbG9yOn

PList.Add('doaXRlXDtib3JkZXItYm90dG9tOjFweCBzb2xpZCAjQ0VFN0Y4XDtib3JkZXItcmlnaHQ6MXB4IHNvbGlkICNDRUU3RjhcO2ZvbnQ

PList.Add('td2VpZ2h0OmJvbGRcO1w7Y29sb3I6IzQ2ODdDOVw7Zm9udC1zaXplOjE5cHhcO2xpbmUtaGVpZ2h0OjMwcHhcOyJcPsSwbnRlcm5l

PList.Add('dCDFnnViZW1peiAnaGFmaWZsZWRpJy4uLlw8L2Rpdlw%2BXDwvdGRcPlw8L3RyXD5cPHRyXD5cPHRkIHN0eWxlPSJwYWRkaW5nOiA

PList.Add('xMHB4IDEwcHggMTBweCAxMHB4XDtjb2xvcjojMjc1NTgzXDtib3JkZXI6MTBweCBzb2xpZCAjRTFGNEZFXDtmb250OjExcHggVmVy

PList.Add('ZGFuYSwgVGFob21hLCBBcmlhbCwgc2Fucy1zZXJpZlw7bGluZS1oZWlnaHQ6MTRweFw7IiBiZ2NvbG9yPSIjRUZGOUZFIlw%2BxLB

PList.Ad('udGVybmV0IMWedWJlbWl6aW4gZGFoYSBkYSBoxLF6bMSxIMOnYWzEscWfbWFzxLEgacOnaW4geWVuaSBkw7x6ZW5sZW1lbGVyIHlh

PList.Add('cHTEsWsuIFlhbmkgxZ91YmVtaXppICdcPHN0cm9uZ1w%2BaGFmaWZcPC9zdHJvbmdcPidsZXR0aWsuXDxiclw%2BXDxiclw%2BU29

PList.Add('ydWxhcsSxbsSxeiB2ZSBnw7Zyw7zFn2xlcmluaXogacOnaW4gXDxiXD40NDQgMCAxNDRcPC9iXD4gRMSxxZ9iYW5rIFRlbGVmb24g

PList.Add('QmFua2FjxLFsxLHEn8SxJ27EsSBhcmF5YWJpbGlyc2luaXouXDwvdGRcPlw8L3RyXD5cPC90YWJsZVw%2BOz4%2BOzs%2BOz4%2BO
PList.Add('z7Veei8APRfUd5KwrPnD7KnU%2BGLpw%3D%3D
PList.Add('p_username=myuser') ;
PList.Add('p_password=mypass') ;
PList.Add('btnLogin=Continue') ;

Form1.Memo1.Text := form1.LClient.Post
('https://addresofserver.com/webp/login.aspx', Plist) ;


but cant login

any idea




Back to top
Remy Lebeau (TeamB)
Guest





PostPosted: Mon Sep 12, 2005 6:24 pm    Post subject: Re: Post With htppcli Reply with quote




<fer> wrote


Quote:
I am trying to connect to a server but can't.
snip
but cant login

Just saying it does not work says nothing at all about the actual problem
you are having. You need to always provide specific details.

For one thing, you are posting to the wrong URL. You are posting to
'https://addresofserver.com/webp/login.aspx' when you should be posting to
'https://isube.disbank.com.tr/webp/login.aspx' instead.

More importantly, you are posting to an HTTPS server. You did not specify
whether you have hooked up a TIdSSLIOHandlerSocketOpenSSL to the TIdHTTP's
IOHandler property or not. That is required in order to make HTTPS URLs
operate.


Gambit



Back to top
Display posts from previous:   
Post new topic   Reply to topic    BorlandTalk.com Forum Index -> Delphi Internet Winsock All times are GMT
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © 2001, 2006 phpBB Group
SEO toolkit © 2004-2006 webmedic.