今天已经给了一百分！！还是问题没搞定！（）

Question

我想用INET写个东西来测试来源于网络的URL是否还有效！
#
在不下载文件的情况下！我如何取得文件的大小！：）？
又如何知道他的下载速度?
#
如果批量测试！双如何处理INET的异步？（我常常会遇到他说还在处理上一个任何！）

Answer 1

''首先在"部件"中添加 "Microsoft Internet Transfer Control 6.0"Private Sub Command1_Click()
If IsConnect("http://community.csdn.net/Expert/topic/3677/3677405.xml?temp=.5760462") = True Then
    MsgBox "有效!"
Else
    MsgBox "没效"
End If
End Sub
Private Function IsConnect(URL As String) As Boolean
If Trim(Inet1.OpenURL(URL)) <> "" Then
    IsConnect = True
Else
    IsConnect = False
End If
End Function

Answer 2

''首先在"部件"中添加 "Microsoft Internet Transfer Control 6.0"Private Sub Command1_Click()
If IsConnect("http://community.csdn.net/Expert/topic/3677/3677405.xml?temp=.5760462") = True Then
    MsgBox "有效!"
Else
    MsgBox "没效"
End If
End Sub
Private Function IsConnect(URL As String) As Boolean
If Trim(Inet1.OpenURL(URL)) <> "" Then
    IsConnect = True
Else
    IsConnect = False
End If
End Function

Answer 3

谢谢楼上的!!!
但是我要的不是你的那种:)
你想如果是rm这种文件你用inet.openurl()你有没有试过是什么效果:)?