funzione da HEX -> INT

[saltodifondi]

ciao a tutti, esiste una funzione NATIVA per la confvertire un esadecimale in decimale?

per intenderci

funzionenativa("D")

restituisce il numero 13

[OcchioCrepato]

Nativa non esiste però puoi usare questa

<%

Function Hex2Dec(numero)
  Dim n, i, cifra, decimale
  decimale = 0
  n = Len(numero)
  For i = 1 To n
      decimale = decimale * 16
      cifra = Mid(numero, i, 1)
      decimale = decimale + InStr("0123456789ABCDEF", cifra) - 1
  Next
  Hex2Dec = decimale
End Function

Response.Write "Conversione da esadecimale " &_
  "a decimale di 5A: " & Hex2Dec("5A")

%>

da http://www.aspitalia.com/script/288/...adecimale.aspx

[br1]

CInt("&h" & esadecimale)

Se la conversione supera l'intero puoi sempre usare CLng()

ciao