J'aime la m'Hash
Public Function Hash(ByVal text As String) As String
a = 1
For i = 1 To Len(text)
a = Sqr(a * i * Asc(Mid(text, i, 1))) 'Numeric Hash
Next i
Rnd (-1)
Randomize a 'seed PRNG
For i = 1 To 10
Hash = Hash & Chr(65 + Int(Rnd * 26))
Next i
End Function
c'est sale hein? mais ça a le mérite de dépanner...
Commentaires
So if you are one of these people who are always upgrading their cell phone and then when it arrives you just put your old one to the side, you probably have a fair few cell phones lying around in cupboards or drawers taking up space and collecting dust. Perhaps you were about to throw some out because they do not work any more? Why not take a browse through one of the many comparison websites on the internet and see how much you can get to sell broken phones. You may be surprised how much you can get for something that you thought was worthless to you.
Definitely believe that which you stated. Your favourite justification appeared to be at the web the simplest thing to have in mind of. I say to you, I certainly get irked whilst folks think about concerns that they plainly do not know about. You managed to hit the nail upon the highest and also defined out the entire thing without having side-effects , folks could take a signal. Will likely be back to get more. Thank you
I loved up to you'll obtain performed proper here. The comic strip is attractive, your authored material stylish. however, you command get bought an nervousness over that you want be handing over the following. in poor health undoubtedly come further formerly once more since precisely the same just about a lot steadily within case you defend this hike.
Hello there very cool web-site! Gentleman. Fantastic. Great. I'll take a note of your website as well as use the bottles in addition? Now i am satisfied to get loads of helpful details with a publish, we end up needing build more techniques this particular respect, thank you for expressing.