一个文本中 怎么只提取域名出来 不提取文字等其他东西

Following

一个文本中 怎么只提取域名出来  不提取文字等其他东西
如：
百度:www.baidu.com
baidu:baidu.com
125.la 精易论坛
12360.cn 火车票网站
www.123.hk  测试1
测试2 www.123.cc
测试3 123.pw 测试4

Wm邪少

  

子程序名	返回值类型	公开	备 注
正则_匹配批量	整数型		本子程序采用【精易编程助手】生成。成功返回匹配的数量，失败返回0。
参数名	类 型	参考	可空	数组	备 注
源文本	文本型				欲被匹配的文本

变量名	类 型	静态	数组	备 注
局_正则	正则表达式类			此类为精易模块里面的正则类，精易模块下载地址：www.3600gz.cn/thread-1177-1-1.html
局_匹配数	整数型
局_计次	整数型

如果真 (局_正则.创建 (“[a-zA-Z0-9][-a-zA-Z0-9]{0,62}(\.[a-zA-Z0-9][-a-zA-Z0-9]{0,62})+\.?”, 源文本, 假, 假, 真,真) ＝ 假)
信息框 (“正则创建失败，请检查正则表达式语句是否有误！”, #错误图标, )
返回 (0)
局_匹配数 ＝ 局_正则.取匹配数量 ()
如果真 (局_匹配数 ＝ 0)
信息框 (“匹配失败，请检检查正则语句是否有误，数量：0”, #错误图标, )
返回 (0)
计次循环首 (局_匹配数, 局_计次)
输出调试文本 (“匹配文本 ” ＋ 到文本 (局_计次) ＋ “ 中的子匹配文本 1：” ＋ 局_正则.取子匹配文本 (局_计次, 1))
计次循环尾 ()
返回 (局_匹配数)

.版本 2<br /> <br /> .子程序 正则_匹配批量, 整数型, , 本子程序采用【精易编程助手】生成。成功返回匹配的数量，失败返回0。<br /> .参数 源文本, 文本型, , 欲被匹配的文本<br /> .局部变量 局_正则, 正则表达式类, , , 此类为精易模块里面的正则类，精易模块下载地址：<a href="http://www.3600gz.cn/thread-1177-1-1.html" target="_blank">www.3600gz.cn/thread-1177-1-1.html</a><br /> .局部变量 局_匹配数, 整数型<br /> .局部变量 局_计次, 整数型<br /> <br /> .如果真 (局_正则.创建 (“[a-zA-Z0-9][-a-zA-Z0-9]{0,62}(\.[a-zA-Z0-9][-a-zA-Z0-9]{0,62})+\.?”, 源文本, 假, 假, 真,真) ＝ 假)<br />     信息框 (“正则创建失败，请检查正则表达式语句是否有误！”, #错误图标, )<br />     返回 (0)<br /> .如果真结束<br /> 局_匹配数 ＝ 局_正则.取匹配数量 ()<br /> .如果真 (局_匹配数 ＝ 0)<br />     信息框 (“匹配失败，请检检查正则语句是否有误，数量：0”, #错误图标, )<br />     返回 (0)<br /> .如果真结束<br /> .计次循环首 (局_匹配数, 局_计次)<br />     输出调试文本 (“匹配文本 ” ＋ 到文本 (局_计次) ＋ “ 中的子匹配文本 1：” ＋ 局_正则.取子匹配文本 (局_计次, 1))<br /> .计次循环尾 ()<br /> 返回 (局_匹配数)

匹配网站域名
------------------------------------------------
[a-zA-Z0-9][-a-zA-Z0-9]{0,62}(\.[a-zA-Z0-9][-a-zA-Z0-9]{0,62})+\.?
评注：一个完整的域名，由根域、顶级域、二级、三级……域名构成，每级域名之间用点分开，每级域名由字母、数字和减号构成（第一个字母不能是减号），不区分大小写，长度不超过63。
很显然，单独的名字可以由正则表达式[a-zA-Z0-9][-a-zA-Z0-9]{0,62}来匹配，而完整的域名至少包括两个名字（比如google.com，由google和com构成），最后可以有一个表示根域的点（在规范中，最后有一个点的才是完整域名，但一般认为包括两个以上名字的域名也是完整域名，哪怕它后面没有点）。

qq780571

正则吧
\w+\.\w+

补充内容 (2015-6-6 10:22):
还是得把域名写上去，不然乱匹配
\w+\.(com|la|cn|hk|cc|pw)

qq780571

.版本 2

.子程序 正则_匹配批量, 整数型, , 本子程序采用【精易编程助手】生成。成功返回匹配的数量，失败返回0。
.参数 源文本, 文本型, , 欲被匹配的文本
.局部变量 局_正则, 正则表达式类, , , 此类为精易模块里面的正则类，精易模块下载地址：www.3600gz.cn/thread-1177-1-1.html
.局部变量 局_匹配数, 整数型
.局部变量 局_计次, 整数型

.如果真 (局_正则.创建 (“\w+\.\w+”, 源文本, 假, 假, 真,真) ＝ 假)
    信息框 (“正则创建失败，请检查正则表达式语句是否有误！”, #错误图标, )
    返回 (0)
.如果真结束
局_匹配数 ＝ 局_正则.取匹配数量 ()
.如果真 (局_匹配数 ＝ 0)
    信息框 (“匹配失败，请检检查正则语句是否有误，数量：0”, #错误图标, )
    返回 (0)
.如果真结束
.计次循环首 (局_匹配数, 局_计次)
    输出调试文本 (“匹配文本 ” ＋ 到文本 (局_计次) ＋ “ 中的子匹配文本 1：” ＋ 局_正则.取子匹配文本 (局_计次, 1))
.计次循环尾 ()
返回 (局_匹配数)

进军易语言

我也想知道这个问题怎么解决

进军易语言

解决了么？我也想知道这个问题的答案