如何获取URL中的文件列表

Question

想做个升级程序，我打算把新版程序ProV1.2.exe放置在WEB服务器的某个子目录下，并在WEB服务器上打开了该目录的“目录浏览”权限，我使用VB该如何获取服务器上的目录列表文件名，从而判断(假设我现在用的是ProV1.0.exe)是否有新版程序可供下载更新了，那又如何判断是否有新版？

Answer 1

Option   Explicit     
  Private   sPath   As   String   '用于存储服务器上的共享目录     
  Private   sName   As   String   '用于存储应用程序名     
  Private   Sub   Form_Load()     
  Dim   s   As   String     
  '从应用程序的命令行参数中取得数据     
  s   =   Trim(Command())     
  Dim   p   As   Integer     
  p   =   InStr(1,   s,   ",")     
  If   p   >   0   Then     
  '取得储服务器上的共享目录     
  sPath   =   Mid(s,   1,   p   -   1)     
  '取得应用程序名     
  sName   =   Mid(s,   p   +   1,   Len(s)   -   p)        
  Else     
  '参数错误则退出     
  MsgBox   "Error",   vbCritical,   ""     
  Unload   Me     
  End     
  End   If     
  End   Sub     '根据FileDateTime去判断是否有新版本,FileDateTime为修改时间