下面是引用 n3ph223172 于 2011-08-11 22:39 发表的 :
 
原来如此，小弟了解了。
想必这份源码一定能让小弟进步许多^^!

下面是引用 ebolaman 于 2011-08-11 22:46 发表的 :


没想到一个启动器竟会如此难做

写这个专案也让我自身进步不少，毕竟我以前都是在写 VB6，很少碰 VB2010

这才发现 VB 2010 有很多很棒的设计，例如档案处理部分用 My.Computer.FileSystem 底下的东西就能一行搞定


不过要做出那种  "复制中...剩余 几%"  还是要回归基本的 buffer 读取，而这个 Launcher 我没这么做，都是用一行搞定

缺点就是没办法用进度列来表示，档案太大还会造成 视窗无回应

下面是引用 n3ph223172 于 2011-08-12 01:37 发表的 :
小弟请问下，若打包成rar可以下载吗？

下面是引用 ebolaman 于 2011-08-12 12:43 发表的 CSOLauncher Simulation 第三版:
这次改成了呼叫 WinRAR 来解压缩

缺点是，不知道没装 WinRAR 的人能不能解压缩，不过应该都会有吧，不然当初怎么下载游戏的

另外原本需要的两个 DLL 现在也不用了



另外我还做了一个小程式，叫作 Find And RAR

把这个小程式放在 FTP 目录下，然后执行，就能将每个档案，分别 压缩起来 (RAR型式，且包含副档名)

可以方便 FTP伺服端 档案的操作

下面是引用 n3ph223172 于 2011-08-13 01:21 发表的 :
小弟测试后，却发生这样的问题…
小弟不明哪里作错了…
[attachment=769144]

Err_1:
        MsgBox(Err.Description)
        Return Err.Number

下面是引用 ebolaman 于 2011-08-13 09:10 发表的 :


有可能是 FTP连线出错 (位址不正确、帐密不正确，有的帐号必须加入 @XXXX)

或是找不到 FTP端 的档案 (Index.txt 内容错误)



如何侦错：

在 [Class] >> cls_net.vb >> Function ftp_download 中

最底下的  Err_1:  下加上  MsgBox(Err.Description)


改成这样，然后再执行一次

复制程式

 
Err_1: 
        MsgBox(Err.Description) 
        Return Err.Number 

P.S. 我明天到下礼拜天都会不在，到时候可能要你自己研究一下了..