Как сделать кнопку-ссылку с открытием в браузере по умолчанию?

Вверх ↑

Форумы Между деломКак сделать кнопку-ссылку с открытием в браузере по умолчанию? ← Ctrl12 3Ctrl →

Этот топик читают: Гость

Ответов: 198

Рейтинг: 2

#1: 2013-06-04 08:03:29 ЛС | профиль | цитата

Всем доброго здравия и много пива!
Для тех кто в танке, вопрос в заголовке темы...

карма: 0

Ответов: 5446

Рейтинг: 323

#2: 2013-06-04 08:14:05 ЛС | профиль | цитата

SkyPrinceRus, WinExec, точка doShellExecute

карма: 1

Ответов: 198

Рейтинг: 2

#3: 2013-06-04 08:18:24 ЛС | профиль | цитата

Thank you very much

карма: 0

Ответов: 8926

Рейтинг: 823

#4: 2013-06-04 09:44:21 ЛС | профиль | цитата

SkyPrinceRus, действительно в танке

карма: 19

Ответов: 198

Рейтинг: 2

#5: 2013-06-04 10:14:58 ЛС | профиль | цитата

Леонид писал(а):

SkyPrinceRus, действительно в танке

Тогда еще один вопрос...
Можно ли как-то быстро загрузить файл на сервер, в папку с доступом 777, не прибегая к скриптам PHP и FTP?

карма: 0

Ответов: 5446

Рейтинг: 323

#6: 2013-06-04 10:47:24 ЛС | профиль | цитата

SkyPrinceRus, ну если без PHP и FTP - то либо WebDAV (встроено в Windows, надо только вручную подключить папку), либо SCP (это FTP-поверх-SSH, нужна внешняя программа - например PSCP). Ну или экзотика типа HTTP PUT.

карма: 1

Ответов: 198

Рейтинг: 2

#7: 2013-06-04 10:56:51 ЛС | профиль | цитата

iarspider, Хорошо, спасибо!
Тогда поставлю вопрос иначе... есть простейший скрипт для загрузки файлов http://www.softtime.ru/scripts/upload.php он установлен и настроен... как передать файлик в пост запрос?

карма: 0

Ответов: 5446

Рейтинг: 323

#8: 2013-06-04 11:00:58 ЛС | профиль | цитата

HTTP_Get в режиме POST.
------------ Дoбавленo в 11.00:
[offtop]
М-да... Поддержке POST в HTTP_Get уже 100 лет в обед, а примера в Wiki до сих пор нет.
[/offtop]

карма: 1

Ответов: 4630

Рейтинг: 749

#9: 2013-06-04 11:12:47 ЛС | профиль | цитата

iarspider, так ему вроде upload нужен.

карма: 26

Ответов: 198

Рейтинг: 2

#10: 2013-06-04 12:00:44 ЛС | профиль | цитата

iarspider, Буду очень благодарен, если подскажите, что дальше делать? Куда адрес скрипта вбивать и куда имя файла направить?

code_31165.txt
------------ Дoбавленo в 11.21:

Netspirit писал(а):

iarspider, так ему вроде upload нужен.

Да, мне именно загрузка файла на сервер нужна... с сервера все грузится без проблем и примеры не нужны особо...
------------ Дoбавленo в 11.38:
Я тут еще один компонент нашел )) Только примера в нем нет, к сожалению...

Как-то така должно быть?


Make(delphi)
ver(4.04 build 185)
Add(MainForm,2953706,21,105)
{
 Width=766
 Height=589
}
Add(Browse,12598600,203,161)
{
 BrowseObj=3
 link(onBrowse,6268515:doValue,[(254,167)(254,146)])
}
Add(Memory,6268515,280,140)
{
}
Add(Button,9542592,147,161)
{
 Left=125
 Top=160
 link(onClick,12598600:doBrowse,[])
}
Add(HTTP_FileUpload,3024452,280,224)
{
 link(onBuild,8204047:doEvent1,[])
 link(FileName,6268515:Value,[])
 link(URL,7614253:Text,[(293,188)(419,188)])
}
Add(Hub,8204047,343,224)
{
 OutCount=3
 link(onEvent1,15429759:doOpen,[])
 link(onEvent2,15429759:doSend,[(367,237)(367,244)])
 link(onEvent3,7208556:doAdd,[(362,244)(362,279)])
}
Add(TCP_Client,15429759,378,224)
{
 Port=80
 link(IP,15204020:Text,[(384,216)(461,216)])
}
Add(Memo,7208556,378,273)
{
 Left=135
 Top=235
 Width=585
 Height=275
}
Add(Edit,7614253,413,119)
{
 Left=125
 Top=55
 Width=525
}
Add(InfoTip,4200899,343,119)
{
 Info=#11:URL Script?|
 Height=25
}
Add(Edit,15204020,455,175)
{
 Left=125
 Top=105
 Width=525
}
Add(InfoTip,15669119,497,175)
{
 Info=#10:IP Server?|
 Height=18
}

