Question : HMAC-MD5 (RFC 2104) VB

Je recherche le code d'un certain VB.NET HMAC MD5 (comme défini dans href= " http://tools.ietf.org/html/rfc2104 " de " _blank " de target= de " nofollow " de noindex de rel= de l/rfc2104 de http://tools.ietf.org/htm). le

This est pour de l'intégration avec LinkShare quand un dossier de XML doit être chiffré avec une clef.  L'exemple dans leurs états de documentation :

1. Voici la corde crue de transaction : 2h20 du >

12345
lKW2Xiq9xN0-4.c_9w1X8ZpO94TUl4hg3Dteid>
2007-09-18T0 du nofollow " > http://www.linkshar/>1sactions-ltime-transpaces/rea .0 " de " rel= " de _blank de " target= " de http://www.linkshare.com/namespaces/realtime-transactions-1.0 de " href= " de
time_entered>
USD
2007-09-18T20:passage du 2h00 Zans_date>

productA_sku
3
30000
product A


productB_sku
1
1000
product B




2. du la corde crue de transaction et votre clef (fournies par LinkShare) par une fonction HMAC-MD5 pour obtenir la valeur de MAC : s> de ‚du

v [le ƒ

In de ¼ de õTÅ OEÑ cet exemple, la clef utilisée est xxxxxyyyy.

=============================================================

I peut replier ceci avec le code suivant de PHP :
{


function ($key, $data)/>$b = 64 ; longueur de byte de // pour md5
if (strlen ($key) > $b) {
$key = paquet (« H* », md5 ($key));
}/>$key = str_pad ($key, $b, chr (0x00));
$ipad = str_pad ('', $b, chr (0x36));
$opad = str_pad ('', $b, chr (0x5c));
$k_ipad = de $key ;
$k_opad = de $key ;

return md5 ($k_opad. paquet (« H* », md5 ($k_ipad. $data)));

}/>$md5_raw = hash_hmac (« md5 », « KeyHere », « DataHere », rectifient) ;
echo $md5_raw ; le

=============================================================

All que les exemples de VB je peuvent trouver le rendement une valeur hex, l'exemple de PHP semble produire la binaire crue.  Comment est-ce que ceci peut être fait dans VB ? aide du

Any, VB. Le filet ou le VB6 suffira ! class= de

Réponse : HMAC-MD5 (RFC 2104) VB

Je vous suspecte moyen que vous vouliez convertir votre sortilège-valeur en byte ou byte-rangiez ?

http://www.devx.com/vb2themax/Tip/18808 montre comment convertir l'hexadécimal en nombres entiers. En passant pas plus de deux chars à tout moment, vous pouvez créer byte-rangez facilement.