取编辑框1内容里的下载地址到标签会的来aa a A A A

Оo谁谁oО

咿呀咿呀哟 发表于 2013-11-6 17:15
没有使用正则，看看满意不~

加下QQ还有别的问题问你 说下你的QQ我加你

Cramps

我先下载看看

Cramps

[e]
.版本 2

.程序集 窗口程序集1
.程序集变量 本地下载地址, 文本型, , , 0
.程序集变量 迅雷下载地址, 文本型

.子程序 _按钮3_被单击
.局部变量 文本, 文本型, , "0"

文本_取中间_批量 (编辑框1.内容, “>免费用户”, “>快车”, 文本, )
' http://156.157.145.99/down/6fc2b0efa4b87e33ca2c6f69e55f16b1-731512/uhjjm.exe?cts=112A228A139A2357665740&ctp=112A228A139A235&ctt=1383487611&limit=3&spd=0&ctk=e470236bf4be549522887950a690126a&chk=6fc2b0efa4b87e33ca2c6f69e55f16b1-731512&mtd=1 并且这里的amp;要替换为空
' thunder://QUFodHRwOi8vMTIzLjE1Ny4xNDkuMTM1L2Rvd24vNmZjMmIwZWZhNGI4N2UzM2NhMmM2ZjY5ZTU1ZjE2YjEtNzMxNTEyL3VoamptLmV4ZT9jdHM9MTEyQTIyOEExMzlBMjM1NzY2NTc0MCZjdHA9MTEyQTIyOEExMzlBMjM1JmN0dD0xMzgzNDg3NjExJmxpbWl0PTMmc3BkPTM1ODA1MiZjdGs9NTllZWUyMDNiNDVmODU0NjFmZWEzZTAwZWUwNzZkYTcmY2hrPTZmYzJiMGVmYTRiODdlMzNjYTJjNmY2OWU1NWYxNmIxLTczMTUxMlpa 取出这两段地址

本地下载地址 ＝ 到文本 (文本_取中间_批量 (本地下载地址, “<a class=” ＋ #引号 ＋ “telecom” ＋ #引号 ＋ “ href=” ＋ #引号, #引号 ＋ “>”, 文本))
迅雷下载地址 ＝ 到文本 (文本_取中间_批量 (本地下载地址, “thunderHref=” ＋ #引号, #引号 ＋ “thunderPid”))
.如果 (本地下载地址 ≠ “” 且 迅雷下载地址 ≠ “”)
标签_状态.标题 ＝ “获取下载地址成功，请单击复制地址！”
标签_本地下载.可视 ＝ 真
标签_迅雷下载.可视 ＝ 真
.否则
标签_状态.标题 ＝ “下载地址取出错误，请联系作者！”
.如果结束


.子程序 __启动窗口_创建完毕

标签_本地下载.可视 ＝ 假
标签_迅雷下载.可视 ＝ 假


[/e]

你完全写错了！
最佳吧1

helper

Оo谁谁oО 发表于 2013-11-7 11:12
加下QQ还有别的问题问你 说下你的QQ我加你

32771339 不违反规则吧