精易模块 BUG反馈 说明

673150382

模块版本：8.3.0
所用系统：Win7 64位）
命令名称：网页_访问  网页_访问S  网页_访问_对象
BUG描述：多线程使用代理IP  设置的超时时间部分线程无效  在代理有效的情况下  

1. * “耗时：” | 577.000000
   
2. * “耗时：” | 577.000000
   
3. * “耗时：” | 624.000000
   
4. * “发送数据耗时：” | 562.000000
   
5. * “耗时：” | 624.000000
   
6. * “耗时：” | 655.000000
   
7. * “耗时：” | 671.000000
   
8. * “发送数据耗时：” | 27269.000000
   
9. * “耗时：” | 27347.000000
   
10. * “发送数据耗时：” | 219.000000
    
11. * “耗时：” | 265.000000
    
12. * “发送数据耗时：” | 249.000000
    
13. * “发送数据耗时：” | 296.000000
    
14. * “发送数据耗时：” | 328.000000
    
15. * “耗时：” | 344.000000
    
16. * “发送数据耗时：” | 265.000000
    
17. * “发送数据耗时：” | 296.000000
    
18. * “耗时：” | 422.000000
    
19. * “发送数据耗时：” | 405.000000
    
20. * “发送数据耗时：” | 327.000000
    
21. * “耗时：” | 358.000000
    
22. * “耗时：” | 452.000000
    
23. * “发送数据耗时：” | 406.000000
    
24. * “耗时：” | 437.000000
    
25. * “耗时：” | 561.000000
    
26. * “耗时：” | 546.000000
    
27. * “耗时：” | 515.000000
    
28. * 1
    
29. * “发送数据耗时：” | 265.000000
    
30. * “耗时：” | 281.000000
    
31. * 58
    
32. * “发送数据耗时：” | 219.000000
    
33. * “发送数据耗时：” | 28329.000000
    
34. * “耗时：” | 327.000000
    
35. * “发送数据耗时：” | 266.000000
    
36. * “耗时：” | 28424.000000
    
37. * 57
    
38. * “发送数据耗时：” | 312.000000
    
39. * “耗时：” | 422.000000
    
40. * “发送数据耗时：” | 375.000000
    
41. * 56
    
42. * 56
    
43. * “发送数据耗时：” | 421.000000
    
44. * “发送数据耗时：” | 406.000000
    
45. * “耗时：” | 499.000000
    
46. * “耗时：” | 514.000000
    
47. * “耗时：” | 562.000000
    
48. * “耗时：” | 624.000000
    
49. * 54
    
50. * “发送数据耗时：” | 1248.000000
    
51. * 53
    
52. * “耗时：” | 1326.000000
    
53. * 52
    
54. * 51
    
55. * 51
    
56. * “发送数据耗时：” | 29235.000000
    
57. * “耗时：” | 29282.000000
    
58. * 49
    
59. * “发送数据耗时：” | 29796.000000
    
60. * “耗时：” | 29843.000000
    
61. * 48
    
62. * “发送数据耗时：” | 30483.000000
    
63. * “耗时：” | 30545.000000
    
64. * 47
    
65. * “发送数据耗时：” | 4243.000000
    
66. * “耗时：” | 4290.000000

复制代码

1. .版本 2
   
2. .支持库 spec
   
3. 
   
4. .子程序 网页_访问_对象, 字节集, 公开, 使用WinHttp的对象方式访问网页
   
5. .参数 网址, 文本型, , 完整的网页地址,必须包含http://或者https://
   
6. .参数 访问方式, 整数型, 可空, 0=GET 1=POST 2=HEAD 3=PUT  4=OPTIONS  5=DELETE  6=TRACE  7=CONNECT
   
7. .参数 提交信息, 文本型, 可空, "POST"专用   自动UTF8编码
   
8. .参数 提交Cookies, 文本型, 参考 可空, 设置提交时的cookie
   
9. .参数 返回Cookies, 文本型, 参考 可空, 返回的Cookie
   
10. .参数 附加协议头, 文本型, 可空, 一行一个请用换行符隔开
    
11. .参数 返回协议头, 文本型, 参考 可空, 返回的协议头
    
12. .参数 返回状态代码, 整数型, 参考 可空, 网页返回的状态代码，例如：200；302；404等
    
13. .参数 禁止重定向, 逻辑型, 可空, 默认不禁止网页重定向
    
14. .参数 字节集提交, 字节集, 可空, 提交字节集数据
    
15. .参数 代理地址, 文本型, 可空, 代理地址，格式为 8.8.8.8:88
    
16. .参数 超时, 整数型, 可空, 秒|默认为15秒,-1为无限等待
    
