VS FoxPro编码的类型开发者社区

相关文章推荐

文雅的煎饼果子 · 在C#中查询SQLServer的中数据表中的 ...· 11 月前 ·

博学的上铺 · mongoTemplate 写入数据 ...· 11 月前 ·

近视的茶壶 · LyScript 插件命令返回封装 - ...· 2 年前 ·

礼貌的海龟 · JavaScript 作用域 | 菜鸟教程· 2 年前 ·

深情的小摩托 · 【SQL ...· 2 年前 ·

腾讯云

开发者社区

文档意见反馈控制台

首页 TVP

最新优惠活动

文章/答案/技术大牛

发布

C:\PROGRAM FILES (X86)\MICROSOFT VISUAL FOXPRO 9\

lcCryptLib = HOME() + "FFC\_Crypt.vcx"
IF NOT FILE( lcCryptLib )
    MESSAGEBOX( "No crypt class library." )
    RETURN 
ENDIF 
SET CLASSLIB TO ( lcCryptLib ) ADDITIVE 
oCrypt = CREATEOBJECT( "_CryptAPI" )
oCrypt.AddProperty( "myPassKey" )
oCrypt.myPassKey = "Hold property to represent some special 'Key/pass phrase' "
*/ Place-holder to get encrypted value
lcEncryptedValue = ""
? oCrypt.EncryptSessionStreamString( "Original String", oCrypt.myPassKey, @lcEncryptedValue )
*/ Show results of encrypted value
? "Encrypted Value: " + lcEncryptedValue 
*/ Now, to get the decrypted from the encrypted...
lcDecryptedValue = ""
? oCrypt.DecryptSessionStreamString( lcEncryptedValue, oCrypt.myPassKey, @lcDecryptedValue )
? "Decrypted Value: " + lcDecryptedValue

推荐文章

文雅的煎饼果子 · 在C#中查询SQLServer的中数据表中的信息 - Microsoft Q&A

11 月前

博学的上铺 · mongoTemplate 写入数据 mongotemplate aggregation_archangle的技术博客_51CTO博客

11 月前

近视的茶壶 · LyScript 插件命令返回封装 - lyshark - 博客园

2 年前

礼貌的海龟 · JavaScript 作用域 | 菜鸟教程

2 年前

深情的小摩托 · 【SQL Server】递归CTE查询view/sp/fun中使用的所有表_sqlserver查看view关联哪些表_Kingsley_W的博客-CSDN博客

2 年前

Stack Overflow用户