| | |
How to create SHA1 Encryption program
Please support our VB.NET advertiser: Intel Parallel Studio Home
![]() |
How do I go about creating a windows application that converts strings to sha1 encrypted? All I want this program to do is have a user type in their password, click a command button "Convert" and have a label come up with the now SHA1 encrypted string. NOTE: THis is just for my own personal use, I will be in no way distributing or selling this program.
Formerly known as Slade.
SHA1 is an algorithm (Secure Hash Algorithm version 1.0) for encrpyting strings.
http://www.w3.org/PICS/DSig/SHA1_1_0.html happy reading dude.
Slade
http://www.w3.org/PICS/DSig/SHA1_1_0.html happy reading dude.

Slade
Formerly known as Slade.
:eek:
Wow, that is some reading.
:o
From a quick glance, I am guessing you will need to use RegEx for managing Regular Expressions.
Not sure I can be much help? :cry: Anyone else? Tekmaven?
Wow, that is some reading.
:o
From a quick glance, I am guessing you will need to use RegEx for managing Regular Expressions.
Not sure I can be much help? :cry: Anyone else? Tekmaven?
Slade - I was just surfing around and found this site on SHA1 Encryption. Hope this helps!
:lol:
SHA1 Encryption Program
:lol:
SHA1 Encryption Program
I can't understand why my code wont work. Check it out.
The encoding part wont work and when I hover over it it says. "Name 'Encoding' is not declared." any ideas? Maybe I'm missing a library reference?
Imports SHA1_Encryption Imports System.Security.Cryptography PublicClass Form1 Inherits System.Windows.Forms.Form (Windows for designer generated code) PublicFunction ComputeHashValue(ByVal data() AsByte) AsByte() Dim hashAlg As SHA1 = SHA1.Create() Dim hashvalue() AsByte = hashAlg.ComputeHash(data) Return hashvalue EndFunction PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim test AsByte() test = ComputeHashValue(Encoding.ASCII.Text(TextBox1.Text)) EndSub EndClass
Formerly known as Slade.
OK I would still like to get the windows encryption working (above) but I have finished a web application one for now:
Imports System.Web.Security PrivateSub btnProcess_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnProcess.Click Dim encpass AsString = FormsAuthentication.HashPasswordForStoringInConfigFile(txtPassword.Text, "sha1") lblResult.Text = encpass.ToString() EndSub
Formerly known as Slade.
![]() |
Other Threads in the VB.NET Forum
- Previous Thread: Project ideas
- Next Thread: interger
| Thread Tools | Search this Thread |
"crystal .net .net2005 30minutes 2005 2008 access account arithmetic array basic binary bing button buttons center check code combobox component connectionstring crystalreport data database databasesearch datagrid datagridview design dissertation dissertations dissertationthesis dosconsolevb.net dropdownlist excel file-dialog firewall folder ftp generatetags google hardcopy image images insert intel internet login math mobile monitor ms navigate net networking opacity output passingparameters peertopeervideostreaming picturebox1 port print problem problemwithinstallation project reports" save savedialog searchbox searchvb.net select serial soap string table tcp text textbox timer toolbox trim update updown user useraccounts usercontrol vb vb.net vb.netcode vb.netformclosing()eventpictureboxmessagebox vb.nettoolboxvisualbasic2008sidebar vb2008 vbnet view visual visualbasic visualbasic.net visualstudio visualstudio2008 web wpf






