Solved

How to produce a SHA-1 hash function in vb6 in order to save it to a table

Posted on 2016-11-09
8
24 Views
Last Modified: 2016-11-09
Please help us for a code in vb6 to hash SHA-1 a string before I saving to a table.

Thank you in advance
0
Comment
Question by:rayluvs
  • 5
  • 3
8 Comments
 
LVL 21

Expert Comment

by:JesterToo
ID: 41881496
Perhaps you meant "encrypt" instead of "hash" since hashes are one-way and I'd assume you want to decrypt it sometime.  If so, then here is a link that describes hot to accomplish that.

https://support.microsoft.com/en-us/kb/821762
0
 

Author Comment

by:rayluvs
ID: 41881514
Yes, that's what we need, one-way.  We hash sha1 the result save it to table.

Can this be done in vb6?
0
 
LVL 21

Expert Comment

by:JesterToo
ID: 41881517
Ok, take a look at this link.  It has source code that purports to do what you want.

http://vb.wikia.com/wiki/SHA-1.bas
0
 
LVL 21

Accepted Solution

by:
JesterToo earned 500 total points
ID: 41881525
in the event that code proves to be faulty, search the internet for this phrase...

"vb6 sha1 source code philip ciebiera"
0
6 Surprising Benefits of Threat Intelligence

All sorts of threat intelligence is available on the web. Intelligence you can learn from, and use to anticipate and prepare for future attacks.

 

Author Comment

by:rayluvs
ID: 41881571
Thanx!!! Found a code thet works excellent and we compared it to MS SQL HASHBYTE function is almost the exact!

We say exact because the SQL function always returns "0x" when the vb code doesn't.

For example the has for 'experts-exchange' in

vb6 code is:             9022fc0e1985bb7c0ac60792ee3fbe3029af0424

in SQL is:                 0x9022FC0E1985BB7C0AC60792EE3FBE3029AF0424

                                 notice "0x"

We extract the "0x" from SQL statement result and both SQL & VB results are the same.

Is there a reason for the "0x" and should we be concerned?
0
 
LVL 21

Expert Comment

by:JesterToo
ID: 41881581
yes, that is not actually a part of the hash.  It is there to signify that the remaining characters are hexidecimal. It is safe to just strip it off as you did.
0
 

Author Comment

by:rayluvs
ID: 41881582
Thanx!!! You really helped us!!
0
 
LVL 21

Expert Comment

by:JesterToo
ID: 41881588
You're welcome.
0

Featured Post

How your wiki can always stay up-to-date

Quip doubles as a “living” wiki and a project management tool that evolves with your organization. As you finish projects in Quip, the work remains, easily accessible to all team members, new and old.
- Increase transparency
- Onboard new hires faster
- Access from mobile/offline

Join & Write a Comment

You can of course define an array to hold data that is of a particular type like an array of Strings to hold customer names or an array of Doubles to hold customer sales, but what do you do if you want to coordinate that data? This article describes…
Describes a method of obtaining an object variable to an already running instance of Microsoft Access so that it can be controlled via automation.
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…

705 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

15 Experts available now in Live!

Get 1:1 Help Now