不用控件,用API copyfile就可以了。
要不就用socket控件。
还是copyfile比较简单呀,如果没有特别要求。
Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long
要么用vb的函数
FileCopy SourceFile,DestinationFile 也可以
要不就用socket控件。
还是copyfile比较简单呀,如果没有特别要求。
Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long
要么用vb的函数
FileCopy SourceFile,DestinationFile 也可以
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货