如何记录文档的访问次数

fish5678

我开始在 postopen中，加了代码，将访问次数写入文档中的一个域。但是对于读者没有执行权限。有打算作个代理来做这个事情。
但是用getagent获得代
再用agent.run的时候出错，说是什么后台嵌入什么的。

难道 postopen事件中不允许调用 代理吗？

多谢！

oleaster

在WebQueryOpen中调用代理不行吗？
Sub Initialize
        Dim cursec As New notessession
        Dim curdb As notesdatabase
        Dim curdoc As notesdocument
        Dim tmpdoc As notesdocument
        Dim docid As Variant
       

       
        Set curdb=cursec.currentdatabase
        Set curdoc=cursec.documentcontext
        docid=curdoc.MainID
        TmpCount=curdoc.ClickTimes(0)+1
        Set tmpdoc = curdb.GetDocumentByUNID(docid(0))
        tmpdoc.ClickTimes=TmpCount
        Call tmpDoc.save(True,True)
       
        Exit Sub
End Sub

fish5678

先谢了。本来是打算用来统计客户端访问次数的，好象用这个不行。
不过我也做了一个统计web访问次数的表单，做了一个代理，从菜单中运行都没有错误。
可是在webqueryopen 事件中，使用@command([ToosMacRun];"hitcounts") 却返回错误。
查看日志 说是：invalid document identifier：http://download.nsf/XXXXXX/XXXXXX?opendocument 错误。
如果把调用代理的语句删除，把这个地址输入浏览器，则返回正确结果。

蒙了。

fish5678

搞清楚了。
代理选择了 “选定文档”这样不行。

fish5678

我还想问，如何统计从客户端访问文档的次数？

请多帮忙

bbqgame

之前oleaster 所说的不是解答“如何统计从客户端访问文档的次数？”这个问题吗？

fish5678

我把那个代理放到 postopen 或 queryopen中，执行就不好用。
而放在webqueryopen中，只能统计从web访问文档的次数

fish5678

顶一下，哪位仁兄告诉一下从客户端访问文档的访问次数怎么做啊？

fish5678

再顶一下，哪位仁兄告诉一下从客户端访问文档的访问次数怎么做啊？

icerain_1

可以在postopen中写代码实现

chenybin

看来这样可以

我以前就是忘记写那个Call doc.Save

在PostOPen吗

看看再说