开启辅助访问

登录 | 注册

切换到宽版

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到

求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

精易论坛»论坛 › 技术专区 › 问答求助 › 『VIP求助专区』 › 这两个文本是怎么转换来的

发新帖

查看: 971|回复: 4

收起左侧

[已解决] 这两个文本是怎么转换来的

结帖率：88% (14/16)

发表于 2020-4-21 18:15:38 | 显示全部楼层 |阅读模式江苏省宿迁市

楼主结帖率: 88% (14/16)

5精币

文本1是怎么编码成文本2的，易语言怎么写呢

UU`_9[[VMJEA3Y}B4S]3R2W.png

最佳答案

刘亦菲冲天

查看完整内容

精易模块的一句代码：网页_取文本_dom ()，搞定。完美。

求助知识：请将问题描述清楚，最好把你有问题的源码打包上传上来，这样更方便大家帮助你。
友情提醒：本版被采纳的主题可在申请荣誉值帖子申请荣誉值，获得 3点荣誉值，荣誉值可兑换荣誉会员、终身vip用户组。

回复

使用道具举报

刘亦菲冲天

结帖率：97% (32/33)

发表于 2020-4-21 18:15:39 | 显示全部楼层浙江省温州市

精易模块的一句代码：网页_取文本_dom ()，搞定。完美。

评分

参与人数 1	荣誉 +3	收起理由
笨潴	+ 3	热心帮助他人，荣誉+3，希望继续努力(^__^) 嘻嘻!

查看全部评分

回复

使用道具举报

结帖率：88% (14/16)

楼主| 发表于 2020-4-21 18:19:02 | 显示全部楼层江苏省宿迁市

图片传错了是这个

M@}PJ4MDDJB~@[@ZDW3$89P.png

回复

使用道具举报

幻月工作室

结帖率：100% (1/1)

签到天数: 8 天

发表于 2020-4-21 19:52:38 | 显示全部楼层吉林省长春市

保留p标签，多余标签都删掉就行了，很容易

回复

使用道具举报

结帖率：33% (1/3)

发表于 2020-4-22 01:08:34 | 显示全部楼层福建省漳州市

子程序名	返回值类型	公开	备注
过滤代码	文本型		By:Woxl QQ377343266
参数名	类型	参考	可空	数组	备注
原始内容	文本型
过滤HTML	逻辑型
过滤JS	逻辑型
过滤CSS	逻辑型
过滤空格	逻辑型				含制表符
过滤换行符	逻辑型
是否线程中使用	逻辑型

变量名	类型	静态	数组	备注
对象	对象
Ret	文本型

如果真 (是否线程中使用)

CoInitialize (0)
对象.创建 (“VBScript.RegExp”, )
对象.写属性 (“Global”, 1)
对象.写属性 (“Multiline”, 1)
Ret ＝原始内容

如果真 (过滤CSS)

对象.写属性 (“Pattern”, “<\s*style[^>]*>(.|[\r\n])*?<\s*\/style[^>]*>”)

Ret ＝对象.文本方法 (“Replace”, Ret, “”)

如果真 (过滤JS)

对象.写属性 (“Pattern”, “<\s*script[^>]*>(.|[\r\n])*?<\s*\/script[^>]*>”)

Ret ＝对象.文本方法 (“Replace”, Ret, “”)

如果真 (过滤HTML)

对象.写属性 (“Pattern”, “<\/?[^>]+>”)

Ret ＝对象.文本方法 (“Replace”, Ret, “”)

对象.写属性 (“Pattern”, “\&[a-z]+;”)

Ret ＝对象.文本方法 (“Replace”, Ret, “”)

如果真 (过滤空格)

对象.写属性 (“Pattern”, “((?![\r\n])\s)+”)

Ret ＝对象.文本方法 (“Replace”, Ret, “”)

如果真 (过滤换行符)

对象.写属性 (“Pattern”, “\n”)

Ret ＝对象.文本方法 (“Replace”, Ret, “”)
对象.清除 ()

如果真 (是否线程中使用)

CoUninitialize ()
返回 (Ret)

.版本 2<br />
<br />
.子程序 过滤代码, 文本型, 公开, By:Woxl QQ377343266<br />
.参数 原始内容, 文本型<br />
.参数 过滤HTML, 逻辑型, 可空<br />
.参数 过滤JS, 逻辑型, 可空<br />
.参数 过滤CSS, 逻辑型, 可空<br />
.参数 过滤空格, 逻辑型, 可空, 含制表符<br />
.参数 过滤换行符, 逻辑型, 可空<br />
.参数 是否线程中使用, 逻辑型, 可空<br />
.局部变量 对象, 对象<br />
.局部变量 Ret, 文本型<br />
<br />
.如果真 (是否线程中使用)<br />
    CoInitialize (0)<br />
.如果真结束<br />
对象.创建 (“VBScript.RegExp”, )<br />
对象.写属性 (“Global”, 1)<br />
对象.写属性 (“Multiline”, 1)<br />
Ret ＝ 原始内容<br />
.如果真 (过滤CSS)<br />
    对象.写属性 (“Pattern”, “<\s*style[^>]*>(.|[\r\n])*?<\s*\/style[^>]*>”)<br />
    Ret ＝ 对象.文本方法 (“Replace”, Ret, “”)<br />
.如果真结束<br />
.如果真 (过滤JS)<br />
    对象.写属性 (“Pattern”, “<\s*script[^>]*>(.|[\r\n])*?<\s*\/script[^>]*>”)<br />
    Ret ＝ 对象.文本方法 (“Replace”, Ret, “”)<br />
.如果真结束<br />
.如果真 (过滤HTML)<br />
    对象.写属性 (“Pattern”, “<\/?[^>]+>”)<br />
    Ret ＝ 对象.文本方法 (“Replace”, Ret, “”)<br />
    对象.写属性 (“Pattern”, “\&[a-z]+;”)<br />
    Ret ＝ 对象.文本方法 (“Replace”, Ret, “”)<br />
.如果真结束<br />
.如果真 (过滤空格)<br />
    对象.写属性 (“Pattern”, “((?![\r\n])\s)+”)<br />
    Ret ＝ 对象.文本方法 (“Replace”, Ret, “”)<br />
.如果真结束<br />
.如果真 (过滤换行符)<br />
    对象.写属性 (“Pattern”, “\n”)<br />
    Ret ＝ 对象.文本方法 (“Replace”, Ret, “”)<br />
.如果真结束<br />
对象.清除 ()<br />
.如果真 (是否线程中使用)<br />
    CoUninitialize ()<br />
.如果真结束<br />
返回 (Ret)

回复

使用道具举报

发新帖

发布主题 收藏帖子 返回列表

关注微信

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论，本站内容均为会员发表，并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的，严禁用于非法目的，否则造成一切后果自负！如帖子内容侵害到你的权益，请联系我们！
防范网络诈骗，远离网络犯罪违法和不良信息举报电话0663-3422125，QQ： 793400750，邮箱：wp@125.la
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125　增值电信业务经营许可证粤B2-20192173

快速回复 返回顶部 返回列表