17. .参数 代理用户名, 文本型, 可空, 用户名
    
18. .参数 代理密码, 文本型, 可空, 密码
    
19. .参数 代理标识, 整数型, 可空, 代理标识，默认为1，0为路由器
    
20. .参数 对象继承, 对象, 可空, 此处可自行提供对象，不再主动创建
    
21. .参数 是否自动合并更新Cookie, 逻辑型, 可空, 默认为真，自动合并更新
    
22. .参数 是否补全必要协议头, 逻辑型, 可空, 当附件协议头为空时自动添加必要的UA协议头 默认为真，假将不再添加非传入协议头
    
23. .参数 是否处理协议头大小写, 逻辑型, 可空, 将协议头中的键名首字母处理为大写  默认为真
    
24. .局部变量 局_访问方式, 文本型
    
25. .局部变量 局_WinHttp, 对象
    
26. .局部变量 局_发送协议头, 文本型, , "0"
    
27. .局部变量 局_返回协议头, 文本型, , "0"
    
28. .局部变量 局_计次, 整数型
    
29. .局部变量 局_网页数据, 字节集
    
30. .局部变量 局_变体提交, 变体型
    
31. .局部变量 局_附加协议头, 文本型
    
32. .局部变量 tt, 整数型
    
33. .局部变量 tt1, 整数型
    
34. 
    
35. tt ＝ 取启动时间 ()
    
36. .如果真 (是否为空 (是否自动合并更新Cookie))
    
37.     是否自动合并更新Cookie ＝ 真
    
38. .如果真结束
    
39. 
    
40. .如果真 (是否为空 (是否补全必要协议头))
    
41.     是否补全必要协议头 ＝ 真
    
42. .如果真结束
    
43. 
    
44. .如果真 (是否为空 (是否处理协议头大小写))
    
45.     是否处理协议头大小写 ＝ 真
    
46. .如果真结束
    
47. 
    
48. 线程_初始化COM库 ()
    
49. 
    
50. .如果真 (访问方式 ＜ 0 或 访问方式 ＞ 7)
    
51.     访问方式 ＝ 0
    
52. .如果真结束
    
53. 局_访问方式 ＝ 多项选择 (访问方式 ＋ 1, “GET”, “POST”, “HEAD”, “PUT”, “OPTIONS”, “DELETE”, “TRACE”, “CONNECT”)
    
54. 
    
55. .判断开始 (是否为空 (对象继承))
    
56.     .如果真 (局_WinHttp.创建 (“WinHttp.WinHttpRequest.5.1”, ) ＝ 假)
    
57.         返回 ({  })
    
58.     .如果真结束
    
59. 
    
60. .默认
    
61.     局_WinHttp ＝ 对象继承
    
62. .判断结束
    
63. 
    
64. 超时 ＝ 6
    
65. .如果真 (超时 ≠ -1)
    
66.     .如果 (超时 ＜ 1)
    
67.         超时 ＝ 15000
    
68.     .否则
    
69.         超时 ＝ 超时 × 1000
    
70.     .如果结束
    
71.     局_WinHttp.方法 (“SetTimeouts”, 超时, 超时, 超时, 超时)
    
72. .如果真结束
    
73. 
    
74. 
    
75. .如果真 (代理地址 ≠ “”)
    
76.     局_WinHttp.方法 (“SetProxy”, 2, 代理地址)
    
77. .如果真结束
    
78. tt1 ＝ 取启动时间 ()
    
79. 局_WinHttp.方法 (“Open”, 局_访问方式, 网址, 假)
    
80. .如果真 (取启动时间 () － tt1 ≥ 5000)
    
81.     调试输出 (“打开连接耗时大于5秒，返回。”)
    
82.     局_WinHttp.清除 ()
    
83.     线程_取消COM库 ()
    
84.     返回 (局_网页数据)
    
85. 
    
86. .如果真结束
    
87. 
    
88. .如果真 (禁止重定向)
    
89.     局_WinHttp.写属性 (“Option”, 6, 0)
    
90. .如果真结束
    
91. 
    
92. 局_WinHttp.写属性 (“Option”, 4, 13056)  ' 忽略错误标志
    
93. 
    
94. 局_附加协议头 ＝ 附加协议头
    
95. .如果真 (是否补全必要协议头)
    
96.     .如果真 (寻找文本 (局_附加协议头, “Accept:”, , 真) ＝ -1)
    
97.         局_附加协议头 ＝ 局_附加协议头 ＋ #换行符 ＋ “Accept: */*”
    
98.     .如果真结束
    
99. 
    
