|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Отправка на хостинг
Всем привет)
можете подсказать как отправить какие либо данные на какой нибудь хостинг (сервер там или подобное). Ставь спасибо за спасибо! Помог?Ставь спасибо!Увидел пост? Поставь спасибо! |
#2
|
||||
|
||||
Если хостинг-провайдер сайтов: можно использовать FTP протокол (TIdFTP) для закачки файлов на хостинг.
Работа пpогpаммиста и шамана имеет очень много общего: оба боpмочyт непонятные слова, совеpшают непонятные действия и не могyт объяснить, как оно pаботает. |
#3
|
|||
|
|||
а где найти примеры? очень интересно)
Ставь спасибо за спасибо! Помог?Ставь спасибо!Увидел пост? Поставь спасибо! |
#4
|
||||
|
||||
Код:
var IdMultiPartFormDataStream: TIdMultiPartFormDataStream; begin IdHTTP1.HandleRedirects:=True; IdHTTP1.Request.UserAgent:='Mozilla/3.0'; IdMultiPartFormDataStream:=TIdMultiPartFormDataStream.Create; IdMultiPartFormDataStream.AddFile('file', 'd:\Downloads\clouds.bmp', 'image/bmp'); Memo1.Text:=IdHTTP1.Post('http://zalil.ru/upload/', IdMultiPartFormDataStream); IdMultiPartFormDataStream.Free; end; Пишу программы за еду. __________________ |
#5
|
|||
|
|||
это на фо а мне на хост нужно
Ставь спасибо за спасибо! Помог?Ставь спасибо!Увидел пост? Поставь спасибо! |
#6
|
||||
|
||||
ну так разницы абсолютно никакой, разве что Content-Type: application/octet-stream.
про FTP тебе уже ответили. Пишу программы за еду. __________________ |
#7
|
|||
|
|||
вот так делаю
Код:
var ftp: TIdFTP; ms: TMemoryStream; begin ftp:=TIdFTP.Create(Application); ms:=TMemoryStream.Create; try try ftp.Host:='vashobmennik.xclan.ru';// ftp àäðåñ ñåðâåðà ftp.Port:=21; ftp.Username:='h77741';//ëîãèí ftp.Password:='ERySHjO9h';//Ïàðîëü ftp.Connect(true, 2000); AssErt(ftp.Connected); ftp.ChangeDir('/');//Óñòàíîâèòü ïàïêó íà ñåðâåðå ftp.Put('c:\file.txt','file.txt',false); //Ôàéë Îòêóäà-Êóäà ShowMessage('Îòïðàâëåíî'); finally ms.Free; ftp.Free; end; except ShowMessage('Íåóäà÷íàÿ ïîïûòêà îòïðàâêè ôàéëà íà ñåðâåð'); end; end; пишет отправлено) но файл не появляется) данные валидны можетее проверить) Ставь спасибо за спасибо! Помог?Ставь спасибо!Увидел пост? Поставь спасибо! |
#8
|
|||
|
|||
ftp://vashobmennik.xclan.ru/ зайди.. и там есть файл file.txt
чудо не правда ли ? |
#9
|
|||
|
|||
блин)
я все сам уже разобрался во всем) другой хост нашел) Ставь спасибо за спасибо! Помог?Ставь спасибо!Увидел пост? Поставь спасибо! |