求助：VB6.0 list box 的Text 读取 http中的txt
现有一个HTTP中的文档，地址如下：http://192.168.1.253/vedio/1.txt
1.txt中的内容如下：
播放文件1
播放文件2
播放文件3
播放文件4
……
想让form1中的List1 的text以列表的形式显示1.txt中的内容，求方法！
附：已知打开的磁盘中的txt代码如下，但是把磁盘中的txt路径换成http://192.168.1.253/vedio/1.txt 运行程序就假死。求解决方法！
List1.Clear On Error Resume Next Dim Temp As String Dim FileNumber As Long '读取txt文件内容到List1中 FileNumber = FreeFile Open ("C:\1.txt") For Input As #FileNumber Do While Not EOF(FileNumber) Line Input #FileNumber, Temp List1.AddItem Temp Loop Close #FileNumber