批量查询快递单号软件含模块

易语言 2020-04-16 17:15:14

批量查询快递单号软件含模块

.计次循环首 (总行, i)
.如果真 (i = 1)
重定义数组 (m_快递详细, 假, 总行)
.如果真结束
m_快递详细 [i].单号 = 超级列表框_缩略.取标题 (i - 1, 1)
快递.匹配公司 (m_快递详细 [i].单号, 公司索引)
m_快递详细 [i].搜索索引_匹配数量 = 取数组成员数 (公司索引)
.计次循环首 (m_快递详细 [i].搜索索引_匹配数量, j)
.如果真 (j = 1)
重定义数组 (m_快递详细 [i].搜索索引, 假, m_快递详细 [i].搜索索引_匹配数量)
.如果真结束
m_快递详细 [i].搜索索引 [j].公司 = 公司索引 [j]
m_快递详细 [i].搜索索引 [j].详细_匹配数量 = 快递.查快递 (m_快递详细 [i].单号, m_快递详细 [i].搜索索引 [j].公司, m_快递详细 [i].搜索索引 [j].详细)
.计次循环首 (m_快递详细 [i].搜索索引 [j].详细_匹配数量, k)
.如果真 (k = 1 且 j = 1)
超级列表框_缩略.置标题 (i - 1, 2, 快递.索引_转公司 (m_快递详细 [i].搜索索引 [j].公司))
超级列表框_缩略.置标题 (i - 1, 3, m_快递详细 [i].搜索索引 [j].详细 [k].时间)
超级列表框_缩略.置标题 (i - 1, 4, m_快递详细 [i].搜索索引 [j].详细 [k].动态)
.如果真结束

.计次循环尾 ()
.计次循环尾 ()
.计次循环尾 ()