485
edits
m (Client) |
(Keeping backwards compatibility for DF19.x on de demo code) |
||
(2 intermediate revisions by 2 users not shown) | |||
Line 107: | Line 107: | ||
Move (Value(oCreds) + ":" + Value(oPassword)) to sToken | Move (Value(oCreds) + ":" + Value(oPassword)) to sToken | ||
Move (Base64Encode(AddressOf(sToken), Length(sToken))) to pCreds | Move (Base64Encode(AddressOf(sToken), Length(sToken))) to pCreds | ||
Move pCreds to sToken | #IF (!@ < 200) | ||
Move pCreds to sToken | |||
#ELSE | |||
Move (PointerToString(pCreds)) to sToken | |||
#ENDIF | |||
Move (Free(pCreds)) to bOK | Move (Free(pCreds)) to bOK | ||
Get AddHeader of oHttp "Authorization" ("Basic" * sToken) to bOK | Get AddHeader of oHttp "Authorization" ("Basic" * sToken) to bOK | ||
Line 428: | Line 432: | ||
==See also== | ==See also== | ||
*[[REST]] | |||
*[[RESTful Service Theory]] | *[[RESTful Service Theory]] | ||
*[[Creating RESTful Services in DataFlex]] | *[[Creating RESTful Services in DataFlex]] |