All source code in ASP/ VbScript Ask a ASP/ VbScript Pro Discussion Forum Categories All jobs in ASP/ VbScript
Quick Search for:  in language:    
computing,condensed,representation,message,da
   Code/Articles » |  Newest/Best » |  Community » |  Jobs » |  Other » |  Goto » | 
CategoriesSearch Newest CodeCoding ContestCode of the DayAsk A ProJobsUpload
ASP/ VbScript Stats

 Code: 281,486. lines
 Jobs: 101. postings

 How to support the site

 
Sponsored by:

 
You are in:
 
Login

NEW! LEARNING CENTER
Special educational offers, white papers, webcasts, podcasts

  NEW! Download Rational Performance Tester V8 (download now)
  NEW! Download Rational Functional Tester V8 (download now)
  NEW! Download Rational Service Tester for SOA Quality V8 (download now)
  NEW! Teleconference: Quality In Action - Using Rational Quality Manager with Functional, Performance and Web Service Testing Products (download now)
  NEW! Introducing IBM Rational AppScan Developer Edition – easing security testing by non-security professionals (download now)

 

 


Latest postings for ASP/ VbScript.
Click here to see a screenshot of this code!Mess Officer Management System (Sistem Pengurusan Mess Pegawai)
By Mohd Fauzi on 11/23

(Screen Shot)

Click here to put this ticker on your site!


Add this ticker to your desktop!


Daily Code Email
To join the 'Code of the Day' Mailing List click here!



 
 
   

SHA-1 Hash Algorithm

Print
Email
 
winzip icon
Submitted on: 3/22/2001 12:20:44 PM
By: Lewis E. Moten III  
Level: Intermediate
User Rating: By 5 Users
Compatibility:ASP (Active Server Pages)

Users have accessed this code 14082 times.
 
author picture
(About the author)
 
     for computing a condensed representation of a message or a data file.
 
Can't Copy and Paste this?
Click here for a copy-and-paste friendly version of this code!

    '**************************************
    ' for :SHA-1 Hash Algorithm
    '**************************************
    Ported From Visual Basic Code posted at Planet-Source-Code by Peter Girard http://www.planetsourcecode.com/xq/ASP/txtCodeId.13565/lngWId.1/qx/vb/scripts/ShowCode.htm
winzip iconDownload code

Note: Due to the size or complexity of this submission, the author has submitted it as a .zip file to shorten your download time. Afterdownloading it, you will need a program like Winzip to decompress it.

Virus note:All files are scanned once-a-day by Planet Source Code for viruses,but new viruses come out every day, so no prevention program can catch 100% of them.

FOR YOUR OWN SAFETY, PLEASE:
1)Re-scan downloaded files using your personal virus checker before using it.
2)NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.

If you don't have a virus scanner, you can get one at many places on the net including:McAfee.com

 
Terms of Agreement:   
By using this code, you agree to the following terms...   
1) You may use this code in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.   
2) You MAY NOT redistribute this code (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.   
3) You may link to this code from another website, but ONLY if it is not wrapped in a frame. 
4) You will abide by any additional copyright restrictions which the author may have placed in the code or code's description.


Other 102 submission(s) by this author

 

 
 Report Bad Submission
Use this form to notify us if this entry should be deleted (i.e contains no code, is a virus, etc.).
This submission should be removed because:
 
Your Vote!

What do you think of this code(in the Intermediate category)?
(The code with your highest vote will win this month's coding contest!)
Excellent  Good  Average  Below Average  Poor See Voting Log
 
Other User Comments
8/30/2001 5:47:56 PMjfluckiger@va.rr.com

Thanks for sharing this code. It's what I was looking for -- I don't usually do ASP, and don't have great ASP skills, but was under the gun to do something quickly. The page I developed runs well on my dev machine, but when I run it on another server, I get the error:
VB Script compilation error 800a03ea

pointing to the line:

Set db_ObjSHA1 = New clsSHA1
-----------------^

Some difference in environment, IIS version, other?

Jim Fluckiger
(If this comment was disrespectful, please report it.)

 
4/27/2002 6:13:38 PMProASP

to use this code do so like this : <%@ Language=VBScript %> <%Option Explicit%> <!--#INCLUDE FILE="clsSHA-1.asp"--> <% Dim ObjSHA1 Dim StrDigest Set ObjSHA1 = New clsSHA1 StrDigest = ObjSHA1.SecureHash("Message") Set ObjSHA1 = Nothing response.write StrDigest %>
(If this comment was disrespectful, please report it.)

 
9/10/2002 5:24:50 PMAlex Wied (PcExpert)

How do you decrypt the code?
(If this comment was disrespectful, please report it.)

 
9/21/2002 1:53:27 AMosiris0

You don't.
(If this comment was disrespectful, please report it.)

 
9/23/2002 11:32:11 AMLewis Moten

The closest you can come is to hash your string and see if it matches the hash that the client provides. I.E. Client supplies hash of password. You have/create a hash value of the users password in your database. You compare the two and see if they match.
(If this comment was disrespectful, please report it.)

 
2/8/2003 8:00:02 PMDaniel Keep

In addition to this, I would recommend searching for the "Highly Secure Authentication (Updated)" code in the ASP/VBScript world by searching for "MD5": it implements authen. by hashing a random seed in with the password. Very cool. 5 globes
(If this comment was disrespectful, please report it.)

 
9/9/2006 12:45:33 AMJanet

The SHA-1 code working fine for my english site, until I change my site to utf-8 (unicode). After I set <%@ CodePage=65001 %>, The result is a bit unstable. Sometime it can generate correct SHA-1, sometime it cann't.
(If this comment was disrespectful, please report it.)

 
9/9/2006 8:47:20 AMJanet

I am using IIS v5.1, on a English WinXP.
For english website, it works like a charm. However for UTF-8 site, it shows a bit unstable. It will give a different number for the 1st time u trigger it, and then after refresh, change to another one. I dont know why.

After I use ASPEncrypt component from Persits, the problem solve. So I am sure there is some problem on IIS parsing the code. The error msg regarding CByte occurs once when i tried to use it on utf site :)

Anyway you have done a good job!
(If this comment was disrespectful, please report it.)

 
Add Your Feedback!
Note:Not only will your feedback be posted, but an email will be sent to the code's author from the email account you registered on the site, so you can correspond directly.

NOTICE: The author of this code has been kind enough to share it with you.  If you have a criticism, please state it politely or it will be deleted.

For feedback not related to this particular code, please click here.
 
To post feedback, first please login.


 

Categories | Articles and Tutorials | Advanced Search | Recommended Reading | Upload | Newest Code | Code of the Month | Code of the Day | All Time Hall of Fame | Coding Contest | Search for a job | Post a Job | Ask a Pro Discussion Forum | Live Chat | Feedback | Customize | ASP/ VbScript Home | Site Home | Other Sites | Open Letter from Moderators | About the Site | Feedback | Link to the Site | Awards | Advertising | Privacy

Copyright© 1997-2008 by Exhedra Solutions, Inc. All Rights Reserved.  By using this site you agree to its Terms and Conditions.   Planet Source Code (tm) and the phrase "Dream It. Code It" (tm) are trademarks of Exhedra Solutions, Inc.