100.     .如果真 (寻找文本 (局_附加协议头, “Referer:”, , 真) ＝ -1)
     
101.         局_附加协议头 ＝ 局_附加协议头 ＋ #换行符 ＋ “Referer: ” ＋ 网址
     
102.     .如果真结束
     
103. 
     
104.     .如果真 (寻找文本 (局_附加协议头, “Accept-Language:”, , 真) ＝ -1)
     
105.         局_附加协议头 ＝ 局_附加协议头 ＋ #换行符 ＋ “Accept-Language: zh-cn”
     
106.     .如果真结束
     
107. 
     
108.     .如果真 (寻找文本 (局_附加协议头, “User-Agent:”, , 真) ＝ -1)
     
109.         局_附加协议头 ＝ 局_附加协议头 ＋ #换行符 ＋ “User-Agent: Mozilla/4.0 (compatible; MSIE 9.0; Windows NT 6.1)”
     
110.     .如果真结束
     
111. 
     
112.     .如果真 (访问方式 ＝ 1)
     
113.         .如果真 (寻找文本 (局_附加协议头, “Content-Type:”, , 真) ＝ -1)
     
114.             局_附加协议头 ＝ 局_附加协议头 ＋ #换行符 ＋ “Content-Type: application/x-www-form-urlencoded”
     
115.         .如果真结束
     
116. 
     
117.     .如果真结束
     
118. 
     
119. .如果真结束
     
120. 
     
121. .如果真 (是否处理协议头大小写)
     
122.     局_附加协议头 ＝ 网页_处理协议头 (局_附加协议头)
     
123. .如果真结束
     
124. 
     
125. .如果真 (代理地址 ≠ “” 且 代理用户名 ≠ “”)
     
126.     .如果真 (是否为空 (代理标识))
     
127.         代理标识 ＝ 1
     
128.     .如果真结束
     
129. 
     
130.     局_WinHttp.方法 (“SetCredentials”, 代理用户名, 代理密码, 代理标识)
     
131.     .如果真 (代理标识 ＝ 1)
     
132.         局_WinHttp.方法 (“SetRequestHeader”, “Proxy-Authorization”, “Basic ” ＋ 编码_BASE64编码 (到字节集 (代理用户名 ＋ “:” ＋ 代理密码)))
     
133.     .如果真结束
     
134. 
     
135. .如果真结束
     
136. 
     
137. .如果真 (取反 (是否为空 (提交Cookies)))
     
138.     .如果真 (取文本长度 (提交Cookies) ＞ 0)
     
139.         .如果真 (寻找文本 (提交Cookies, “Cookie:”, , 真) ≠ -1)
     
140.             提交Cookies ＝ 子文本替换 (提交Cookies, “Cookie:”, “”, , , 假)
     
141.         .如果真结束
     
142. 
     
143.     .如果真结束
     
144.     局_WinHttp.方法 (“SetRequestHeader”, “Cookie”, 提交Cookies)
     
145. .如果真结束
     
146. 
     
147. 
     
