The Application property returns the name of the active application, namely the Microsoft® CDO for NTS Library. Read-only.
object.Application
String
The Application property always contains the string "Collaboration Data Objects for NTS version 1.2".
The version number of the CDO for NTS Library is available through the Session object's Version property.
' Function: Session_Application
' Purpose: Display the Application property of the Session object
' See documentation topic: Application property
Function Session_Application()
Dim objSession As Object ' or Dim objSession As CDONTS.Session
' error handling ...
Set objSession = CreateObject("CDONTS.Session")
If Not objSession Is Nothing Then
objSession.LogonSMTP("My Name", "myaddress@mycompany.com")
MsgBox "Session's Application property = " & objSession.Application
End If
' error handling
End Function