包装函数:GD_
描述：从一个单元集里取出某一单元的值。
GD_是一个包装好的函数，存在于登陆器和子进程的验证登陆模板里（不是在DLL或模块里的，作者可以自己修改，一般情况下没必要）
返回值 = GD_(参数一, 参数二)
参数一：xml格式的单元集数据
参数二: 单元名
返回值：参数二单元的单元值
例如：
sData="<xml><state>100</state><message>验证通过</message><randomstr>1276230</randomstr></xml>"
我想从sData中取出state的值，也就是<state>和</state>中间的部份
state值=GD_(sData,"state");
同理 GD_(sData,"message") 就是message单元的值
易语言例子中GD_子程序原型
| 子程序名 | 返回值类型 | 公开 | 备注 |
| GD_ | 文本型 | | 不要修改，GetData简称GD_ 取单元集某单元的数据 |
| 参数名 | 类型 | 参考 | 可空 | 数组 | 备注 |
| KSData | 文本型 | | | | 单元集数据 |
| DataName | 文本型 | | | | 要取的单元名 |
| DataDefVal | 文本型 | | √ | | |
| 变量名 | 类型 | 静态 | 数组 | 备注 |
| stagstr | 文本型 | | | |
| etagstr | 文本型 | | | |
| taglen | 整数型 | | | |
| stagPos | 整数型 | | | |
| etagPos | 整数型 | | | |
| 返回数据 | 文本型 | | | |
| 返回数据 ＝ "" |
| stagstr ＝ "<" ＋ DataName ＋ ">" |
| etagstr ＝ "</" ＋ DataName ＋ ">" |
| taglen ＝ 取文本长度 (stagstr) |
| stagPos ＝ 寻找文本 (KSData, stagstr, , 假) |
| 如果真 (stagPos ＞ 0) |
| etagPos ＝ 寻找文本 (KSData, etagstr, , 假) |
| 如果真 (etagPos － taglen ＞ 1) |
| 返回 (取文本中间 (KSData, stagPos ＋ taglen, etagPos － stagPos － taglen)) |
| 如果真结束 |
| 如果真结束 |
| 如果真 (是否为空 (DataDefVal) ＝ 假) |
| 返回数据 ＝ DataDefVal |
| 如果真结束 |
| 返回 (返回数据) |