以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  在线更新  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=41955)

--  作者:bjhxjxcl
--  发布时间:2013/10/31 8:55:00
--  在线更新

按照使用说明设置了用Syscmd.Project.Update命令在线升级更新,调试后出现:

 

.NET Framework 版本:2.0.50727.5472
Foxtable 版本:2013.10.13.1
错误所在事件:在线升级失败!
详细错误信息:
值不能为空。
参数名: path1

 

由于帮助文件说明太少,path1是什么东东?求解。

 

另按照帮助文件说,互联网升级更新地址为“http://www.xxxx.com/xxxx...”,可设置成IP地址吗?

 

 


--  作者:Bin
--  发布时间:2013/10/31 8:59:00
--  
是否地址或者版本日期没有设置?
--  作者:bjhxjxcl
--  发布时间:2013/10/31 9:11:00
--  
都设了
--  作者:bjhxjxcl
--  发布时间:2013/10/31 9:13:00
--  
是按局域网模式设置,都能提示发现新版本,就是在升级时出错
--  作者:Bin
--  发布时间:2013/10/31 9:13:00
--  
文件发出来看看.
--  作者:bjhxjxcl
--  发布时间:2013/10/31 9:25:00
--  

以下是BeforeOpenProject代码:

 

Dim v As String = FileSys.GetParentPath(e.File) & "\\ip.txt"
Dim f As String = FileSys.GetParentPath(e.File) & "\\ip0.txt"
If FileSys.FileExists(v) = False Or FileSys.FileExists(f) = False Then
    e.Cancel = True
    e.HideSplashForm = True
    MessageBox.show("文件丢失,无法打开此项目.")
Else
    Dim ipdz,IP,s() As String
    Dim n As Integer
    e.HideSplashForm = True
    ipdz = FileSys.ReadAllText(v)
    s = ipdz.Split(vbcrlf)
    If InputValue(n, "选择网络连接","0:使用内网; 1:使用外网") Then
        IP = s(n)
        If InputValue(IP,"选择网络连接","请校验IP地址: ") Then
            FileSys.WriteAllText(f,IP,False)
            If n = 0 Then
                RemoteUpdate = False
                UpdatePath = "\\\\bimmo-think\\download\\jnzy\\绩效考核"
            Else
                RemoteUpdate = True
                UpdatePath = “http://127.0.0.1/download/jnzy/绩效考核” ’此处能否用IP
            End If
            Syscmd.Project.Update(True,True) ’调试采用局域网模式,执行时能提示发现新版本,确认升级后就出现错误
        Else
            e.Cancel = True
            MessageBox.show("用户放弃打开此项目.")
        End If
    Else
        e.Cancel = True
        MessageBox.show("用户放弃打开此项目.")
    End If
End If


--  作者:Bin
--  发布时间:2013/10/31 9:27:00
--  
http://127.0.0.1/download/jnzy/绩效考核 晕 你这是本地路径啊

IP是没问题的,主要你可以访问这个地址的话.

--  作者:bjhxjxcl
--  发布时间:2013/10/31 9:33:00
--  

知道,做调试用,还没试外网。主要是局域网模式下就出错,不解。


--  作者:Bin
--  发布时间:2013/10/31 9:34:00
--  
不要用变量设置,直接在项目属性中设置看看是否正常.
--  作者:bjhxjxcl
--  发布时间:2013/10/31 9:48:00
--  

知道了。不能在项目打开前使用Syscmd.Project.Update(True,True),因为此时没有项目发布日期,不能做比较。在菜单中增加按纽,就没问题。

多谢。