FTP上传示例代码

  Code //Little sample showing how to upload file to a FTP using //Wininet component. :D program upoader; {$apptype console} uses windows, wininet; var intconn,intopen : hinternet; procedure UploadMyF

>>阅读原文<<