易语言自动修改歌曲文件名源码

易语言自动修改歌曲文件名源码系统结构:取文件命名,取后缀,文件判断,信息读取,修改,界面初始化,取指定内容,分析歌曲名,子程序_取中间文本,取出文本,取指定内容1,界面初始化,界面重组初始化,音频信息,初始化数据,UNICODE转ANSI,ANSI转UNICODE,UTF8转UNICODE,UNICODE转UTF8,格式化时间,计算CRC,判断编码类型,到二进制,二进制到十进制,读取WMA文件信息,读取APE文件信息,读取OGG文件信息,读取FLAC文件信息,读取MP3文件ID3V2信息,是否有ID3V2标签,是否有ID3V1标签,mp3文件音频信息,判断是否mp3帧头,读取MP3文件ID3V1信息,打开多文件对话框,GBK编码转换,UTF8编码转换,彗星HTTP读文本,彗星HTTP读文件,彗星打开指定网址,彗星URL编码_UTF8,彗星URL编码,彗星URL解码_UTF8,彗星URL解码,Ansi转Utf8,Utf8转ansi,Unicode转Utf8,Ansi转Unicode,Unicode转ansi,Utf8转Unicode,取页面地址,取端口,取域名,GetOpenFileNameA,MultiByteToWideChar,MultiByteToWideChar1,InternetSetCookie,InternetGetCookie,HttpQueryInfo,HttpAddRequestHeaders,InternetCloseHandle,HttpOpenRequest,InternetReadFile,HttpSendRequest,InternetConnect,InternetOpen,WideCharToMultiByte,WideCharToMultiByte3, ======主界面程序集 || ||------__启动窗口_创建完毕 || ||------_拖放对象1_得到文件 || ||------取文件命名 || ||------取后缀 || ||------文件判断 || ||------信息读取 || ||------_按钮2_被单击 || ||------修改 || ||------_按钮1_被单击 || ||------界面初始化 || ||------_图形按钮1_被单击 || ||------_按钮3_被单击 || || ======判断歌词程序集 || ||------_按钮1_被单击 || ||------_手动模式_创建完毕 || ||------取指定内容 || ||------_按钮2_被单击 || ||------_按钮3_被单击 || ||------_按钮5_被单击 || ||------_滑块条2_位置被改变 || ||------_手动模式_将被销毁 || ||------_滑块条1_位置被改变 || ||------分析歌曲名 || ||------子程序_取中间文本 || ||------取出文本 || ||------取指定内容1 || ||------_按钮4_被单击 || ||------_图形按钮1_被单击 || ||------界面初始化 || ||------_启动窗口_绘制过程 || ||------_重组_绘制过程 || ||------界面重组初始化 || ||------_透明标签1_鼠标左键被按下 || || ======窗口程序集3 || ||------_WebBrown_创建完毕 || || ======核心程序集 || ||------音频信息 || ||------初始化数据 || ||------UNICODE转ANSI || ||------ANSI转UNICODE || ||------UTF8转UNICODE || ||------UNICODE转UTF8 || ||------格式化时间 || ||------计算CRC || ||------判断编码类型 || ||------到二进制 || ||------二进制到十进制 || ||------读取WMA文件信息 || ||------读取APE文件信息 || ||------读取OGG文件信息 || ||------读取FLAC文件信息 || ||------读取MP3文件ID3V2信息 || ||------是否有ID3V2标签 || ||------是否有ID3V1标签 || ||------mp3文件音频信息 || ||------判断是否mp3帧头 || ||------读取MP3文件ID3V1信息 || ||------打开多文件对话框 || ||------GBK编码转换 || ||------UTF8编码转换 || ||------彗星HTTP读文本 || ||------彗星HTTP读文件 || ||------彗星打开指定网址 || ||------彗星URL编码_UTF8 || ||------彗星URL编码 || ||------彗星URL解码_UTF8 || ||------彗星URL解码 || ||------Ansi转Utf8 || ||------Utf8转ansi || ||------Unicode转Utf8 || ||------Ansi转Unicode || ||------Unicode转ansi || ||------Utf8转Unicode || ||------取页面地址 || ||------取端口 || ||------取域名 || || ======调用的Dll || ||---[dll]------GetOpenFileNameA || ||---[dll]------_宽字符到双字节1 || ||---[dll]------_宽字符到双字节 || ||---[dll]------MultiByteToWideChar || ||---[dll]------MultiByteToWideChar1 || ||---[dll]------InternetSetCookie || ||---[dll]------InternetGetCookie || ||---[dll]------HttpQueryInfo || ||---[dll]------HttpAddRequestHeaders || ||---[dll]------InternetCloseHandle || ||---[dll]------HttpOpenRequest || ||---[dll]------InternetReadFile || ||---[dll]------HttpSendRequest || ||---[dll]------InternetConnect || ||---[dll]------InternetOpen || ||---[dll]------_执行 || ||---[dll]------WideCharToMultiByte || ||---[dll]------WideCharToMultiByte3 调用的DLL命令: .DLL命令GetOpenFileNameA,整数型,"comdlg32.dll","GetOpenFileNameA" .参数OpenFile,对话框信息结构 .DLL命令_宽字符到双字节1,整数型,,"WideCharToMultiByte",,kernel32.dll .参数代码页,整数型,,CodePage .参数标志,整数型,,dwFlags .参数宽字符文本,字节集,,lpWideCharStr .参数宽字符文本长度,整数型,,cchWideChar .参数双字节文本,整数型,,lpMultiByteStr .参数双字节文本长度,整数型,,cchMultiByte .参数默认文本,整数型,,lpDefaultChar .参数使用默认文本,逻辑型,,lpUsedDefaultChar .DLL命令_宽字符到双字节,,,"WideCharToMultiByte",,kernel32.dll .参数代码页,整数型,,CodePage .参数标志,整数型,,dwFlags .参数宽字符文本,字节集,,lpWideCharStr .参数宽字符文本长度,整数型,,cchWideChar .参数双字节文本,字节集,,lpMultiByteStr .参数双字节文本长度,整数型,,cchMultiByte .参数默认文本,整数型,,lpDefaultChar .参数使用默认文本,逻辑型,,lpUsedDefaultChar .DLL命令MultiByteToWideChar,整数型,,"MultiByteToWideChar" .参数CodePage,整数型 .参数dwFlags,整数型 .参数lpMultiByteStr,文本型 .参数cchMultiByte,整数型 .参数lpWideCharStr,字节集 .参数cchWideChar,整数型 .DLL命令MultiByteToWideChar1,整数型,,"MultiByteToWideChar" .参数CodePage,整数型 .参数dwFlags,整数型 .参数lpMultiByteStr,字节集 .参数cchMultiByte,整数型 .参数lpWideCharStr,字节集 .参数cchWideChar,整数型 .DLL命令InternetSetCookie,,"wininet.dll","InternetSetCookieA" .参数域名,文本型,传址 .参数名称,文本型,传址 .参数内容,文本型,传址 .DLL命令InternetGetCookie,,"wininet.dll","InternetGetCookieA" .参数域名,文本型,传址 .参数名称,文本型,传址 .参数内容,文本型,传址 .参数尺寸,整数型,传址 .DLL命令HttpQueryInfo,,"wininet.dll","HttpQueryInfoA" .参数Internet请求句柄,整数型 .参数待查信息,整数型,,22返回所有信息;43SET_COOKIE;+2147483648返回文本 .参数返回容器,文本型,传址 .参数返回容器长度,整数型,传址 .参数lpdwIndex,整数型 .DLL命令HttpAddRequestHeaders,,"wininet.dll","HttpAddRequestHeadersA" .参数Internet请求句柄,整数型 .参数lpszHeaders,文本型,传址 .参数dwHeadersLength,整数型 .参数dwModifiers,整数型 .DLL命令InternetCloseHandle,逻辑型,"wininet.dll","InternetCloseHandle",,访问网页 .参数hInternet,整数型 .DLL命令HttpOpenRequest,整数型,"WinINet.dll","HttpOpenRequestA" .参数hConnect,整数型 .参数lpszVerb,文本型 .参数lpszObjectName,文本型 .参数lpszVersion,文本型 .参数lpszReferer,文本型 .参数lplpszAcceptTypes,文本型 .参数dwFlags,整数型 .参数dwContext,整数型 .DLL命令InternetReadFile,逻辑型,"WinINet.dll" .参数hFile,整数型 .参数lpBuffer,字节集,传址 .参数dwNumberOfBytesToRead,整数型 .参数lpdwNumberOfBytesRead,整数型,传址 .DLL命令HttpSendRequest,逻辑型,"wininet.dll","HttpSendRequestA" .参数HTTP请求句柄,整数型 .参数sHeaders,文本型,传址 .参数lHeadersLength,整数型 .参数sOptional,文本型,传址 .参数lOptionalLength,整数型 .DLL命令InternetConnect,整数型,"wininet.dll","InternetConnectA" .参数Internet句柄,整数型 .参数域名,文本型,传址 .参数服务器端口,整数型,,80HTTP;21FTP; .参数用户名,文本型,传址,空 .参数用户口令,文本型,传址,空 .参数服务类型,整数型,,1FTP;3HTTP .参数dwFlags,整数型,,0http;134217728被动FTP模式 .参数dwContext,整数型,,0 .DLL命令InternetOpen,整数型,"wininet.dll","InternetOpenA" .参数句柄名称,文本型,传址 .参数连接类型,整数型,,1直接连接;3代理连接 .参数代理,文本型,传址 .参数代理掩码,文本型,传址 .参数dwFlags,整数型,,0 .DLL命令_执行,整数型,,"ShellExecuteA" .参数hwnd,整数型,,指定一个窗口的句柄，有些时候，Windows程序有必要在创建自己的主窗口前显示一个消息框。 .参数lpOperation,文本型,,指定字串“Open”来打开lpFlie文档；或指定“Print”来打印它。也可设为vbNullString，表示默认为“Open” .参数lpFile,文本型,,想用关联的程序打印或打开的一个程序名或文件名 .参数lpParameters,文本型,,如lpFile是一个可执行文件，则这个字串包含了传递给执行程序的参数。如lpFile引用的是一个文档文件，或者不需要使用参数，则设为vbNullString .参数lpDirectory,文本型,,想使用的默认路径完整路径 .参数nShowCmd,整数型,,定义了如何显示启动程序的常数值。参考ShowWindow函数的nCmdShow参数 .DLL命令WideCharToMultiByte,整数型,,"WideCharToMultiByte",公开,kernel32.dll将通配符映像为多字节 .参数CodePage,整数型 .参数dwFlags,整数型 .参数lpWideCharStr,字节集 .参数cchWideChar,整数型 .参数lpMultiByteStr,字节集 .参数cchMultiByte,整数型 .参数lpDefaultChar,整数型 .参数lpUsedDefaultChar,整数型 .DLL命令WideCharToMultiByte3,整数型,"kernel32","WideCharToMultiByte" .参数CodePage,整数型 .参数dwFlags,整数型 .参数lpWideCharStr,字节集 .参数cchWideChar,整数型 .参数lpMultiByteStr,文本型 .参数cbMultiByte,整数型 .参数lpDefaultChar,文本型 .参数lpUsedDefaultChar,逻辑型