اطلاعیه

کاربر گرامی

به انجمن برنامه نویسی AnswerCenter.ir خوش آمدید

 برای استفاده از تمامی امکانات سایت لطفا در انجمن عضو شوید


amir54

چگونگی استفاده از کتابخانه zarinpal

6 ارسال در این موضوع قرار دارد

سلام من چند روز پیش یه کتابخانه می خواستم که دوست عزیز @mohammad-alone برام درست کردن می خواستم بدونم چطوری ازش استفاده کنم چون چندا متغیر داشت نمیدونم چیکارش کنم کلا گیج شدم اگه میشه یه پروژه برام بسازین

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

سلام نمونه سورس و کتابخانه زرین پال 

ZarinPal-B4A-Library-master

برای توضیح بیشتر برای نحوه استفاده از سورس ،مطالب پایین رو نگاه کنید

Sub Globals
	Dim PaymentBtn As Button,MerchantText,AmountText As EditText
End Sub

Sub Activity_Create(FirstTime As Boolean)
	'Add Views To Activity
	MerchantText.Initialize("")
	Activity.AddView(MerchantText,0,0,100%x,100dip)
	''مثلا 123456789012345678901234567890123456
	MerchantText.Hint = "Enter MerchantID کد درگاه پرداخت(مرچنت کد)36 رقمی"
	AmountText.Initialize("")
	Activity.AddView(AmountText,0,100dip,100%x,100dip)
	AmountText.Hint = "Enter Amount  قیمت کالامثلا 1000  "    
	AmountText.InputType = AmountText.INPUT_TYPE_NUMBERS
	PaymentBtn.Initialize("PaymentBtn")
	Activity.AddView(PaymentBtn,30%x,200dip,40%x,100dip)
	PaymentBtn.Text = "Payment    پرداخت با زرین پال"
End Sub

Sub Activity_Resume
	
End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub PaymentBtn_Click
	'Clicked Payment Button
	Dim Payment As Payment
	
	Payment.Initialize _ 'Initialize Payment
		.SetMerchantID(MerchantText.Text) _ 'Set Merchent ID   عدد36 رقمی   کد درگاه پرداخت(مرچنت کد)
		.SetAmount(AmountText.Text) _ 'Set Payment Amount Example : 1000  قیمت کالا
		.SetEmail("ایمیل@yahoo.com") _ 'Set Email Address
		.SetDescription("تست پرداخت کتابخونه B4A") _ 'Show In Payment Page
		.SetMobile("شماره موبایل 091234567890") 'Set Mobile PhoneNumber
		
	'Start Payment
	ZarinPal.Pay(Payment,"Purchase")
End Sub

Sub Purchase_Failure(Error As Object)
	'Payment Failed!
	Dim ErrorMessage As String
	Select Error
		Case ZarinPal.INVALID_PAYMENT
			ErrorMessage = "پرداخت تایید نشد"
		Case ZarinPal.USER_CANCELED
			ErrorMessage = "پرداخت توسط کاربر متوقف شد"
		Case ZarinPal.NOT_ENOUGH_DATA
			ErrorMessage = "اطلاعات پرداخت کافی نیست"
		Case ZarinPal.UNKNOWN
			ErrorMessage = "خطای ناشناخته"
	End Select
	ErrorMessage = "خطا : "&CRLF&ErrorMessage
	ToastMessageShow(ErrorMessage,True)
	Activity.Title = ErrorMessage
End Sub

Sub Purchase_Success(RefID As String)
	'Payment Success
	ToastMessageShow("Payment Success :پرداخت باموفقیت انجام شد)",True)
	Activity.Title = "کد پیگیری : "&RefID
End Sub

 

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

سلام دوستان
چند روزیه که همه نرم افزارام که داخلشون قبلا از کتابخونه زرین پال استفاده کردم اینجوری شدن:

0022.jpg
یعنی موقعی که به صفحه پرداخت زرین پال میرم، بعد از پرداخت، بجای اینکه به برنامه برگردم ، اینجا میاد و برنامه به مشکل میخوره و نمیشه فهمید که کاربر هزینه رو پرداخت کرده یا نه.
این در حالیه که قبلا هیچ ایرادی نداشت.

اگر کسی اطلاعی داره لطف کنه راهنمایی کنه که برای استفاده از زرین پال باید چکار کنیم؟

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
در 17 دقیقه قبل، bayan گفته است :

سلام دوستان
چند روزیه که همه نرم افزارام که داخلشون قبلا از کتابخونه زرین پال استفاده کردم اینجوری شدن:

0022.jpg
یعنی موقعی که به صفحه پرداخت زرین پال میرم، بعد از پرداخت، بجای اینکه به برنامه برگردم ، اینجا میاد و برنامه به مشکل میخوره و نمیشه فهمید که کاربر هزینه رو پرداخت کرده یا نه.
این در حالیه که قبلا هیچ ایرادی نداشت.

اگر کسی اطلاعی داره لطف کنه راهنمایی کنه که برای استفاده از زرین پال باید چکار کنیم؟

دقیقا من هم تست کردم همینجوری  هست یا موقع برگشت از خرید موفق و ناموفق این صفحه میاد

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

سلام

به زرین پال تیکت بزنید

ظاهرا مشکل از خود زرین پال باشه

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

 

نمونه کد استفاده از وب سرويس نوشته شده به زبان PHP

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

مطالب شما نیاز است به تایید مدیران برسد

مهمان
شما به عنوان کاربر مهمان در حال حاضر دیدگاه ارسال می کنید. اگر دارای حساب کاربری در سایت هستید لطفا وارد حساب کاربری خود شوید.
ارسال پاسخ به این موضوع ...

×   شما در حال چسباندن محتوایی با قالب بندی هستید.   حذف قالب بندی

  تنها استفاده از ۷۵ اموجی مجاز می باشد.

×   لینک شما به صورت اتوماتیک جای گذاری شد.   نمایش به عنوان یک لینک به جای

×   محتوای قبلی شما بازگردانی شد.   پاک کردن محتوای ویرایشگر

×   شما مستقیما نمی توانید تصویر خود را قرار دهید. یا آن را اینجا بارگذاری کنید یا از یک URL قرار دهید.