易语言post注册百度源码

系统结构:bd__cbs,Vcode_baidu_reg,baidu_reg,网页_清除Cookie,内部_Cookie取名,网页_取Cookie,网页_取单条Cookie,网页_Cookie合并更新,网页_取页面地址,网页_取域名,内部_数组成员是否存在1,网页_取端口,网页_访问,网页_访问s,访问线程,线程_启动,线程_销毁,时间_取13位时间戳,编码_utf8到gb2312,Ansi到Unicode,Ansi到Unicode_字节集,编码_是否UTF8,Unicode到Ansi,文本_取随机字符,文本_取随机数字,文本_取出中间文本,文本_取左边,文本_去重复文本,内部_数组成员是否存在_文本,InternetSetCookieA,CreateThread,MsgWaitForMultipleObjects,TerminateThread,CloseHandle,InternetGetCookieA,InternetGetCookieExA,InternetOpenA,InternetCloseHandle,InternetConnectA,HttpOpenRequestA,HttpSendRequestA_字节集,InternetReadFile,HttpQueryInfoA,MultiByteToWideChar_字节集,MultiByteToWideChar,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |
======程序集2
           |  |
           |  |------ bd__cbs
           |  |
           |  |------ Vcode_baidu_reg
           |  |
           |  |------ baidu_reg
           |  |
           |  |
======程序集_网页
           |  |
           |  |------ 网页_清除Cookie
           |  |
           |  |------ 内部_Cookie取名
           |  |
           |  |------ 网页_取Cookie
           |  |
           |  |------ 网页_取单条Cookie
           |  |
           |  |------ 网页_Cookie合并更新
           |  |
           |  |------ 网页_取页面地址
           |  |
           |  |------ 网页_取域名
           |  |
           |  |------ 内部_数组成员是否存在1
           |  |
           |  |------ 网页_取端口
           |  |
           |  |------ 网页_访问
           |  |
           |  |------ 网页_访问s
           |  |
           |  |------ 访问线程
           |  |
           |  |------ 线程_启动
           |  |
           |  |------ 线程_销毁
           |  |
           |  |------ 时间_取13位时间戳
           |  |
           |  |
======程序集_编码
           |  |
           |  |------ 编码_utf8到gb2312
           |  |
           |  |------ Ansi到Unicode
           |  |
           |  |------ Ansi到Unicode_字节集
           |  |
           |  |------ 编码_是否UTF8
           |  |
           |  |------ Unicode到Ansi
           |  |
           |  |
======程序集_文本
           |  |
           |  |------ 文本_取随机字符
           |  |
           |  |------ 文本_取随机数字
           |  |
           |  |------ 文本_取出中间文本
           |  |
           |  |------ 文本_取左边
           |  |
           |  |------ 文本_去重复文本
           |  |
           |  |------ 内部_数组成员是否存在_文本
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   InternetSetCookieA
           |  |
           |  |---[dll]------   CreateThread
           |  |
           |  |---[dll]------   MsgWaitForMultipleObjects
           |  |
           |  |---[dll]------   TerminateThread
           |  |
           |  |---[dll]------   CloseHandle
           |  |
           |  |---[dll]------   InternetGetCookieA
           |  |
           |  |---[dll]------   InternetGetCookieExA
           |  |
           |  |---[dll]------   InternetOpenA
           |  |
           |  |---[dll]------   InternetCloseHandle
           |  |
           |  |---[dll]------   InternetConnectA
           |  |
           |  |---[dll]------   HttpOpenRequestA
           |  |
           |  |---[dll]------   HttpSendRequestA_字节集
           |  |
           |  |---[dll]------   InternetReadFile
           |  |
           |  |---[dll]------   HttpQueryInfoA
           |  |
           |  |---[dll]------   _Unicode转Ansi
           |  |
           |  |---[dll]------   MultiByteToWideChar_字节集
           |  |
           |  |---[dll]------   MultiByteToWideChar

调用的DLL命令:

.DLL命令 InternetSetCookieA, 逻辑型, "wininet.dll", "InternetSetCookieA", 公开, 设置COOKIE
    .参数 域名, 文本型, 传址
    .参数 名称, 文本型, 传址
    .参数 内容, 文本型, 传址

.DLL命令 CreateThread, 整数型, , "CreateThread", 公开, 线程_启动
    .参数 lpThreadAttributes, 整数型
    .参数 dwStackSize, 整数型
    .参数 lpStartAddress, 子程序指针
    .参数 lpParameter, 整数型
    .参数 dwCreationFlags, 整数型, , 控制线程创建的标志。如果指定了CREATE_SUSPENDED标志，是创建线程处于暂停状态，并不会运行，直到ResumeThread函数被调用。如果这个值是零，线程创建后立即运行
    .参数 lpThreadId, 整数型, 传址

.DLL命令 MsgWaitForMultipleObjects, 整数型, , "MsgWaitForMultipleObjects", 公开
    .参数 nCount, 整数型
    .参数 pHandles, 整数型, 传址
    .参数 fWaitAll, 逻辑型
    .参数 dwMilliseconds, 整数型
    .参数 dwWakeMask, 整数型

.DLL命令 TerminateThread, 整数型, , "TerminateThread"
    .参数 hThread, 整数型, , 线程句柄
    .参数 dwExitCode, 整数型, , 填0

