没用过:Lotus Domino 可以给你一个思路.据我所知,SQL不支持直接从Lotus Domino 中导入数据.如果可能的话,你可以将它导出到:
文本文件/EXCEL文件(这两种文件绝大多数软件都支持,不会Lotus Domino 不支持吧?)
或其他数据格式文件然后再从这个中间文件导入.
文本文件/EXCEL文件(这两种文件绝大多数软件都支持,不会Lotus Domino 不支持吧?)
或其他数据格式文件然后再从这个中间文件导入.
用ls寫,我以前也這樣做. Dim con As New ODBCConnection
Dim qry As New ODBCQuery
Dim result As New ODBCResultSet
Dim firstName As String
Dim lastName As String
Dim msg As String
On Error Goto errorHandler
Set qry.Connection = con
Set result.Query = qry
con.ConnectTo("ATDB")"odbc數据源
qry.SQL = "SELECT * FROM STUDENTS"
result.Execute
result.AddRow
Call result.SetValue("LASTNAME", _
Inputbox$("Last name?", "New student", "Rodriguez"))
Call result.SetValue("FIRSTNAME", _
Inputbox$("First name?", "New student", "Jorges"))
Call result.SetValue("STUDENT_NO", _
Cint(Inputbox$("Student number?", _
"New student", "9999")))
Call result.SetValue("ADDRESS", _
Inputbox$("Address?", "New student", "11 Rogers St."))
Call result.SetValue("CITY", _
Inputbox$("City?", "New student", "Cambridge"))
Call result.SetValue("STATE", _
Inputbox$("State?", "New student", "MA"))
Call result.SetValue("ZIP", _
Inputbox$("Zip?", "New student", "02142"))
Call result.SetValue("CR_TO_DATE", _
Cint(Inputbox$("Credits to date?", "New student", "0")))
result.UpdateRow
result.Close(DB_CLOSE)
con.Disconnect