object.Initialize( [LicenseKey] [,
ModuleName] [, Options] [, Reserved] )
The Initialize method syntax has the following parts:
| Part |
Description |
| object
|
An object expression that
evaluates to an InternetMail object. |
| LicenseKey
|
A string which specifies the
runtime license key. |
| ModuleName
|
A string which specifies the name
of the network module. |
| Options
|
A reserved argument; this argument
is currently unused. |
| Reserved
|
A reserved argument; this argument
is currently unused. |
The Initialize method explicitly loads and initializes
the Windows Sockets networking library. Typically this is not
required because it's done automatically when any action is taken
that requires network access, such as attempting a connection to a
remote host.
The LicenseKey argument specifies a runtime license key
used to initialize the control. Normally this argument is not
needed, since the appropriate license key is used when an instance
of the control is created. However, if an instance of the control
is created using the CreateObject function, the
Initialize method must be called with a valid runtime
license key. If the license key is omitted or passed as an empty
string, a development license must be installed on the local
system.
The ModuleName argument is the full pathname of the
Windows Sockets library loaded by the control. Setting the argument
to the name of an appropriate library causes it to be loaded. If
this argument is not specified, or an empty string is passed as the
value, the default system Windows Sockets library is loaded.
The Options and Reserved arguments are unused and
should not be specified.
A value of zero is returned if the control was initialized
successfully. Otherwise, a non-zero error code is returned which
indicates the cause of the failure.
'
' Create an instance of the InternetMail object
'
Set objMail = WScript.CreateObject("SocketTools.InternetMail.6")
'
' Initialize the object, using the default Windows Sockets
' library and the specified runtime license key; if the key
' is not specified, the development license will be used
'
nError = objMail.Initialize(CSIMXCTL_LICENSE_KEY)
If nError <> 0 Then
WScript.Echo "Unable to initialize the InternetMail control"
WScript.Quit(1)
End If