我的访问表单上有一点问题.
我有两种形式:
输入表单空闲一分钟后,我想关闭它并返回菜单表单.
这是我的代码不起作用.
Public ExpireTime As Date 'expiration time-date value
Sub ResetExpiration()
If ExpireTime <> 0 And ExpireTime > Now Then
Application.OnTime ExpireTime, "FormExpire", schedule:=False
End If
ExpireTime = Now + 1 / 1440#
Application.OnTime ExpireTime, "FormExpire", schedule:=True
End Sub
Run Code Online (Sandbox Code Playgroud)
我还在其中创建了一个宏.
Sub FormExpire()
Unload input-form
End Sub
Run Code Online (Sandbox Code Playgroud) 我正在为用户目录中的plone设置测试服务器。
我所做的是将生产模式下的整个plone目录复制到用户目录,并将配置更改为另一个端口,并将所有路径从更改为/var/plone,/home/user/plone然后将所有原始端口更改为不同的端口号,例如端口8080和8081,更改为7070和7071。
我还更改了将plone目录的权限授予放置它的用户,并使用该用户的帐户运行扩展。我成功运行了buildout(./bin/buildout),并成功启动了zeo(./bin/zeo start; output daemon process started, pid=13123)。
现在的问题是,当我尝试运行实例(./bin/instance fg)时,出现以下错误:
2012-11-09 18:48:45 WARNING ZEO.zrpc (13136) CW: error connecting to ('127.0.0.1', 7100): ECONNREFUSED
2012-11-09 18:48:50 WARNING ZEO.zrpc (13136) CW: error connecting to ('127.0.0.1', 7100): ECONNREFUSED
2012-11-09 18:49:00 WARNING ZEO.zrpc (13136) CW: error connecting to ('127.0.0.1', 7100): ECONNREFUSED
2012-11-09 18:49:20 WARNING ZEO.zrpc (13136) CW: error connecting to ('127.0.0.1', 7100): ECONNREFUSED
Run Code Online (Sandbox Code Playgroud)
谁能给我一个解决方法?非常感谢。