狂赠：求VB下的一个FTP程序，只要求下载，不用上传的。

Question

本人要做一个下载程序，需用到的变量如下：
ip地址,用户名，密码，文件路径，文件名。
要求：程序能实现从某个FTP站点下载指定的文件到本地应用程序所在文件夹。
100分狂赠！不够再加！

Answer 1

Private Declare Function URLDownloadToFile Lib "urlmon" _
   Alias "URLDownloadToFileA" _
  (ByVal pCaller As Long, _
   ByVal szURL As String, _
   ByVal szFileName As String, _
   ByVal dwReserved As Long, _
   ByVal lpfnCB As Long) As Long
   
Private Sub Command1_Click()   Dim sourceUrl As String
   Dim targetFile As String
   
   sourceUrl = "ftp://用户名:密码@xxxx.com/kk.txt"
   targetFile = "c:\WINDOWS\Desktop\kk.txt"
   URLDownloadToFile 0&, sourceUrl, targetFile, 0&, 0
End Sub这么好的方法，再加多少分？

Answer 2

兄弟，不好意思，借贵宝地一用：
我单位招人，让我联系一下深圳某报社招聘
岗位：网络管理维护工程师 1名
要求：
1.男性，25岁以内，大学本科以上(含本科)学历；
2.有大中型局域网一至两年的管理维护经历；
3.具有windows应用编程能力者优先。有意者请将简历发至[email protected]
合则约见
有效期至2003年11月30日薪酬嘛，媒体单位在深圳还算是中上水平奥！

Answer 3

http://www.mentalis.org/vbexamples/vbexample.php?vbexample=WINFTP