我也来发个 取URL参数

凌哥

https://bbs.125.la/thread-14241261-1-1.html

https://bbs.125.la/thread-14241714-1-1.html

嘿嘿...

  

子程序名	返回值类型	公开	备 注
L_网页_解析请求参数	逻辑型		如 http://127.0.0.1:81/?b=456&ab=123 解析的是 b=456;ab=123 这些内容
参数名	类 型	参考	可空	数组	备 注
url	文本型				可以是完整url，也可以是页面地址
Utf8解码	逻辑型				是否对url信息进行utf8解码，默认为假
返回_请求参数	L_网页_请求参数				接收请求参数的数组变量，数据类型：L_网页_请求参数

变量名	类 型	静态	数组	备 注
局_首次分割	文本型		0
局_问号位置	整数型
局_临时文本	文本型
局_成员数	整数型
局_等号位置	整数型
局_name	文本型
局_value	文本型
局_计次	整数型
i	整数型

清除数组 (返回_请求参数)
局_问号位置 ＝ 寻找文本 (url, “?”, , 假)
如果真 (局_问号位置 ＝ -1)
返回 (假)
局_临时文本 ＝ 取文本右边 (url, L_文本_取长度 (url) － 局_问号位置)
局_首次分割 ＝ 分割文本 (局_临时文本, “&”, )
局_成员数 ＝ L_数组_取成员数 (局_首次分割)
重定义数组 (返回_请求参数, 假, 局_成员数)
计次循环首 (局_成员数, i)
局_等号位置 ＝ 寻找文本 (局_首次分割 [i], “=”, , 假)
如果真 (局_等号位置 ≠ -1)
局_name ＝ 取文本左边 (局_首次分割 [i], 局_等号位置 － 1)
如果真 (局_name ＝ “”)
到循环尾 ()
局_value ＝ 取文本右边 (局_首次分割 [i], L_文本_取长度 (局_首次分割 [i]) － 局_等号位置)
局_计次 ＝ 局_计次 ＋ 1
如果真 (Utf8解码)
局_name ＝ L_编码_url解码_utf8 (局_name)
局_value ＝ L_编码_url解码_utf8 (局_value)
返回_请求参数 [局_计次].name ＝ 局_name
返回_请求参数 [局_计次].value ＝ 局_value

计次循环尾 ()
重定义数组 (返回_请求参数, 真, 局_计次)
返回 (真)

数据类型名	公开	备 注
L_网页_请求参数
成员名	类 型	传址	数组	备 注
name	文本型
value	文本型

.版本 2<br /> <br /> .子程序 L_网页_解析请求参数, 逻辑型, 公开, 如 http://127.0.0.1:81/?b=456&ab=123 解析的是 b=456;ab=123 这些内容<br /> .参数 url, 文本型, , 可以是完整url，也可以是页面地址<br /> .参数 Utf8解码, 逻辑型, 可空, 是否对url信息进行utf8解码，默认为假<br /> .参数 返回_请求参数, L_网页_请求参数, 可空 数组, 接收请求参数的数组变量，数据类型：L_网页_请求参数<br /> .局部变量 局_首次分割, 文本型, , "0"<br /> .局部变量 局_问号位置, 整数型<br /> .局部变量 局_临时文本, 文本型<br /> .局部变量 局_成员数, 整数型<br /> .局部变量 局_等号位置, 整数型<br /> .局部变量 局_name, 文本型<br /> .局部变量 局_value, 文本型<br /> .局部变量 局_计次, 整数型<br /> .局部变量 i, 整数型<br /> <br /> 清除数组 (返回_请求参数)<br /> 局_问号位置 ＝ 寻找文本 (url, “?”, , 假)<br /> .如果真 (局_问号位置 ＝ -1)<br />     返回 (假)<br /> .如果真结束<br /> 局_临时文本 ＝ 取文本右边 (url, L_文本_取长度 (url) － 局_问号位置)<br /> 局_首次分割 ＝ 分割文本 (局_临时文本, “&”, )<br /> 局_成员数 ＝ L_数组_取成员数 (局_首次分割)<br /> 重定义数组 (返回_请求参数, 假, 局_成员数)<br /> .计次循环首 (局_成员数, i)<br />     局_等号位置 ＝ 寻找文本 (局_首次分割 <i>, “=”, , 假)<br />     .如果真 (局_等号位置 ≠ -1)<br />         局_name ＝ 取文本左边 (局_首次分割 <i>, 局_等号位置 － 1)<br />         .如果真 (局_name ＝ “”)<br />             到循环尾 ()<br />         .如果真结束<br />         局_value ＝ 取文本右边 (局_首次分割 <i>, L_文本_取长度 (局_首次分割 <i>) － 局_等号位置)<br />         局_计次 ＝ 局_计次 ＋ 1<br />         .如果真 (Utf8解码)<br />             局_name ＝ L_编码_url解码_utf8 (局_name)<br />             局_value ＝ L_编码_url解码_utf8 (局_value)<br />         .如果真结束<br />         返回_请求参数 [局_计次].name ＝ 局_name<br />         返回_请求参数 [局_计次].value ＝ 局_value<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 重定义数组 (返回_请求参数, 真, 局_计次)<br /> 返回 (真)<br /> .版本 2<br /> <br /> .数据类型 L_网页_请求参数, 公开<br />     .成员 name, 文本型<br />     .成员 value, 文本型

2765442711

新版在哪里呀！！谢谢

wanzhenghe999

热心回复！

网络注册络员

支持支持支持

aiwuhui1991

最近发这个的挺多

小白很黑

感谢发布原创作品，精易因你更精彩！

七彩缤纷

感谢发布原创作品，精易因你更精彩！

tenliq

看看是什么东西

万化软件

没太明白         

小虎来了

感谢楼主辛苦分享

Mata

看看哈哈哈啊