Fitty Posted July 11, 2009 Report Posted July 11, 2009 Dedicatie speciala pentru unu_1234567, SQL Master Kabron, pentru daemien, Mihaita 007m si Benjamin Loppa. Sper sa va fie utila.Link download : http://www.sharemobile.ro/download.php?id=364382Sursa [c0ded in VB6, no need for .net]'variabile...Dim i, lenghtu As IntegerDim letter, textu As String'setam un 0x in textboxul in care va aparea hexulPrivate Sub Form_Load()hexbox.Text = "0x"End Sub'blocam anumite caractere pe baza de cod ascii Private Sub textbox_KeyPress(KeyAscii As Integer)If (KeyAscii > 0 And KeyAscii < 8) Or (KeyAscii > 8 And KeyAscii < 32) ThenKeyAscii = 0End IfEnd Sub'impartim stringul char by char, daca acesta s-a modificat, se reia toata treabaPrivate Sub textbox_Change()hexbox.Text = "0x"textu = textbox.Textlenghtu = Len(textu)i = 1For i = 1 To lenghtuletter = Mid$(textu, i, 1)hexbox.Text = LCase(hexbox.Text + Hex(Asc(letter)))NextEnd Sub'asta e pt butonul clear, reseteaza text box-urilePrivate Sub cleatbut_Click()textbox.SetFocustextbox.Text = ""hexbox.Text = "0x"End Sub##### c0ded by Fitty ########## Quote
Vlachs Posted July 11, 2009 Report Posted July 11, 2009 de ce crezi ca e useless, in sqli ai nevoie de hex cateodata, e chiar folositor Quote
ROFL Posted July 11, 2009 Report Posted July 11, 2009 pentru ca:https://addons.mozilla.org/en-US/firefox/addon/3899, ai totul in browser, char() string to hex. Quote
Fitty Posted July 11, 2009 Author Report Posted July 11, 2009 @rofl: da, dar al meu nu are buton de submit => rapid. si nu exista un hex converter marca RST. mai ai ceva de comentat? sunt dispus sa iti raspund Quote
ANdreicj Posted January 3, 2010 Report Posted January 3, 2010 pentru ca:https://addons.mozilla.org/en-US/firefox/addon/3899, ai totul in browser, char() string to hex.Mersi, chiar c?utam demult .. Quote