易语言获取淘宝店铺宝贝源码

系统结构:截取文本,API_搜索商品,获取网页源码,MD5,取十六进制,取timestamp,CoInitialize,CoUninitialize,CryptCreateHash,CryptReleaseContext,CryptHashData,CryptDestroyHash,CryptGetHashParam,wvsprintf,CryptAcquireContext,创建多级目录,

======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 截取文本
           |  |
           |  |------ API_搜索商品
           |  |
           |  |------ 获取网页源码
           |  |
           |  |------ MD5
           |  |
           |  |------ 取十六进制
           |  |
           |  |------ 取timestamp
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CoInitialize
           |  |
           |  |---[dll]------   CoUninitialize
           |  |
           |  |---[dll]------   CryptCreateHash
           |  |
           |  |---[dll]------   CryptReleaseContext
           |  |
           |  |---[dll]------   CryptHashData
           |  |
           |  |---[dll]------   CryptDestroyHash
           |  |
           |  |---[dll]------   CryptGetHashParam
           |  |
           |  |---[dll]------   wvsprintf
           |  |
           |  |---[dll]------   CryptAcquireContext
           |  |
           |  |---[dll]------   创建多级目录

调用的DLL命令:

.DLL命令 CoInitialize, , "ole32.dll", "CoInitialize"
    .参数 pvReserved, 整数型

.DLL命令 CoUninitialize, , "ole32.dll", "CoUninitialize"

.DLL命令 CryptCreateHash, 整数型, "advapi32.dll", "CryptCreateHash"
    .参数 hProv, 整数型, , csp句柄
    .参数 Algid, 整数型, , 算法CALG_
    .参数 hKey, 整数型, , 如果算法是一个密钥哈希，则为密钥句柄
    .参数 dwFlags, 整数型, , 0
    .参数 phHash, 整数型, 传址, 哈希句柄

.DLL命令 CryptReleaseContext, 整数型, "advapi32.dll", "CryptReleaseContext"
    .参数 hProv, 整数型, , csp句柄
    .参数 dwFlags, 整数型, , 0

.DLL命令 CryptHashData, 整数型, "advapi32.dll", "CryptHashData", , 非零表示成功。
    .参数 hHash, 整数型, , 哈希句柄
    .参数 pbData, 字节集, , 数据
    .参数 dwDataLen, 整数型, , 数据长度
    .参数 dwFlags, 整数型, , 0

.DLL命令 CryptDestroyHash, 整数型, "advapi32.dll", "CryptDestroyHash"
    .参数 hHash, 整数型

.DLL命令 CryptGetHashParam, 整数型, "advapi32.dll", "CryptGetHashParam", , 非零表示成功。
    .参数 hHash, 整数型, , 哈希句柄
    .参数 dwParam, 整数型, , HP_
    .参数 pByte, 字节集, , 缓冲区
    .参数 pdwDataLen, 整数型, 传址, 缓冲区长度
    .参数 dwFlags, 整数型, , 0

.DLL命令 wvsprintf, 整数型, "user32.dll", "wvsprintfA", 公开, 十进制转十六进制　
    .参数 lpstr, 文本型, , 取空白文本
    .参数 lpcstr, 文本型, , “%X”
    .参数 OptionalArguments, 整数型, 传址, 欲取的数据

.DLL命令 CryptAcquireContext, 整数型, "advapi32.dll", "CryptAcquireContextA", , GetLastError取得失败信息  非零表示成功，零表示失败。
    .参数 phProv, 整数型, 传址, csp句柄,用CryptReleaseContext释放
    .参数 pszContainer, 文本型, , 密钥名
    .参数 pszProvider, 文本型, , 加密服务名null
    .参数 dwProvType, 整数型, , 加密类型PROV_RSA_FULL
    .参数 dwFlags, 整数型, , CRYPT_VERIFYCONTEXT

.DLL命令 创建多级目录, 整数型, "IMAGEHLP.DLL", "MakeSureDirectoryPathExists"
    .参数 DirPath, 文本型