Thema Datum  Von Nutzer Rating
Antwort
Rot RSA Signierung mit VBA über die RSACryptoServiceProvider-Klasse
 19.07.2018 14:19:09 Nemo
NotSolved
20.07.2018 00:10:54 Gast24201
NotSolved
20.07.2018 10:03:26 Nemo
NotSolved
21.07.2018 15:49:36 Gast24201
NotSolved
21.07.2018 16:58:53 Nemo
NotSolved
20.07.2018 10:21:46 Gast50217
NotSolved
21.07.2018 16:40:52 Gast24486
NotSolved
21.07.2018 22:18:36 Gast81489
NotSolved

Ansicht des Beitrags:
Von:
Nemo		 Datum:
19.07.2018 14:19:09		 Views:
2928		 Rating:
     
Antwort:
  Ja
Thema:
RSA Signierung mit VBA über die RSACryptoServiceProvider-Klasse

Hallo zusammen,
ich komme bei der Umsetzung von einer RSA-Signierung über den "RSACryptoServiceProvider" in Excel VBA leider nicht weiter.

Orientiert habe ich mich bei der Umsetzung an diesem Beispiel aus .NET
https://msdn.microsoft.com/de-de/lib...v=vs.110).aspx

Der nachfolgende Code stoppt bei der Signierung mit "Ungültiger Prozessaufruf..."

Ich hoffe mir kann bei dem genannten Problem jemand weiterhelfen!

 

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
Sub Sign()
 
    Set csp = CreateObject("System.Security.Cryptography.RSACryptoServiceProvider")
 
    ' Erzeugen der RSA Schlüssel
    privKey = csp.ExportParameters(True)
    pubKey = csp.ExportParameters(False)
 
    ' Erzeuge Teststring für Signierung
    Dim dataString As String
    dataString = "Data"
 
    ' Konvertierung des Strings in Byte
    Dim dataByte() As Byte
    dataByte = StrConv(dataString, vbFromUnicode)
 
         
    ' Erzeuge Hash der Daten mit SHA1CryptoServiceProvider und Signiere
    Set RSAalg = CreateObject("System.Security.Cryptography.RSACryptoServiceProvider")
    Set SHA = CreateObject("System.Security.Cryptography.SHA1CryptoServiceProvider")
 
    ' Lade erzeugten PublicKey
    RSAalg.ImportParameters (pubKey)
 
    ' Erzeuge signed Data
    Dim signedData() As Byte
    signedData = RSAalg.SignData(dataByte(), SHA)
 
End Sub

 

Vielen Dank schon jetzt für die Hilfe!!   :)

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:
WYSIWYG-Editor, ctl00_Content_editor1



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot RSA Signierung mit VBA über die RSACryptoServiceProvider-Klasse
 19.07.2018 14:19:09 Nemo
NotSolved
20.07.2018 00:10:54 Gast24201
NotSolved
20.07.2018 10:03:26 Nemo
NotSolved
21.07.2018 15:49:36 Gast24201
NotSolved
21.07.2018 16:58:53 Nemo
NotSolved
20.07.2018 10:21:46 Gast50217
NotSolved
21.07.2018 16:40:52 Gast24486
NotSolved
21.07.2018 22:18:36 Gast81489
NotSolved