convert strig to numbers

[gjoisa]

Hi everybody !
Please let me know , how to convert a string having more than 8 charecters to a number containing same number of charecters .:sign0085:

 

[Erel]

Basic4ppc converts strings to numbers automatically.
For example the following code works fine:

Sub App_Start
    a = "123456789"
    Msgbox(a+1)
End Sub

 

[gjoisa]

Sorry ! I haven't meant this one . What i meant is to convert a string having alphabets to numbers .

 

[Erel]

Can you give a small example?

 

[gjoisa]

My purpose is to generate a numeric key from device's owner's name .

 

[taximania]

As in A=1,B=2 etc
B A R R Y
2 1 18 18 25 ??

Sub Globals
   'Declare the global variables here.
End Sub

Sub App_Start
   Form1.Show
   
End Sub


Sub Button1_Click
   c=""
   name=StrToUpper(textbox1.Text)
   For a = 0 To StrLength(name) -1
   b=StrAt(name,a)
   c=c & Asc(b)-64
   Next
   label1.Text=c
End Sub

 

[Cableguy]

Or you can use the ascii value of each alfanumeric chararcter...
This way you dont need to list all values prior to encode them...

In my password textbox, wich unfortunatly I don't have the cs file anymore, I used a very similar to taximania aproach..
declaring the alphabet backwards-....

 

[gjoisa]

Thank you all . That is what exactly I meant .