xferconstants.bas

使用winsock控件进行大文件传输

Attribute VB_Name = "xferConstants"
'system control comunication constants
Global Const CANCEL_TRANSFER As String = "1"
Global Const ACCEPT_TRANSFER As String = "2"
'Global Const BEGIN_TRANSFER As String = "3"
Global Const END_TRANSFER As String = "4"
Global Const FILE_NAME As String = "5"
Global Const FILE_SIZE As String = "6"
Global Const USER_NAME As String = "7"