Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Conversion to hex?
Message
 
To
11/07/2001 14:05:50
General information
Forum:
Visual FoxPro
Category:
Visual ProMatrix
Miscellaneous
Thread ID:
00529304
Message ID:
00529318
Views:
12
>Is there a way in VFP to convert a string to a hex value?
>like if I get the string "<]" to convert it to "0xC35D"?

FUNCTION str2hex
  LPARAMETERS pcStr

  LOCAL lnCnt, lcHex

  lcHex = ""
  lnCnt = len(pcStr)
  DO WHILE lnCnt > 0
    lcHex = RIGHT(TRANSFORM(ASC(SUBSTR(pcStr, lnCnt, 1)), "@0"), 2) + lcHex
    lnCnt = lnCnt - 1
  ENDDO

  return iif(!empty(lcHex), "0x"+lcHex, "")
ENDFUNC
Not tested, but hope it helps,
- Erik Niese-Petersen

Crazy Dane in USA.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform