md5演示

		Set c = loader.loadClass("Ext/Md5")
		    wts.responses.SetOutput "md5(""你好"") : "& c.MD5("你好",32) '中文不一致的问题
		Set c = Nothing
		
        

HMACMD5演示

	    Set h = loader.loadClass("Crypt/Hex")
        Set c = loader.loadClass("Crypt/Md5")
			wts.responses.SetOutput h.Bytes2Hex(c.MD5("你好"))
			wts.responses.SetOutput h.Bytes2Hex(c.HMACMD5("你好","123"))
		Set c = Nothing
		Set h = Nothing
		
        

HMACSHA1演示

	    Set h = loader.loadClass("Crypt/Hex")
        Set c = loader.loadClass("Crypt/Sha")
			wts.responses.SetOutput h.Bytes2Hex(c.SHA1("你好"))
			wts.responses.SetOutput h.Bytes2Hex(c.HMACSHA1("你好","123"))
		Set c = Nothing
		Set h = Nothing
		
        

Base64演示

        Set c = loader.loadClass("Crypt/Base64")
			x = c.Bytes2Base64(wts.fso.Str2Bytes("Str,二进制,Base64转换","utf-8"))
			wts.responses.SetOutput wts.fso.Bytes2Str(c.Base642Bytes(x),"utf-8")
		Set c = Nothing
		
        

RSA 演示

		'c# Rsa Key Format : PEM PKCS1 <-> PEM PKCS8 <-> C# xml key
		'privatekey_csharp = "xxx"
		Set r1= loader.loadClass("Crypt/Rsa")
			r1.Privatekey=privatekey_csharp
		   'r1.Publickey=publickey_csharp
			a="Hello WTS"
			b=r1.Encrypt(a)
			c=r1.Decrypt(b)
			d=r1.SignData(a,"SHA1")
			e=r1.VerifyData(a,"SHA1",d)
		Set r1 = Nothing