你改成
Sub Initialize
Dim session As New Notessession
Dim doc As Notesdocument
Set doc = session.DocumentContext
Call doc.save(Ture,Ture)
Print "<Html>"
Print "<title>"
Print "Hello!"
Print "</title>"
Print "<body>"
Print "Test is successful!"
Print "</body>"
Print "</html>"
End Sub
慢慢学,不用着急。^_^
请问大哥,有没有对Web用户的限制!如果是匿名能不能运行代理呢?
我现在建立代理的过程为:新建一个代理:
名称:Test
从操作菜单中选择执行,
只运行一次,
内容:Sub Initialize
Dim session As New Notessession
Dim doc As Notesdocument
Set doc = session.DocumentContext
Print "<Html>"
Print "<title>"
Print "Hello!"
Print "</title>"
Print "<body>"
Print "Test is successful!"
Print "</body>"
Print "</html>"
End Sub
然后,在表单建立一个操作热点:@command([toolsrunmacro];"test")
我每次点击这个热点时都显示‘该页无法显示’!多谢大哥不惜赐教!