Har fått en talsträng "6503065035" som skall omvandlas till ett ascii tal mellan 0 och 65535. Hur få ut detta tal från ovanstående sträng. ??? Dom skriver också något om 30 -39h.

Hej
Spånar lite ser ut som det är två Unsigned Short (vb Integer)
65030 och 65035 , i vilket sammanhang kommer detta upp ??

undrar
Sven

Jag har fått detta som en kryptnyckel från ett företag. Mycket riktigt står det något om unsigned integer (16 bitars tal) ???????????

Naturligtvis är det två ushort. De skall ju omvandlas till tal upp till 65535.
Det du vill ha fram är antagligen två stycken chars per sifferkombination.
Omvandla texten till tal först. (tal=cint(text))
Översta halvan får du genom tal\256 och understa genom tal Mod 256

Dessa två (översta och understa) kan du få fram tecknet för genom chr$(tal\256), t.ex.

/Niklas Jansson

Hej
Vill du visa med en formel.
sifferkombinationen sänds som ett slumptal bestående av 5 asciisiffror <> 0 samt en checksumma. Man skall läsa in de 5 ascii siffrorna och tolka dessa som unsigned integers ( ett tal i intervallet 0-65535 decimalt)
Blir inte riktigt klok på detta.

Din sträng heter s.

<code>
s=Left$(s, 5) 'Tar fram de fem första talen

Dim i As Long
i = CLng(s) 'Omvandlar till tal
</code>

Fungerar inte. Det är alldeles för enkelt. Har säkert något med hex att göra. Dom anger ju attalet består av 5 ascii siffror 30h - 39h samt en checksumma.?????????????

Siffrornas plats i ascii-tabellen är mycket riktigt 30-39 hex, dvs:
0 = 30h
1 = 31h
2 = 32h
..
9 = 39h

Det du har beskrivit hittills verkar dock ganska luddigt. Om du tar och postar all information du har fått om denna nyckel så kanske vi kan hjälpa dig med att förklara hur de har tänkt (om de nu har varit tillräckligt tydliga).

Hej ytterligare förklaring
0 = 30h = 48 Dec som är Ascii för Noll
1 = 31h
2 = 32h
..
9 = 39h = 57 Dec som är Ascii för Nio

/Sven

KAn du inte skicka med en komplett spec på hur nyckeln är formaterad. Eller ett konkret exempel. Med ett värd och dess resultat.

Annars är det i princip omöjligt att hjälpa dig.