Тема: Сеть
Показать сообщение отдельно
Старый 31.01.2011, 18:19   #7
impersonalis
Зануда с интернетом
 
Аватар для impersonalis
 
Регистрация: 04.09.2005
Сообщений: 14,014
Написано 6,798 полезных сообщений
(для 20,935 пользователей)
Ответ: Сеть

Почему тема в разделе "3D-программирование"?!?!!1раз
Чуть-ли не половина вопросов по 3д нифига таковыми не является.

Сообщение от Dstalk Посмотреть сообщение
Где-то здесь лежала функция от Tadeus`а, не могу найти. Функция рабочая, недавно проверял. Правда если файлы большие то может не докачать, надо ее дорабатывать... Нашел у себя:
Function httpGetFile(http_url$,savename$)

    If Left$(http_url$,7)="http://" Then
        http_url$=Mid$(http_url$,8)
    EndIf
    If Instr(http_url$,"/") Then
        http_host$=Left$(http_url$,Instr(http_url$,"/")-1)
        http_file$=Mid$(http_url$,Instr(http_url$,"/"))
    Else
        http_host$=http_url$
        http_file$="/"
    EndIf
Знакомая избыточность с конструкциями nstr(http_url$,"/")... Где это я видел? Ну-ка - ну-ка:
http://forum.boolean.name/showpost.p...40&postcount=9
Копиарйты не забываем (копипаст из проекта? - возьмите за правило: писать в чужих функциях своего проекта копирайт автора и ссылку).
__________________
http://nabatchikov.com
Мир нужно делать лучше и чище. Иначе, зачем мы живем? tormoz
А я растила сына на преданьях
о принцах, троллях, потайных свиданьях,
погонях, похищениях невест.
Да кто же знал, что сказка душу съест?
(Offline)
 
Ответить с цитированием
Эти 2 пользователя(ей) сказали Спасибо impersonalis за это полезное сообщение:
DStalk (31.01.2011), MOrtAl44444 (31.01.2011)