В капиком получается и проверить и создать подпись а в кадескоме вылетает ошибка
Function DoSign(content As String, bDetached As Boolean, Signer As Variant) As String
Dim SignedData As Variant

Set SignedData = CreateObject("CAPICOM.SignedData")
SignedData.Content = content
DoSign = SignedData.Sign(Signer, bDetached, CAPICOM_ENCODE_BASE64)

Set SignedData = Nothing
Set Signer = Nothing
End Function
Function DoVerifyCommand(SignedMessage As String,_
content As String, bDetached As Boolean) As Boolean
On Error Resume Next

Dim SignedData As Variant
DoVerifyCommand = True
Set SignedData = CreateObject("CAPICOM.SignedData")
If Err <> 0 Then Err = 0
If True = bDetached Then SignedData.Content = content
Call SignedData.Verify(SignedMessage, bDetached, CAPICOM_VERIFY_SIGNATURE_ONLY)

If Err <> 0 Then
Print "Ошибка при проверке подписи - код", CStr(Err), Error$
MessageBox "Подпись НЕДЕЙСТВИТЕЛЬНА", 0+48, "Проверка подписи"
DoVerifyCommand = False
Else
''''
End If
End Function

Function DoSign(content As String, bDetached As Boolean, Signer As Variant) As String
Dim SignedData As Variant

Set SignedData = CreateObject("CAdESCOM.CadesSignedData")
SignedData.Content = content
DoSign = SignedData.SignCades(Signer, CADESCOM_CADES_BES, bDetached, CAPICOM_ENCODE_BASE64)


Set SignedData = Nothing
Set Signer = Nothing
End Function

Function DoVerifyCommand(SignedMessage As String,_
content As String, bDetached As Boolean) As Boolean
On Error Resume Next

Dim SignedData As Variant
DoVerifyCommand = True
Set SignedData = CreateObject("CAdESCOM.CadesSignedData")
If True = bDetached Then SignedData.Content = content
If Err <> 0 Then Err = 0
Call SignedData.VerifyCades(SignedMessage, CADESCOM_CADES_BES, bDetached)

If Err <> 0 Then
Print "Ошибка при проверке подписи - код", CStr(Err), Error$
MessageBox "Подпись НЕДЕЙСТВИТЕЛЬНА", 0+48, "Проверка подписи"
DoVerifyCommand = False
Else
ShowSignerInfo SignedData, "Подпись верна."
End If
End Function

В принципе Cadescom и не нужен но вся проблема в том что через CAPICOM в IE удается проверить подпись а Cadescom выдает ошибку и я подумал что возможно и подпись должна быть через cadescom. CAPICOM только в ie хотелось чтобы и в остальных браузерах работало

в толстом клиенте выдает следующую ошибку Ошибка при проверке подписи - код213 CAdESCOM.CadesSignedData.1: Криптографическое сообщение или не зашифровано, или имеет неправильный формат.

Отредактировано пользователем 21 июня 2013 г. 16:13:14(UTC)  | Причина: Не указана