148. .判断开始 (寻找文本 (局_附加协议头, #换行符, , 假) ＝ -1)
     
149.     局_WinHttp.方法 (“SetRequestHeader”, 内部_协议头取名 (局_附加协议头), 内部_协议头取值 (局_附加协议头))
     
150. .默认
     
151.     局_发送协议头 ＝ 分割文本 (局_附加协议头, #换行符, )
     
152.     .计次循环首 (取数组成员数 (局_发送协议头), 局_计次)
     
153.         .如果真 (局_发送协议头 [局_计次] ≠ “”)
     
154.             .如果真 (内部_协议头取名 (局_发送协议头 [局_计次]) ＝ “Connection”)
     
155.                 .如果真 (内部_协议头取值 (局_发送协议头 [局_计次]) ＝ “keep-alive”)
     
156.                     到循环尾 ()  ' 筛选排除此参数 避免协议头有此参数 HTTP对象又自动添加此参数
     
157.                 .如果真结束
     
158. 
     
159.             .如果真结束
     
160. 
     
161.             局_WinHttp.方法 (“SetRequestHeader”, 内部_协议头取名 (局_发送协议头 [局_计次]), 内部_协议头取值 (局_发送协议头 [局_计次]))
     
162.         .如果真结束
     
163. 
     
164.     .计次循环尾 ()
     
165. .判断结束
     
166. 
     
167. tt1 ＝ 取启动时间 ()
     
168. .判断开始 (字节集提交 ＝ {  })
     
169.     局_WinHttp.方法 (“Send”, 提交信息)
     
170. .默认
     
171.     局_变体提交.赋值 (字节集提交, )
     
172.     局_WinHttp.方法 (“Send”, 局_变体提交)
     
173. .判断结束
     
174. 调试输出 (“发送数据耗时：”, 取启动时间 () － tt1)
     
175. 
     
176. 局_网页数据 ＝ 局_WinHttp.读属性 (“ResponseBody”, ).取字节集 ()
     
177. 返回协议头 ＝ 局_WinHttp.读文本属性 (“GetAllResponseHeaders”, )
     
178. 返回状态代码 ＝ 局_WinHttp.读数值属性 (“Status”, )
     
179. 局_WinHttp.读文本属性 (“StatusText”, )
     
180. 局_返回协议头 ＝ 分割文本 (返回协议头, #换行符, )
     
181. 返回Cookies ＝ “”
     
182. .计次循环首 (取数组成员数 (局_返回协议头), 局_计次)
     
183.     .如果真 (文本_取左边 (局_返回协议头 [局_计次], “: ”) ＝ “Set-Cookie”)
     
184.         .判断开始 (寻找文本 (局_返回协议头 [局_计次], “;”, , 假) ≠ -1)
     
185.             返回Cookies ＝ 返回Cookies ＋ 删首尾空 (文本_取出中间文本 (局_返回协议头 [局_计次], “Set-Cookie:”, “;”)) ＋ “; ”
     
186.         .默认
     
187.             返回Cookies ＝ 返回Cookies ＋ 删首尾空 (子文本替换 (局_返回协议头 [局_计次], “Set-Cookie:”, , , , 假)) ＋ “; ”
     
188.         .判断结束
     
189. 
     
190.     .如果真结束
     
191. 
     
192. .计次循环尾 ()
     
193. .如果真 (取文本左边 (返回Cookies, 2) ＝ “; ”)
     
194.     返回Cookies ＝ 取文本左边 (返回Cookies, 取文本长度 (返回Cookies) － 2)
     
195. .如果真结束
     
196. 
     
197. 
     
198. .如果真 (是否自动合并更新Cookie)
     
199.     .如果真 (取反 (是否为空 (提交Cookies)))
     
200.         返回Cookies ＝ 网页_Cookie合并更新 (提交Cookies, 返回Cookies)
     
201.     .如果真结束
     
202. 
     
203. .如果真结束
     
204. 局_WinHttp.清除 ()
     
205. 线程_取消COM库 ()
     
206. 调试输出 (“耗时：”, 取启动时间 () － tt)
     
207. 返回 (局_网页数据)
     

复制代码

我的联系QQ：

@项目部004

星辰月神

模块版本：8.20
所用系统：Win10 64X
命令名称：网页_访问S
BUG描述：网页_访问S 中返回状态文本
返回的内容似乎有隐藏字节集 调试中看不出来但是 转换字节集会长一个字节集


https://i.l o l i.net/2020/06/09/IYBbOQE25gXiPJ7.png
我的联系QQ：410855403

@项目部004

linyingbiu

模块冲突搞错了

星辰月神

模块版本：8.20
所用系统：Win10
命令名称：json.取通用属性
BUG描述：解析json文本
{"tm":"\t( )反映社会进步的发展方向,引领时代的进步潮流,是社会的主旋律和时代的最强音。","da":"时代精神"}
json.取通用属性("da") 返回值错误 返回了 [object Object]

我的联系QQ：410855403

@项目部004

补充内容 (2020-6-9 17:16):
这样说的话可能得同步改一下 精易编程助手 里面JSON解析的功能
因为助手里面生成的话是 json.取通用属性("da")

补充内容 (2020-6-9 17:16):
@项目部004

asdasz

没问题，是我搞错了

我来兜兜风

使用的模块的odbc类，第一次读取字段文本没问题，第二次读取就是字段很奇怪的空白长度文本，不知道是不是bug

a78776756

图片_屏幕区域截图
这个命令,参数4个0会数组下标超出范围

我来兜兜风

我来兜兜风 发表于 2020-5-18 11:56
精易皮肤模块4.0
在用皮肤模块时，调用精易模块类_odbc读取Access数据库，程序直接崩溃，卸载皮肤模块后恢 ...

更进一步发现，是皮肤_加载（）和类_odbc冲突，skin_加载_文件1()，但是小破衣解决不了

我来兜兜风

精易皮肤模块4.0
在用皮肤模块时，调用精易模块类_odbc读取Access数据库，程序直接崩溃，卸载皮肤模块后恢复正常

917622157

模块版本：8.2
所用系统：win10 64
命令名称：进程_名取句柄
BUG描述：跟以前老版本取出来的shuj不一样 这个取出的句柄不对
我的联系QQ：917622157

@项目部004