- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 项目文件打不开 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=170816)
-- 发布时间：2021/8/8 13:28:00
-- 项目文件打不开
可以打开程序进行修改，但在保存关闭后输入密码123456却没有任何反应，用admin：密码000登录也没有任何反应，请问我查查哪里出了问题，谢谢！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:工程管理.rar |
-- 发布时间：2021/8/8 20:55:00
--
afteropenproject代码执行死循环了
If sd >=d
Dim i As Integer =1
Do While i<= dr("支付年限")
nr = dt.AddNew
nr("工程编号") = dr("工程编号")
nr("工程类别") = dr("工程类别")
nr("应结工程款日期") = sd.AddYears(1)
nr("需付资金") = dr("镇级应付价") * dr("第" & i & "年")
i = i + 1
Loop
End If