|
I'm having problems trying to hash a password in Visual Basic NET. The result of my code is different that the result of my php page.
My VBNET code is this
Dim md5 As MD5CryptoServiceProvider<br />
Dim bytValue() As Byte<br />
Dim bytHash() As Byte<br />
md5 = New MD5CryptoServiceProvider<br />
bytValue = System.Text.Encoding.UTF8.GetBytes(txtPassword.Text)<br />
bytHash = md5.ComputeHash(bytValue)<br />
md5.Clear()<br />
messagebox.show(Convert.ToBase64String(bytHash))
The result is "bXOF/9d64JOf/waR9/mEFQ=="
In PHP with his simple code
echo md5($password);
shows "6d7385ffd77ae0939fff0691f7f98415"
Maybe anyone can say me why is different? Wich is the good VB code to show the same that in PHP?
Thanks in advance
|
|
|
|
|
Md5 results in a 128-bit number, php's function displays this in hexadecimal this is not the same as using ToBase64String.
I don't know if there is a better way but this seemed to work
<br />
Dim md5 As MD5CryptoServiceProvider<br />
Dim bytValue() As Byte<br />
Dim bytHash() As Byte<br />
Dim sb As StringBuilder = New StringBuilder(32)<br />
Dim i As Integer<br />
md5 = New MD5CryptoServiceProvider<br />
bytValue = System.Text.Encoding.UTF8.GetBytes(txtPassword.Text)<br />
bytHash = md5.ComputeHash(bytValue)<br />
md5.Clear()<br />
For i = 0 To bytHash.Length - 1<br />
sb.Append(bytHash(i).ToString("x"))<br />
Next<br />
MessageBox.Show(sb.ToString())<br />
|
|
|
|
|
Thanks a lot!!
The code not works completely, but it's very close.
Every time you append the text, sb is 2 characters longer. The problem appears when the bythash(i).toString("x") returns 1 character.
VBNET "6d 73 85 ff d7 7a e0 93 9f ff 6 91 f7 f9 84 15"
PHP "6d 73 85 ff d7 7a e0 93 9f ff 06 91 f7 f9 84 15"
How is the clever way to always return 2 characters? How can I format this?
NOTE: My txtpassword.text is "pasa"
|
|
|
|
|
A workaround is this
<br />
For i = 0 To bytHash.Length - 1<br />
str = bytHash(i).ToString("x")<br />
If str.Length = 1 Then<br />
str = "0" & bytHash(i).ToString("x")<br />
End If<br />
sb.Append(str)<br />
Next<br />
But there is a clever way for sure.
Anybody?
|
|
|
|
|
Try using ToString("x2") that should do the same as your workaround.
|
|
|
|
|
Hi,
I need to populate a list with columns of ms access table
can we do a select statment to have name of columns for a specific tables in an access database
Thanks in advance
TG
|
|
|
|
|
just finished creating my web application which saves any input info to an sql server. was just wondering if anyone knew of any software that would convert the database entries to pdf.
|
|
|
|
|
Hi
I have a Textbox and User has to input some numbers in it. Also i have some code in the textbox textchanged event.
Problem is when i start entering the data, it immediately raises the text changed event without allowing me to complete the data input.
That is, if i want to enter 0.18, it raises the Textchanged event after 0 is entered.But i want to raise the event only after finishing the data input(0.18). Is there anyway of achieving this ?
Thanks
|
|
|
|
|
you could search for the "loose focus" event...
otherwise, the textchanged event can work, but you'll have to explain what you really need to do...
TOXCCT >>> GEII power
[toxcct][VisualCalc]
|
|
|
|
|
Hi
Sorry i cudn't get what you said.
All i need to do is when i try to enter some data in the textbox, the textchanged event should not be raised until the data input is completely done.
In the Textchanged event i have a function which calculates a value, say X = A + B, where A is taken from the textbox.
Now as the value is a double i need to enter something like 0.18, but the textchanged event is fired even before i complete the data input so A is 0 instead of 0.18.
I am not sure how the lostfocus() event would help in this situation.
Thanks
|
|
|
|
|
prathiba_naresh wrote:
I am not sure how the lostfocus() event would help in this situation.
you are certain the user ended typing into the text box...
TOXCCT >>> GEII power
[toxcct][VisualCalc]
|
|
|
|
|
Yes, but the problem is thats the last textbox and user won't click on anyother button to raise the lost focus event.
As soon as the user finishes entering the number i need to display the result in another textbox..(In this case the textbox still has focus)
|
|
|
|
|
use Validating Event of textbox
|
|
|
|
|
Solves the problem partially.
Problem is this is the last textbox and user will not remove the focus from this textbox, even the Validating event will fire only if the user clicks anywhere else.
Anyway thanks for your inputs.
|
|
|
|
|
Using the text_changed event is in my opinion no good idea for getting data from user.
As you mentioned, you want the user to ENTER data, so on the last textbox (or even on your form) on the Key_Press event, check for enter key.
So you fill the textboxes and just simply press Enter and everything goes fine.
Hope it helps
|
|
|
|
|
Hi
Thanks for ur help. Will try this.
|
|
|
|
|
Should definatetly use a "Ok", "Submit", "Calculate" button. I can't think of any way for validation to occur unless there is a consistent pattern to the numbers that will be placed in that field. (i.e. between 0.01 and 0.99).
Thanks,
Taen Karth
|
|
|
|
|
Hello!
I want to compress a file for transfer and the decompress later..
How can I do it using vb.net. I have .Net Framework 1.1 installed.
I tried System.IO.Compression namespace but it is for Framework 2.0 therefore cant use it.
Any suggestion...material...
Thanx
_mubashir
|
|
|
|
|
You can use a free library for .NET: SharpZipLib
You can download this library from:
SharpZipLib
And you will need the following code to compress a file:
Public Shared Sub ZipFile(ByVal strFileToZip As String, ByVal EntryName As String, ByVal strZippedFile As String, ByVal nCompressionLevel As Integer, ByVal nBlockSize As Integer)
If (Not System.IO.File.Exists(strFileToZip)) Then
Throw New System.IO.FileNotFoundException("The specified file " + strFileToZip + "could not be found. Zipping aborted.")
End If
Dim strmStreamToZip As System.IO.FileStream
strmStreamToZip = New System.IO.FileStream(strFileToZip, System.IO.FileMode.Open, System.IO.FileAccess.Read)
Dim strmZipFile As System.IO.FileStream
strmZipFile = System.IO.File.Create(strZippedFile)
Dim strmZipStream As ZipOutputStream
strmZipStream = New ZipOutputStream(strmZipFile)
Dim myZipEntry As ZipEntry
myZipEntry = New ZipEntry(EntryName)
strmZipStream.PutNextEntry(myZipEntry)
strmZipStream.SetLevel(nCompressionLevel)
Dim abyBuffer(nBlockSize) As Byte
Dim nSize As System.Int32
nSize = strmStreamToZip.Read(abyBuffer, 0, abyBuffer.Length)
strmZipStream.Write(abyBuffer, 0, nSize)
Try
While (nSize < strmStreamToZip.Length)
Dim nSizeRead As Integer
nSizeRead = strmStreamToZip.Read(abyBuffer, 0, abyBuffer.Length)
strmZipStream.Write(abyBuffer, 0, nSizeRead)
nSize = nSize + nSizeRead
End While
Catch Ex As System.Exception
Throw Ex
End Try
strmZipStream.Finish()
strmZipStream.Close()
strmStreamToZip.Close()
End Sub
A tipical call to this method is:
ZipFile("c:\outputfile.zip", "inputfile.txt", "c:\inputfile.txt", 7, 16348)
Regards,
Vidal Gutierrez.
Vidal Gutiérrez Ch.
|
|
|
|
|
Thanx a lot it works.......
_mubashir
|
|
|
|
|
I have made a program Visual Basic .NET witch uses DirectX 8.1. Now I have rewritten this program for DirectX 9.0c, but one thing is not working anymore, because Microsoft has not included Directshow anymore in DirectX 9.0c.
Now let me explain what the problem is. With my program, I can play movies. I can also capture the movie, but I can't grab a frame anymore. This is the problem I encounter.
I have tried many ways to get Directshow in my Visual Basic .NET. I have downloaded a file, directshowlib.dll, and I tried to install the software Platform SDK from Microsoft. The software Platform SDK will not install at my PC, and with the directshowlib.dll I can't solve the problem.
Can anyone send me some information, about what program I need to install on my PC, and what commando's I need to use to get this software to work?
|
|
|
|
|
Hi,
I am searching in MODI API's to convert raw text to Tiff. But I couldnt find anything to do that. I dont know if i have to use printing interface in VB.net to do the same. Can anyone help me please.
Harish
|
|
|
|
|
Hello Everyone,
I have create activeX control in MFC adding one event to that
control having parameter of type VARIANT. but when we use
that control in VB and run that application, it give error
"variable uses an Automation type not supported in Visual Basic"
how can i solve this problem.
Whats diff. between MFC VARIANT and VB variant datatype.
help me..
Thanks in advance
Regards
Rajesh Kapure
|
|
|
|
|
Hi,
I have a datagrid that is databound. One of the fields is a 'date' field(which comes from database). What I need to do is that if the date is current data , i.e. today's date then I need to display an animated image of 'New' sign next to it and it is anything other than today(which is ofcourse past date  ) then I need to display animated 'Old' sign image.
I have the images saved in the same directory as the application. I have also created a template column for the Image and a Itemdatabound sub but I do not know th exact method or syantax to include an image file in the Itemdatabound Event.
Any help anyone please?
thanks a ton!
Aartee.
...HE is watching Us All!
|
|
|
|
|
Eureka!!! I got it...
Aartee.
...HE is watching Us All!
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
