精易论坛

标题: 取到URL链接的顶级域名例程源码 [打印本页]

作者: 御风软件 时间: 2013-10-23 20:08
标题: 取到URL链接的顶级域名例程源码
可以取到URL链接的顶级域名，也就是主域名。。源码中展示了4种情况，实际上可以取全部URL的顶级域名

[e]
.版本 2
.支持库 spec

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

调试输出 (取主域名 (“http://bbs.guaruan.com/forum.php”))
调试输出 (取主域名 (“bbs.guaruan.com/forum.php”))
调试输出 (取主域名 (“bbs.guaruan.com/”))
调试输出 (取主域名 (“bbs.guaruan.com”))

.子程序取主域名, 文本型, , 取URL链接的顶级域名
.参数 URL, 文本型
.局部变量主域名, 文本型
.局部变量开始位置, 整数型
.局部变量结束位置, 整数型

开始位置＝寻找文本 (URL, “//”, , 假) ＋ 2
结束位置＝寻找文本 (URL, “/”, 开始位置, 假)
.判断开始 (结束位置＝ -1)
主域名＝ URL
.判断 (开始位置＝ 1) ' 没有找到//
主域名＝取文本左边 (URL, 结束位置－ 1)
.默认
主域名＝取文本中间 (URL, 开始位置, 结束位置－开始位置)
.判断结束
返回 (主域名)

[/e]

作者: shenren123 时间: 2013-10-23 20:22
很好好好很好

作者: 怪咖咖 时间: 2013-10-23 20:29
有效果图更好。。

作者: 快乐987 时间: 2013-10-23 21:45
原来是用寻找文本来实现的！

作者: 悲伤的羔羊 时间: 2013-10-23 22:31
学习了，，，

作者: 小芸 时间: 2013-10-24 12:11
精易模块好像有这功能

作者: dszbox471 时间: 2013-10-24 16:31
谢谢分享！~

作者: fml224 时间: 2013-10-25 09:55
网址会不会失效呢

作者: 御风软件 时间: 2013-10-25 13:53

fml224 发表于 2013-10-25 09:55
网址会不会失效呢

额，你这水灌的太没有水平了。。这只是取网站url链接的顶级域名的。。。和网址失效有什么关系呢

作者: 宇智波·佐助 时间: 2013-10-31 23:47
代码截图好呀

作者: 冷眼旁观你们暧 时间: 2013-11-2 22:37
看看看感谢楼主

作者: 紫瞳 时间: 2013-12-10 21:57
收下好东西

欢迎光临精易论坛 (https://125.confly.eu.org/)