易语言读WAP源码

易语言读WAP源码系统结构:读wap,Unicode到Ansi,Ansi到Unicode,编码_utf8到gb2312,URL解码_utf8,文本_替换,进制_十六到十,RegisterWindowMessage,GetClassName,SendMessageTimeout,ObjectFromLresult,MultiByteToWideChar,FindWindowExA, ======程序集1 || ||------_启动子程序 || ||------读wap || ||------Unicode到Ansi || ||------Ansi到Unicode || ||------编码_utf8到gb2312 || ||------URL解码_utf8 || ||------文本_替换 || ||------进制_十六到十 || || ======调用的Dll || ||---[dll]------RegisterWindowMessage || ||---[dll]------GetClassName || ||---[dll]------SendMessageTimeout || ||---[dll]------ObjectFromLresult || ||---[dll]------_Unicode转Ansi || ||---[dll]------MultiByteToWideChar || ||---[dll]------FindWindowExA 调用的DLL命令: .DLL命令RegisterWindowMessage,整数型,"user32","RegisterWindowMessageA",,获取分配给一个字串标识符的消息编号　&C000到&FFFF之间的一个消息编号。零意味着出错 .参数lpString,文本型,,注册消息的名字; .DLL命令GetClassName,,,"GetClassNameA" .参数h,整数型 .参数t,文本型 .参数n,整数型 .DLL命令SendMessageTimeout,整数型,"user32","SendMessageTimeoutA",,向窗口发送一条消息。如窗口位于不同的线程中，则利用这个函数可以指定一个超时值，以便在另一个进程挂起的时候防止调用进程也永远挂起　成功时返回TRUE，失败时返回FALSE。会设置GetLastError .参数MSG,整数型,,消息的标识符 .参数hwnd,整数型,,要接收消息的一个窗口的句柄 .参数wParam,整数型,,由消息决定 .参数lParam,整数型,,由消息决定 .参数fuFlags,整数型,,下述常数的一个或多个;SMTO_ABORTIFHUNG：如目标进程挂起，则函数立即返回;SMTO_BLOCK：除非函数返回，否则调用线程不能处理消息;SMTO_NORMAL：允许调用线程处理消息，同时保持函数继续执行 .参数uTimeout,整数型,,超时值，采用毫秒为单位 .参数lpdwResult,整数型,传址,用于装载函数结果的一个变量; .DLL命令ObjectFromLresult,整数型,"OLEACC.DLL","ObjectFromLresult",,　 .参数lResult,整数型 .参数riid,字节集 .参数wParam,整数型 .参数ppvObject,对象 .DLL命令_Unicode转Ansi,整数型,"kernel32.dll","WideCharToMultiByte" .参数CodePage,整数型 .参数dwFlags,整数型,,0 .参数lpWideCharStr,字节集 .参数cchMultiByte,整数型,,-1 .参数lpMultiByteStr,文本型,传址 .参数cchMultiByte,整数型 .参数默认文本,整数型,,0 .参数使用默认文本,整数型,,0 .DLL命令MultiByteToWideChar,整数型,,"MultiByteToWideChar" .参数CodePage,整数型 .参数dwFlags,整数型 .参数lpMultiByteStr,文本型 .参数cchMultiByte,整数型 .参数lpWideCharStr,字节集 .参数cchWideChar,整数型 .DLL命令FindWindowExA,整数型 .参数hWnd1,整数型 .参数hWnd2,整数型 .参数lpsz1,整数型 .参数lpsz2,整数型