Пытаюсь перевести с Delphi такую строку:
CryptEncodeObject(encType, X509_NAME, @nameInfo, nil, @encNameLen)
Ничего не получается, в поле encNameLen записывается 0.
Подозреваю, что неправильно определил типы записей RDN или заголовок функции.
Кто-то может поделиться фрагментом исходника, в котором заполняются RDN-структуры и вызывается CryptEncodeObject с параметром X509_NAME ?
ЗЫ:
MSDN:
BOOL WINAPI CryptEncodeObject(
DWORD dwCertEncodingType,
LPCSTR lpszStructType,
const void *pvStructInfo,
BYTE *pbEncoded,
DWORD *pcbEncoded
);
Мое объявление:
Private Declare Function CryptEncodeObject Lib "crypt32.dll" _
(ByVal dwCertEncodingType As Long, ByVal lpszStructType As String, ByRef pvStructInfo As CERT_NAME_INFO, _
ByVal pbEncoded As String, ByRef pcbEncoded As Long) As Long
Ответить
|