TATYSIY
Листья"
Воскресенье, 21 Июля 2013 г. 15:51 (ссылка) + в цитатник Прочитало: 11 за час / 25 за сутки1.
2.?3.?4.?5.?6.?7.?8.?9.?10.?11.?12.?13.?14.?15.?16.?17.?18.?19.?20.?21.?22.?23.?24.?25...
Sub test()??? Dim H, S??? Set H = CreateObject("Microsoft.XMLHTTP")??? H.Open "GET", http://www.163.com/test.exe, False?? '文件網(wǎng)址??? H.send??? ??? Set S = CreateObject("ADODB.Stream")??? S.Type = 1 '二進(jìn)制...