Ⅰ 高手:NSF格式的文件用什么打开
用Notes就可以直接打开,这是Notes里边存储的文件,
Notes的客户端有很多地方有下载的阿!
NSF是LOTUS的数据库文件。本人以前开发时也遇到过和你同样的问题,后经多次偿试后解决的方法发表出来,供你参考。
本人用VB操纵NSF数据库,方法如下:
首先,在设计的机器上要安装Lotus系统,并有相应的ID和NSF;
然后,在VB下新建一工程,代码:
Dim session As Object
Dim uiws As Object
Dim db As Object
Dim Doc As Object
Dim View As Object
dim tmp
Set session = CreateObject("notes.notessession")
Set uiws = CreateObject("notes.notesuiworkspace")
Set db = session.GetDatabase("", "NSFNAME.nsf")'你的NSF文件名
Set view = db.GetView("ViewName")'视图名
Set doc = view.GetFirstDocument
Do Until doc Is Nothing
tmp= doc.字段名'
msgbox tmp(0)
doc.updata = "1"
Set doc = view.GetFirstDocument
Loop
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Ⅱ 如何将lotus notes数据库内容读出并写入sql server数据库
以下是一段用LS执行SQL查询的代码,供参考。
Uselsx "*LSXODBC"
Dim con As ODBCConnection
Dim qry As ODBCQuery
Dim result As ODBCResultSet
Dim firstName As String
Dim lastName As String
Dim msg As String
Sub Initialize
Set con = New ODBCConnection
Set qry = New ODBCQuery
Set result = New ODBCResultSet
Set qry.Connection = con
Set result.Query = qry
con.ConnectTo("ATDB")
qry.SQL = "SELECT * FROM STUDENTS"
If Not result.Execute Then
Messagebox result.GetExtendedErrorMessage,, _
result.GetErrorMessage
Exit Sub
End If
REM Display result set properties after Execute
Call DisplayResultSetProperties
msg = "Student names:" & Chr(10)
Do
result.NextRow
firstName = result.GetValue("FIRSTNAME", firstName)
lastName = result.GetValue("LASTNAME", lastName)
msg = msg & Chr(10) & firstName & " " & lastName
Loop Until result.IsEndOfData
Messagebox msg,, "Student Names"
REM Display result set properties after processing
REM result set
Call DisplayResultSetProperties
result.Close(DB_CLOSE)
con.Disconnect
End Sub
Sub DisplayResultSetProperties
If result.IsResultSetAvailable Then
If result.NumRows = DB_ROWSUNKNOWN Then
rows$ = "Not determined yet"
Else
rows$ = Cstr(result.NumRows)
End If
Messagebox _
"NumColumns = " & result.NumColumns & Chr(10) & _
"NumRows = " & rows$ & Chr(10) & _
"IsBeginOfData = " & result.IsBeginOfData & _
Chr(10) & "IsEndOfData = " & result.IsEndOfData & _
Chr(10) & "CurrentRow = " & result.CurrentRow,, _
"Result set properties"
Else
Messagebox "Result set not available",, _
"No result set"
End If
End Sub
其实,Notes的帮助中都有,仔细看看应该没什么问题的。
Ⅲ 如何打开本机上Lotus里的邮件
只要你不拥有LOTUS软件就行,操作方法与你在公司时一样,密码照旧,只是不要双击我的邮件,按下列操作就行了。
打开本机上的邮件,前提是你在前期有做归档操作。
步骤:
1、打开工作台(若是6.5的版本,可在左列“数据库”图标中打开);
2、在工作台空白处,右键选择“打开数据库”,服务器“Local”,点击右下角“浏览”,选择路径lotus\notes\data\archive,当然一般路径为lotus\notes\data下的某一个文件夹(以你使用归档操作时选定的路径为准);
3、选择.nsf文件,OK!