------------ Дoбавленo в 11.39:
Вот скрипт приема файла:

<html>
<head>
  <title>Результат загрузки файла</title>
</head>
<body>
<?php
   if($_FILES["filename"]["size"] > 1024*3*1024)
   {
     echo ("Размер файла превышает три мегабайта");
     exit;
   }
   // Проверяем загружен ли файл
   if(is_uploaded_file($_FILES["filename"]["tmp_name"]))
   {
     // Если файл загружен успешно, перемещаем его
     // из временной директории в конечную
     move_uploaded_file($_FILES["filename"]["tmp_name"], "/srv/www/vhosts/cubarium.com/soft/cloaks/".$_FILES["filename"]["name"]);
   } else {
      echo("Ошибка загрузки файла");
   }
?>
</body>
</html>

------------ Дoбавленo в 12.00:
Все, разобрался, спасибо... нужно было имя запроса указать и хост отдельно от ссылки

карма: 0

файлы: 1 code_31165.txt [415B] [116]

Ответов: 4630

Рейтинг: 749

#11: 2013-06-04 12:04:54 ЛС | профиль | цитата

А я схемку сделал

Но не пропадать же добру:


Add(MainForm,11153267,315,280)
{
 Width=629
 Height=486
}
Add(Button,9542592,315,406)
{
 Left=525
 Top=10
 Caption="Select..."
 link(onClick,16763806:doExecute,[])
}
Add(HTTP_FileUpload,3024452,469,525)
{
 Name="filename"
 link(onBuild,8204047:doEvent1,[])
 link(FileName,7614253:Text,[])
 link(URL,15204020:Text,[])
 AddHint(67,15,54,13,Name)
}
Add(Hub,8204047,623,525)
{
 OutCount=4
 link(onEvent1,15429759:doClose,[(674,531)(674,508)(825,508)(825,545)])
 link(onEvent2,3095139:doIPByHost,[])
 link(onEvent3,15429759:doSend,[(674,545)(674,581)(825,581)(825,552)])
 link(onEvent4,7208556:doAdd,[(658,552)(658,664)])
}
Add(TCP_Client,15429759,875,532)
{
 Port=80
}
Add(Memo,7208556,742,658)
{
 Left=30
 Top=150
 Width=560
 Height=275
 ScrollBars=3
}
Add(Edit,7614253,469,406)
{
 Left=65
 Top=10
 Width=450
 Text=""
}
Add(Edit,15204020,476,462)
{
 Left=320
 Top=55
 Width=195
 Text="/upload.php"
}
Add(Host,3095139,721,525)
{
 link(onIPByHost,15429759:doOpen,[])
 link(HostName,8741098:Text,[])
}
Add(Label,8524049,315,189)
{
 Left=35
 Top=60
 Width=29
 Height=17
 Caption="Host:"
}
Add(Edit,8741098,728,427)
{
 Left=65
 Top=55
 Width=195
 Text="localhost"
}
Add(Label,3311355,371,189)
{
 Left=280
 Top=60
 Width=32
 Height=17
 Caption="Page:"
}
Add(Label,558966,315,126)
{
 Left=15
 Top=15
 Width=49
 Height=17
 Caption="Filename:"
}
Add(Button,11953298,399,525)
{
 Left=65
 Top=100
 Width=125
 Height=30
 Caption="Upload"
 link(onClick,3024452:doBuild,[])
}
Add(ODialog,16763806,385,406)
{
 Title="Select file for upload"
 FileName=""
 link(onExecute,7614253:doText,[])
}

карма: 26

Ответов: 5446

Рейтинг: 323

#12: 2013-06-04 12:23:19 ЛС | профиль | цитата

Netspirit писал(а):

iarspider, так ему вроде upload нужен.

Дык HTTP_Get вроде с недавних пор и POST делать умеет.

Netspirit писал(а):

А я схемку сделал

Но не пропадать же добру:

Дык в Wiki её - чтобы было где подсмотреть.

карма: 1

Ответов: 4630

Рейтинг: 749

#13: 2013-06-04 12:26:52 ЛС | профиль | цитата

Так POST для файла ещё сформировать надо.

карма: 26

Ответов: 198

Рейтинг: 2

#14: 2013-06-04 13:11:45 ЛС | профиль | цитата

Netspirit писал(а):

А я схемку сделал Но не пропадать же добру:

Интересная схемка, спасибо, сохраню на всякий случай...
И да, было бы не плохо на вики ее, как говорит уважаемый iarspider

карма: 0

Ответов: 4630

Рейтинг: 749

#15: 2013-06-04 13:22:32 ЛС | профиль | цитата

Может лучше в Examples? Вот, кстати, подготовил более прилично:
code_31171.txt

карма: 26

файлы: 1

code_31171.txt [3.6KB] [346]

Форумы Между деломКак сделать кнопку-ссылку с открытием в браузере по умолчанию? ← Ctrl12 3Ctrl →


Сообщение ...
Прикрепленные файлы (файлы не залиты)