Lotus notes Lotus Notes:Msgbox能否以与log.nsf相同的文本文件打印
您好,我对在我的应用程序的log.nsf中写入日志的消息框有疑问。msgbox在生成日志时正在打印日志,但我已在路径E:\logs\a.txt(手动)中创建了一个文件。我必须将Msgbox消息记录在一个.txt文件中,以便任何人都能告诉我如何修改消息框,使其也能写入txt文件 现在我正在使用此代码打印log.nsf中的日志Lotus notes Lotus Notes:Msgbox能否以与log.nsf相同的文本文件打印,lotus-notes,lotus-domino,lotusscript,lotus,lotus-formula,Lotus Notes,Lotus Domino,Lotusscript,Lotus,Lotus Formula,您好,我对在我的应用程序的log.nsf中写入日志的消息框有疑问。msgbox在生成日志时正在打印日志,但我已在路径E:\logs\a.txt(手动)中创建了一个文件。我必须将Msgbox消息记录在一个.txt文件中,以便任何人都能告诉我如何修改消息框,使其也能写入txt文件 现在我正在使用此代码打印log.nsf中的日志 Messagebox "Error id not found" 还有一些在哪里 Msgbox "Error id not found" 请帮助编辑此代码并将其打印到文本文
Messagebox "Error id not found"
还有一些在哪里
Msgbox "Error id not found"
请帮助编辑此代码并将其打印到文本文件中。使用MessageBox无法实现此目的。不过,您可以使用Print#语句(LotusScript语言)将数据写入文本文件。此示例将在本地光盘上写入日志文件:
Dim fileNum As Integer
fileNum% = Freefile()
Open "d:\logfile.txt" For Output As fileNum%
Print #fileNum%, "Error id not found"
Close fileNum%
使用MessageBox无法实现这一点。不过,您可以使用Print#语句(LotusScript语言)将数据写入文本文件。此示例将在本地光盘上写入日志文件:
Dim fileNum As Integer
fileNum% = Freefile()
Open "d:\logfile.txt" For Output As fileNum%
Print #fileNum%, "Error id not found"
Close fileNum%
为什么不使用NotesLog类呢?它用于所有日志记录目的(文件、代理日志、邮件…) 正如所建议的(谢谢!),一个简单的例子,直接来自帮助数据库:
Sub Initialize
Dim currentLog As New NotesLog( "Checkup Agent" )
Call currentLog.OpenMailLog( "Jimmy Ho", "Log for Checkup Agent" )
Call currentLog.Close
End Sub
日志关闭后,将向Jimmy Ho发送一封邮件
设置日志还有其他方法:文件、代理、邮件和Notes数据库。我通常使用OpenNotesLog,所以我可以登录Notes数据库。该数据库应使用AgentLog模板创建
到文件:
In Declarations:
Dim currentLog As NotesLog
Sub Initialize
Set currentLog As New NotesLog( "My File Log" )
Call currentLog.OpenFileLog( "d:\logfile.txt" )
End Sub
and elsewhere in your code:
Call currentLog.LogError (1001, "Id not found")
日志将自动关闭
还要检查OpenNTF.org中的可以为您做什么。为什么不使用NotesLog类?它用于所有日志记录目的(文件、代理日志、邮件…) 正如所建议的(谢谢!),一个简单的例子,直接来自帮助数据库:
Sub Initialize
Dim currentLog As New NotesLog( "Checkup Agent" )
Call currentLog.OpenMailLog( "Jimmy Ho", "Log for Checkup Agent" )
Call currentLog.Close
End Sub
日志关闭后,将向Jimmy Ho发送一封邮件
设置日志还有其他方法:文件、代理、邮件和Notes数据库。我通常使用OpenNotesLog,所以我可以登录Notes数据库。该数据库应使用AgentLog模板创建
到文件:
In Declarations:
Dim currentLog As NotesLog
Sub Initialize
Set currentLog As New NotesLog( "My File Log" )
Call currentLog.OpenFileLog( "d:\logfile.txt" )
End Sub
and elsewhere in your code:
Call currentLog.LogError (1001, "Id not found")
日志将自动关闭
还可以查看OpenNTF.org提供的服务。#Michael谢谢。我将测试它,让您知道,并将选择最佳答案。请记住:要在基于服务器的代理上写入文件,您需要拥有在该服务器上运行“不受限制”代理的权限,并且代理需要在其安全设置中设置为该模式#Michael谢谢。我将测试它,让您知道,并将选择最佳答案。请记住:要在基于服务器的代理上写入文件,您需要拥有在该服务器上运行“无限制”代理的权限,并且代理需要在其安全设置中设置为该模式。这将是更好的解决方案,如果它包含示例代码…他要求提供“文件日志”。。。为此,我将更改示例代码;-)这将是IMHO更好的解决方案,如果它包含示例代码…他要求提供“文件日志”。。。为此,我将更改示例代码;-)