كيفية توليد SHA256؟

The token is calculated as follows:
sha256(sha256(Request) + "/" + sha256(merchant + "/" + password)), where:

sha256 – calculation of data hash according to the SHA-256 algorithm and hash conversion to HEX in the uppercase format
Request – list of the "key"="value" pairs sorted by key and separated by the "&" character
merchant – Internet shop ID 
password – value set in the PosSecret parameter

< ما حاولت:

الرجاء المساعدة في التفاصيل حول هذا الأمر وتقديم عينة sha256

الحل 2
الحل 1
الحل 3

الحل 2

فئة SHA256 (النظام.الأمان.التشفير) | مستندات مايكروسوفت[^]

الحل 1

ما عليك سوى استخدام محرك البحث المفضل لديك للبحث عن الكلمات “SHA256 (اللغة التي تختارها)”، واتباع بعض الوثائق والأمثلة العديدة التي ستظهر.

الحل 3

إليك البرنامج النصي الذي تحتاجه:

<% ' IMPORTANT: save this file as UTF-8 BOM !!!

function sha256(ByVal input)
	Dim hAlg,hEnc,BinaryStream,enc
	set hAlg=CreateObject("System.Security.Cryptography.SHA256Managed")
	set hEnc=CreateObject("System.Text.UTF8Encoding")	
	input=hAlg.ComputeHash_2(hEnc.GetBytes_4(input))
	' --------- security check ----------
	if NOT varType(input)=8209 then
        Set BinaryStream=CreateObject("ADODB.Stream")
		with BinaryStream
			.Type=2
			.CharSet="utf-8"
			.Open
			.WriteText input
			.Position=0
			.Type=1
			.Position=0
			input=.Read
		end with	
		set BinaryStream=Nothing
	end if
	' ----------------------------------
	set enc=CreateObject("MSXML2.DomDocument").CreateElement("encode")
	enc.dataType="bin.hex"
	enc.nodeTypedValue=input
	sha256=enc.Text
	set enc=nothing
	set hEnc=nothing
	set hAlg=nothing
end function

%>