求助30个QB找个好人心帮我采集个网站歌曲

功能说明:该程序主要功能是从指定网站抓取音乐列表，并解析出每个音乐项的下载地址。具体步骤如下：

1. **获取网页内容**：通过`彗星HTTP读文本`函数从指定的URL（http://www.dj527.com/html/2/List_2.html）获取网页源代码，此页面包含了一部分中文舞曲的信息。

2. **正则表达式匹配**：使用正则表达式`(.*?)`对获取到的网页内容进行搜索，以找到所有符合条件的链接及其标题。这里的目标是提取出音乐条目的链接和名称。

3. **处理并显示结果**：将匹配到的结果存入数组中，并遍历这个数组。对于每一个匹配项，在超级列表框1中插入新的表项，设置相应的列值，包括序号、音乐名称以及根据提取的部分信息构建的完整下载链接（格式为`http://www.dj527.com/Down.asp?id=...`）。

4. **进一步处理下载链接**：当用户点击超级列表框中的某一项时，会触发另一个子程序，该子程序尝试访问之前构造的下载页面URL，然后再次使用正则表达式`thunderHref="(.*)">迅雷专用高速下载`来定位真正的下载链接。如果找到这样的链接，则对其进行解码操作，以获得最终可直接使用的下载地址。

5. **解码迅雷链接**：由于某些下载链接可能是经过编码的（如Thunder、FlashGet或QQDL协议），因此还有一个专门用于解码这些特殊格式链接的子程序`解码为普通URL`。它能够识别不同的编码类型，并将它们转换回标准的URL形式。

综上所述，这是一个用于从特定网站批量获取音乐文件下载链接的小工具，具有一定的自动化数据抓取与处理能力。

======窗口程序集1

           |  |

           |  |------ _按钮1_被单击

           |  |

           |  |------ _超级列表框1_左键单击表项

           |  |

           |  |------ 解码为普通URL

           |  |

           |  |------ _BASE64编码

           |  |

           |  |------ _BASE64解码

           |  |

           |  |------ 取中间

  ======窗口程序集1

           |  |

           |  |------ _按钮1_被单击

           |  |

           |  |------ 取歌曲

           |  |

           |  |------ 解码为普通URL

           |  |

           |  |------ _BASE64编码

           |  |

           |  |------ _BASE64解码

           |  |

           |  |------ 取中间

           |  |

           |  |------ _超级列表框1_被双击

  ======窗口程序集1

           |  |

           |  |------ _按钮2_被单击

           |  |

           |  |------ _超级列表框1_被双击