InstallDefaultVendors()

Object: EHL7Interface.eUtilities

FileName: EHL7Interface.dll

Method

Name: InstallDefaultVendors()

Parameters:    1) strVendorPath (String) the folder to install the files to

Returns: Boolean 

Description: This method will install the default vendor definitions that shipped with EasyHL7 to the folder specified in parameter 1.  The folder must exist and there can be no vendor definition files currently installed in the folder.

Example:

Private Sub VendorTest()

Dim MyInterfaceObj As New EHL7Interface.eUtilities

Dim strVendorPath As String

strVendorPath = "C:\EasyHL7"

If Not MyInterfaceObj.InstallDefaultVendors(strVendorPath)

    MsgBox MyInterfaceObj.LastError

    Set MyInterfaceObj = Nothing

    Exit Sub

Else

    MyInterfaceObj.VendorPath = strVendorPath

End If

End Sub

See Also: VendorPath, OpenVendor(), SetDefaultVendorPath(), HL7Vendors.ExportVendor(), HL7Vendors.ImportVendor(), HL7Vendors.DeleteVendor(), HL7Vendors.ListVendors()