Показать сообщение отдельно
Старый 13.07.2010, 16:19   #6
turBO
ПроЭктировщик
 
Аватар для turBO
 
Регистрация: 02.03.2007
Сообщений: 194
Написано 65 полезных сообщений
(для 168 пользователей)
Ответ: HTTP-протокол. ACCESS DENIED

Сообщение от ABTOMAT Посмотреть сообщение
надо сначала хост объвлять, а уж потом get/post
Да хост объявлен. Вот полный код:
pot=OpenTCPStream("www.xxx.com" ,80)
Color 255,0,0: If Not pot Print  "Failed.":WaitKey:End  
Print  "Соединение прошло успешно! Посылка запроса..."  
WriteLine pot,"GET /index.php HTTP/1.1"
WriteLine pot,"Host: xxx.com"
If  Eof(pot) Print  "Ошибка.":WaitKey:End
Print "Послан запрос! Ожидание ответа..." 
Color 255,255,255: WriteLine pot,Chr$(10)
While Not Eof(pot)
    DebugLog(ReadLine(pot))
    ;Print ReadLine$(pot)
Wend
Color 255,0,0
If  Eof(pot)=1  Then  Print  "Операция успешно завершена!" Else  Print  "Error!" 
CloseTCPStream pot
WaitKey
End
У меня ведь какая задача: хранить некоторую информацию на сервере (records-лист и пр.), и для решения этой задачи я выбрал PHP+MySQL базу. Но внести (или хотя бы считать со страницы) информацию не удаётся. Может, есть другие варианты решения?
__________________
— Скажи мне, что это не бомба.
— Хорошо. Это котенок. Замечательный взрывной котенок.
(Offline)
 
Ответить с цитированием