SendData Example for Visual Basic

    'send a command set, then a data set
    LEADDICOM2.InitCS COMMAND_C_STORE, True
    LEADDICOM1.InitDS DICOM_CLASS_CR_IMAGE_STORAGE, 0
    'client is sending data
    LEADDICOMNet1.SendData LEADDICOMNet1.hNet, 1, LEADDICOM2.hDicomDS, LEADDICOM1.hDicomDS