救救我吧 ，上源码求医。

乱世

还是那个问题   ，在E中F5调试下，没有任何问题。   只要静态编译EXE，再运行EXE程序 ，到换IP的时候就弹出错误窗口  "数组数组成员数下标超出定义范围"

在E中F5调试，没有任何问题。   只要静态编译EXE程序 再运行EXE程序 ，到换IP的时候就弹出错误窗口  "数组数组成员数下标超出定义范围"

下面是源码。

或者有什么更好的解决办法···

.版本 2
.支持库 xplib
.支持库 iext
.程序集 窗口程序集1
.程序集变量 分割文本数组, 文本型, , "0"
.程序集变量 宽带帐号, 文本型
.程序集变量 宽带密码, 文本型
.子程序 __启动窗口_创建完毕
XP风格 (2)
.子程序 _导入帐号_被单击
.局部变量 n, 整数型
通用对话框1.类型 ＝ 0
通用对话框1.打开 ()
分割文本数组 ＝ 分割文本 (读入文本 (打开文件 (通用对话框1.文件名, , ), ), #换行符, )
标签2.标题 ＝ 到文本 (取数组成员数 (分割文本数组))
.计次循环首 (取数组成员数 (分割文本数组), n)
    超级列表框1.插入表项 (n － 1, 到文本 (n), , , , )
    超级列表框1.置标题 (n － 1, 1, 文本_取左边 (分割文本数组 [n], “----”, , ))
.计次循环尾 ()
.子程序 查询_被单击
.局部变量 登录文本, 文本型
.局部变量 IP, ADSL拨号类
.局部变量 外网IP, 文本型
.局部变量 m, 整数型
.局部变量 临时帐号, 文本型
.局部变量 临时密码, 文本型
m ＝ 取数组成员数 (分割文本数组)
.计次循环首 (m, n)
    登录文本 ＝ 彗星HTTP读文本 (“http://jiuyang.com/user/login.php”, “POST”, , , “uname=” ＋ 文本_取左边 (分割文本数组 [n], “----”, , ) ＋ “&pword=” ＋ 文本_取右边 (分割文本数组 [n], “----”, , ), )
    .如果真 (寻找文本 (登录文本, “登录太频繁，请稍后”, , 假) ≠ -1 )
        状态条1.置文本 (1, “正在自动拨号···”)
        超级列表框1.置标题 (n － 1, 2, “换IP中”)
        ' 一到上面这里就出现问题, 【弹出错误  "数组数组成员数下标超出定义范围"】
        外网IP ＝ IP.重拨 (, 宽带帐号, 宽带密码)
        登录文本 ＝ 彗星HTTP读文本 (“http://jiuyang.com/user/login.php”, “POST”, , , “uname=” ＋ 文本_取左边 (分割文本数组 [n], “----”, , ) ＋ “&pword=” ＋ 文本_取右边 (分割文本数组 [n], “----”, , ), )
    .如果真结束

    .如果真 (倒找文本 (登录文本, “密码错误”, , 假) ≠ -1 )
        超级列表框1.置标题 (n － 1, 2, “密码错误”)
        到循环尾 ()
    .如果真结束

    超级列表框1.置标题 (n － 1, 2, “成功登录”)
.计次循环尾 ()

airpppp

十有八九是模块内部"重拨"问题
ip数组出错了!

无与林比

只是抢个沙发而已

下海喂鱼

分割文本数组 ＝ 分割文本 (读入文本 (打开文件 (通用对话框1.文件名, , ), ), #换行符, )
大致看了下,好像是这句错了

zch41022022

{:3_233:}坐等高手~~

乱世

下海喂鱼 发表于 2011-10-18 17:17
分割文本数组 ＝ 分割文本 (读入文本 (打开文件 (通用对话框1.文件名, , ), ), #换行符, )
大致看了下,好像 ...

这句没有错

乱世

快来帮帮我吧，急死了

乱世

airpppp 发表于 2011-10-18 17:30
十有八九是模块内部"重拨"问题
ip数组出错了!

如果说是“重拨”问题的话，那F5调试的时候，完全正常啊。  难道重拨这块不能独立编译

8894188

看了半天，发现代码的参数都不全，没法分析了