.DLL命令 CloseHandle, 逻辑型, "kernel32", "CloseHandle", 公开, 关闭一个内核对象。其中包括文件、文件映射、进程、线程、security和同步对象等。涉及文件处理时，这个函数通常与vb的close命令相似。应尽可能的使用close，因为它支持vb的差错控制。注意这个函数使用的文件句柄与vb的文件编号是完全不同的  非零表示成功，零表示失败。会设置GetLastError
    .参数 对象句柄, 整数型, , 欲关闭的一个对象的句柄;

.DLL命令 InternetGetCookieA, 逻辑型, "wininet.dll", "InternetGetCookieA", 公开, 读取COOKIE
    .参数 域名, 文本型
    .参数 名称, 文本型
    .参数 内容, 文本型, 传址
    .参数 尺寸, 整数型, 传址

.DLL命令 InternetGetCookieExA, 整数型, "wininet.dll", , 公开
    .参数 lpszURL, 文本型
    .参数 lpszCookieName, 文本型
    .参数 lpszCookieData, 文本型
    .参数 lpdwSize, 整数型, 传址
    .参数 dwFlags, 整数型
    .参数 lpReserved, 整数型

.DLL命令 InternetOpenA, 整数型, "wininet.dll", "InternetOpenA", 公开, Internet激活
    .参数 句柄名称, 文本型, 传址
    .参数 连接类型, 整数型, , 1直接连接;3代理连接
    .参数 代理地址, 文本型, 传址
    .参数 代理掩码, 文本型, 传址
    .参数 dwFlags, 整数型, , 0

.DLL命令 InternetCloseHandle, 逻辑型, "wininet.dll", "InternetCloseHandle", 公开, Internet关闭句柄
    .参数 句柄, 整数型

.DLL命令 InternetConnectA, 整数型, "wininet.dll", "InternetConnectA", 公开, Internet建立连接
    .参数 Internet句柄, 整数型
    .参数 域名, 文本型, 传址
    .参数 服务器端口, 整数型, , 80HTTP;21FTP;
    .参数 用户名, 文本型, 传址, 空
    .参数 用户口令, 文本型, 传址, 空
    .参数 服务类型, 整数型, , 1FTP;3HTTP
    .参数 dwFlags, 整数型, , 0http;134217728被动FTP模式
    .参数 dwContext, 整数型, , 0

.DLL命令 HttpOpenRequestA, 整数型, "wininet.dll", "HttpOpenRequestA", 公开, Http创建请求
    .参数 Internet连接句柄, 整数型, , 由Internet建立连接返回
    .参数 访问方式, 文本型, 传址, "GET" or "POST"为空默认GET
    .参数 页面路径, 文本型, 传址, 简短路径,不带域名
    .参数 协议版本, 文本型, 传址, 为空默认HTTP/1.1
    .参数 引用页, 文本型, 传址, 可为空
    .参数 识别类型, 文本型, 传址, 可为空
    .参数 dwFlags, 整数型, , 2147483648更新下载
    .参数 dwContext, 整数型, , 0

.DLL命令 HttpSendRequestA_字节集, 逻辑型, "wininet.dll", "HttpSendRequestA", 公开, Http发送请求
    .参数 HTTP请求句柄, 整数型
    .参数 附加协议头, 文本型, 传址
    .参数 附加协议头长度, 整数型
    .参数 提交信息, 字节集, 传址
    .参数 提交信息长度, 整数型

.DLL命令 InternetReadFile, 逻辑型, "wininet.dll", "InternetReadFile", 公开, Internet读文件
    .参数 HTTP请求句柄, 整数型
    .参数 sBuffer, 字节集, 传址
    .参数 lNumBytesToRead, 整数型
    .参数 lNumberOfBytesRead, 整数型, 传址

.DLL命令 HttpQueryInfoA, 逻辑型, "wininet.dll", "HttpQueryInfoA", 公开, HTTP查询信息
    .参数 Internet请求句柄, 整数型
    .参数 待查信息, 整数型, , 22返回所有信息;43SET_COOKIE;+2147483648返回文本
    .参数 返回容器, 文本型, 传址
    .参数 返回容器长度, 整数型, 传址
    .参数 lpdwIndex, 整数型

.DLL命令 _Unicode转Ansi, 整数型, "kernel32.dll", "WideCharToMultiByte", , _Unicode转Ansi
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型, , 0
    .参数 lpWideCharStr, 字节集
    .参数 cchMultiByte, 整数型, , -1
    .参数 lpMultiByteStr, 文本型, 传址
    .参数 cchMultiByte, 整数型
    .参数 默认文本, 整数型, , 0
    .参数 使用默认文本, 整数型, , 0

.DLL命令 MultiByteToWideChar_字节集, 整数型, , "MultiByteToWideChar"
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型
    .参数 lpMultiByteStr, 字节集
    .参数 cchMultiByte, 整数型
    .参数 lpWideCharStr, 字节集
    .参数 cchWideChar, 整数型

.DLL命令 MultiByteToWideChar, 整数型, , "MultiByteToWideChar", 公开
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型
    .参数 lpMultiByteStr, 文本型
    .参数 cchMultiByte, 整数型
    .参数 lpWideCharStr, 字节集
    .参数 cchWideChar, 整数型