Excel调用.net生成的DLL解密生意参谋DATA

1.注册dll为系统可识别的。先解压dll文件,使用下面的路径注册,没有安装Framework4.0的,自己安装一下。 

"%windir%\Microsoft.NET\Framework\v4.0.30319\RegAsm.exe" E:\Project\VS2017\Cxt\Sycm\bin\Dll\SycmDataDecryptor.dll
"%windir%\Microsoft.NET\Framework\v2.0.50727\RegAsm.exe" E:\Project\VS2017\MiiowOnline.Cxt\Sycm\bin\Dll\SycmDataDecryptor.dll

因为我用的framwork4.0 创建的 DLL,要在4.0**册。复制上面的第一句话就OK了,下图是对比。

Excel调用.net生成的DLL解密生意参谋DATA

 2.打开一个Excel文件,到vba界面,选择工具/引用弹出的菜单选择浏览,选择解压的目录中的dll(注意选择tlb,不然引用不进去,也是试了好几次)。

Excel调用.net生成的DLL解密生意参谋DATA

 3.打开一个代码界面调用方法如下,就可以解密了。

Private Sub Workbook_Open()

    Dim lngResult As String
    Dim objDecryptor As SycmDataDecryptor.CxtQQ175454291
    Set objDecryptor = New SycmDataDecryptor.CxtQQ175454291
    
    lngResult = objDecryptor.Decryptor("3c31973b1c8b8426e0dc354a0cb25a72d4c786257b779e0221ff37aaf9e113301b6b34c996865e30760b15156ff1efba651625a579316ddf3eb49cf71afd87bced22f686028522c0a9c6cba00af3d31d87ca9a4dd203198a095077c3bf5fc57856c6a5e28e8584080a6c2a2aaea795ea54d174c082e1c1408645b01afb4b8dadcbcaa3aa5d1c837546b9dbe544690e100f7efe58c0e0dd103710474e938dc021e92bb984d614a1267722f024764822a28d02dc453a1b9ee5a48464631bb7d052c4a8f047cc095ea013f751bc374a0400c74e93a412e37f61af90088dd42506bd")
    
End Sub

Excel调用.net生成的DLL解密生意参谋DATA

"{"b2CShop":true,"isMonitored":false,"linkUrl":"nanjiren.tmall.com","name":"南极人官方旗舰","picUrl":"//img.alicdn.com/imgextra/69/6c/TB1JMjYkiOYBuNjSsD4wu2SkFXa.png","shopId":68081971,"userId":738722023}"