.

HCLSoftware Business Partner
Domino Consulting Services
CRUCIAL Notes Tools
+1 212-599-2048

Domino Consulting Services
CRUCIAL Notes Tools
Domino administration
Notes development

Facebook Twitter YouTube
Chat now       
.
ProductsDownloadsNewsAbout usContact


Need a Domino Consultant? Call NotesMail +1 212-599-2048 - HCLSoftware Business Partner

LOTUS CONNECTORS

Examples: ODBCConnection class
This agent declares a new ODBCConnection object and connects to a user-specified data source.

Uselsx "*LSXODBC"

Sub Initialize
 Dim con As New ODBCConnection
 con.ConnectTo(Inputbox("ODBC data source name", "DSN"))
 While Not con.IsConnected
   dsn = Inputbox("ODBC data source name", _
   "Connection not made ...")
   If dsn = "" Then Exit Sub
   con.ConnectTo(dsn)
 Wend
 Messagebox "Connected to " & con.DataSourceName,, _
 "Connection made ..."
 con.Disconnect
End Sub

See Also