帮我分析一下这个源代码！

测试小酱油呀

.版本 2
.支持库 internet

账号 ＝ 编辑框_登陆账号.内容
密码 ＝ 编辑框_登陆密码.内容
.如果 (连接FTP服务器 (“*****”, “*****”, “******”, , ) ＝ 真)
     文件_存在 ＝ FTP目录列表 (“/wwwroot/1/” ＋ 账号 ＋ “.ini”, , , , , )
     .如果 (文件_存在 ≠ 0)
         目录存在 ＝ 目录_是否存在 (“c:\Ulint.`”)
         .如果 (目录存在 ＝ 真)

         .否则
             创建目录 (“c:\Ulint.`”)
         .如果结束
         保存目录 ＝ “c:\Ulint.`\”
         FTP文件下载 (“/wwwroot/1/” ＋ 账号 ＋ “.ini”, 保存目录 ＋ 账号 ＋ “.ini”, 假)
         读出密码 ＝ 读配置项 (保存目录 ＋ 账号 ＋ “.ini”, “Uint”, “Lint”, )
         配置时间 ＝ 读配置项 (保存目录 ＋ 账号 ＋ “.ini”, “Uint”, “Sint”, )
         ' 删除文件 (保存目录 ＋ 账号 ＋ “.ini”)
         .如果 (读出密码 ＝ 密码)
             网页文本 ＝ 到文本 (HTTP读文件 (“http://www.time.ac.cn/stime.asp”))  ' 这是国家授时中心网络服务器时间发布网站
             所需文本 ＝ 分割文本 (网页文本, “服务器时间:”, )  ' 将取回的文本分割，因为我们需要的网络时间在其后面
             .如果真 (取数组成员数 (所需文本) ＜ 2)  ' 判断是否取回所需数据
                 标签15.标题 ＝ “网络连接失败！请稍后再试”
                 图片框1.播放动画 ＝ 假
                 销毁 ()
             .如果真结束
             临时文本 ＝ 所需文本 [2]
             所需文本 ＝ 分割文本 (临时文本, “document.write('”, )
             中间时间 ＝ 分割文本 (所需文本 [3], “')”, )
             年月日 ＝ 中间时间 [1]  ' 取出年/月/日
             临时文本 ＝ 所需文本 [6]
             所需文本 ＝ 分割文本 (临时文本, “var hrs = ”, )
             临时文本 ＝ 所需文本 [2]
             中间时间 ＝ 分割文本 (临时文本, “;”, )
             取到日 ＝ 中间时间 [1]  ' 取出小时
             所需文本 ＝ 分割文本 (临时文本, “var min = ”, )
             临时文本 ＝ 所需文本 [2]
             中间时间 ＝ 分割文本 (临时文本, “;”, )
             取到时 ＝ 中间时间 [1]  ' 取出分钟
             网络时间 ＝ 年月日 ＋ 取到日 ＋ “时” ＋ 取到时 ＋ “分”
             断开FTP服务器 ()
             取到年 ＝ 取文本左边 (年月日, 4)
             取到月 ＝ 文本_取出中间文本 (年月日, “年”, “月”)
             取到日 ＝ 文本_取出中间文本 (年月日, “月”, “日”)
             取到时 ＝ 文本_取出中间文本 (网络时间, “日”, “时”)
             取到年1 ＝ 取文本左边 (配置时间, 4)
             取到月1 ＝ 文本_取出中间文本 (配置时间, “年”, “月”)
             取到日1 ＝ 文本_取出中间文本 (配置时间, “月”, “日”)
             取到时1 ＝ 文本_取出中间文本 (配置时间, “日”, “时”)
             .如果 (配置时间 ＝ “无限制”)
                 标签15.标题 ＝ “登陆成功！到期时间” ＋ 配置时间
             .否则
                 .如果 (到整数 (取到年) ＜ 到整数 (取到年1))
                     标签15.标题 ＝ “登陆成功！到期时间” ＋ 配置时间
                 .否则
                     .如果 (到整数 (取到月) ＜ 到整数 (取到月1))
                         标签15.标题 ＝ “登陆成功！到期时间” ＋ 配置时间
                     .否则
                         .如果 (到整数 (取到日) ＜ 到整数 (取到日1))
                             标签15.标题 ＝ “登陆成功！到期时间” ＋ 配置时间
                         .否则
                             .如果 (到整数 (取到时) ＜ 到整数 (取到时1))
                                 标签15.标题 ＝ “登陆成功！到期时间” ＋ 配置时间
                             .否则
                                 标签15.标题 ＝ “此账号已到期！请充值或续费”
                                 图片框1.播放动画 ＝ 真
                             .如果结束

                         .如果结束

                     .如果结束

                 .如果结束

             .如果结束

         .否则
             断开FTP服务器 ()
             标签15.标题 ＝ “账号或密码错误！”
             返回 ()
         .如果结束

     .否则
         断开FTP服务器 ()
         标签15.标题 ＝ “账号不存在！”
         返回 ()
     .如果结束

.否则
     标签15.标题 ＝ “服务器连接失败！请检查网络是否连接？”
     返回 ()


上面为源代码，  我想问，当登陆成功之后，怎么载入另外一个窗口？
在哪里加入代码比较好？

5609689

.版本 2

如果 (配置时间 ＝ “无限制”)
标签15.标题 ＝ “登陆成功！到期时间” ＋ 配置时间
如果 (到整数 (取到年) ＜ 到整数 (取到年1))
标签15.标题 ＝ “登陆成功！到期时间” ＋ 配置时间
如果 (到整数 (取到月) ＜ 到整数 (取到月1))
标签15.标题 ＝ “登陆成功！到期时间” ＋ 配置时间
如果 (到整数 (取到日) ＜ 到整数 (取到日1))
标签15.标题 ＝ “登陆成功！到期时间” ＋ 配置时间
.如果 (到整数 (取到时) ＜ 到整数 (取到时1))
    标签15.标题 ＝ “登陆成功！到期时间” ＋ 配置时间
.否则
    标签15.标题 ＝ “此账号已到期！请充值或续费”
     图片框1.播放动画 ＝ 真
    返回 ()
.如果结束

载入 (窗口1, , 真)

测试小酱油呀

自顶

天堂ω狮子心

把那些登陆成功的如果《《《  都改成了 如果真 。。》》》   然后在如果真里面的登陆成功提示后面再加上 载入窗口 和 返回()  你试试，因该就OK了

ゆ缠绵游戏

唉 来抽个热闹