Var OkResult:string; Text:string; Begin CipherData:='5792CF289F9A1BBE7083C40F816533D9'; Key:='6A73F1666E73667364746BD235C23332'; OkResult:=string(OD_DecWithKey(pchar(session_id),pchar(Key),pchar(CipherData))); end;
{ char* OkResult; char PlainData[32]; char* CipherData="5792CF289F9A1BBE7083C40F816533D9"; char* Key="6A73F1666E73667364746BD235C23332"; OkResult = OD_DecWithKey(session_id,Key,CipherData); PlainData[0]=NULL; strcat(PlainData,OkResult); }
Dim OkResult As String Dim CipherData As String = "5792CF289F9A1BBE7083C40F816533D9" Dim Key As String = "6A73F1666E73667364746BD235C23332" OkResult = OD_DecWithKey(session_id,Key,CipherData)