Jump to content

UrlFrame dönüş değerini alma


mapper

Recommended Posts

Arkadaşlar Merhaba,

 

Mobil ödeme için bir site ile anlaştık. Parametreleri ekleyerek bir url çağrısı yapıyorum.

Dönüş değeri olarak resimde görüldüğü üzere urlframe içerisinde bir çıktı oluşuyor.

Bu dönüş değerlerini memo içerisine veya bir değişkene nasıl alabilirim.

 

Bir türlü çözemedim. Yardımcı olabilecek arkadaşım var mı?

 

Teşekkür ederim.

post-2269-0-91909700-1436742834_thumb.png

Link to comment
Share on other sites

Demo altındaki 

HTTP Post Callback

örneklerini incelemelisin.

 

http://takip.mygps.com.tr/  adresinde ilk ekranda gelen şey urlframe. ben ordaki kullanıcı adı ve girilen şifreyi demoya bakarak aldım.

 

anahtar nokta şurası : 

 

<script>

function do_submit()
{
var ss = undefined;
var frm=document.forms[0];


var submitUrl=location.search.split('submitUrl=')[1];
if (submitUrl) var ss=submitUrl.split('&')[0];
frm.action=(ss ? ss: submitUrl);
frm.submit();
}

});


</script>

 

  • Upvote 1
Link to comment
Share on other sites

  • Administrators

Arkadaşlar Merhaba,

 

Mobil ödeme için bir site ile anlaştık. Parametreleri ekleyerek bir url çağrısı yapıyorum.

Dönüş değeri olarak resimde görüldüğü üzere urlframe içerisinde bir çıktı oluşuyor.

Bu dönüş değerlerini memo içerisine veya bir değişkene nasıl alabilirim.

 

Bir türlü çözemedim. Yardımcı olabilecek arkadaşım var mı?

 

Teşekkür ederim.

 

Anlaşmış olduğunuz sitenin bu tür bir entegrasyon için sağladığı olanaklar nelerdir?

Örneğin sonucu başka bir siteye yönlendirme olanağı var mı?

Link to comment
Share on other sites

Teşekkürler Hayri Bey,

Tavsiyelerinizi inceleyeceğim.

 

Evet Farshad Bey,

 

Forward url adresi vererek yönlendirme alınabiliyor.

Önemli olan UrlFrame içerisinde oluşan veriyi almak.

Link to comment
Share on other sites

  • 1 month later...

Sorun çözülmüştür...

 

 

procedure TForm1.Button1Click(Sender: TObject);
var
http: TIdHttp;
params: TStrings;
Response: string;
begin
http := TIdHTTP.Create(Self);
params := TStringList.Create;
try
params.Add('var1=value1');
params.Add('var1=value2');
Response := http.Post('http://dec.clubdelphi.com/temporales/pruebas-post.php', params);
ShowMessage('Response: ' + Response);
finally
http.Free;
params.Free;
end;
end;

Link to comment
Share on other sites

  • 3 years later...

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
×
×
  • Create New...