Ⅰ 高手: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!