پرداخت الکترونیکی (شتاب)

[MMSHFE]

دوست عزیز، این سایت مکان تبلیغ نیست. از بخش آگهی های سایت استفاده کنید. درغیر اینصورت مطابق قوانین برخورد خواهد شد.

[bigz1000]

شما پس از بستن قرارداد بانک سامان یک MerchantID در اخیار شما میزاره .

برای ارسال کاربر برای خرید اول باید پارامترها را به صورت post به آدرس https://acquirer.sb24.com/CardServices/controller ارسال کنید .

مثال :

<form action="https://acquirer.sb24.com/CardServices/controller"  method="post">





<input name="Amount" type="hidden" value="100" />  مبلغ به ریال



<input name="ResNum" type="hidden" value="30" /> شماره سفارش که شما باید ارسال کنید



<input name="MID" type="hidden" value="111111-11111" /> آی دی که سامان داده



<input name="RedirectURL" type="hidden" value="http://site.com/callback.aspx" /> آدرس برگشتی پس از خرید











<input name="Button1" type="submit" value="button" />







</form>

در صفحه Callback هم از کد زیر استفاده کنید :

    Dim RefNum As String = HttpContext.Current.Request.Params("RefNum")

    Dim ResNum As String = HttpContext.Current.Request.Params("ResNum")

    Dim State As String = HttpContext.Current.Request.Params("State")



 If  Not (RefNum Is Nothing) Then



                ' saman code





                If State = "OK" Then



                    If RefNum = "" Then



                        lbl.Text = "گویا خرید شما توسط بانک تایید شده است اما رسید دیجیتالی شما تایید نگشت"



                    Else





                        Dim PaymentWebService As New SamanWebService.ReferencePayment

                        Dim Result As Double = PaymentWebService.verifyTransaction(RefNum, "1111-11111")





                        If Result > 0 Then











                            G.PayPaidSaman(ResNum, RefNum)







                            lbl.Text = "خرید با موفقیت انجام شد"









                        Else



                            lbl.Text = "مشکلی در تایید خرید شما وجود دارد . کد خطا : " & Result





                        End If







                    End If





                Else



                    lbl.Text = "متاسفانه بانک خرید شما را تایید نکرده است :  " + State

           End If

اگر مشکلی بود هستم در خدمتتون

سلام. ممنون از توضیحات. به همین روش این کار رو پیاده سازی کردیم.ولی متاسفانه از بعد از پرداخت از بانک و برگشت به صفحه ای که در callback معرفی کردیم اون مقادیر که باید در کوئری استرینگ به عنوان RefNum و ResNum باشه رو بانک بر نمی گردونه.عملا فقط اون url مربوط به callback رو صدا می زنه. در حالی که پول از حساب کم می شه (و البته بعد از چند دقیقه چون وریفای نمی شه برمی گرده به حساب).
مشکل از چیه؟!