Fitty Posted July 11, 2009 Report Share 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 Link to comment Share on other sites More sharing options...
ROFL Posted July 11, 2009 Report Share Posted July 11, 2009 ...useless Quote Link to comment Share on other sites More sharing options...
Vlachs Posted July 11, 2009 Report Share Posted July 11, 2009 de ce crezi ca e useless, in sqli ai nevoie de hex cateodata, e chiar folositor Quote Link to comment Share on other sites More sharing options...
ROFL Posted July 11, 2009 Report Share Posted July 11, 2009 pentru ca:https://addons.mozilla.org/en-US/firefox/addon/3899, ai totul in browser, char() string to hex. Quote Link to comment Share on other sites More sharing options...
Fitty Posted July 11, 2009 Author Report Share 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 Link to comment Share on other sites More sharing options...
ROFL Posted July 11, 2009 Report Share Posted July 11, 2009 nimic maestre Quote Link to comment Share on other sites More sharing options...
ANdreicj Posted January 3, 2010 Report Share 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 Link to comment Share on other sites More sharing options...
Psycho Bunny Posted January 3, 2010 Report Share Posted January 3, 2010 @Fitty: dae sayz thanks Quote Link to comment Share on other sites More sharing options...