Помощь в создании подкастов

[linkey]

Подскажите, как в скрипте запустить файл с диска?

[slawa321]

какой файл ,если текстовый -там есть функция ,а вот ехе -думаю это уже можно вируса делать.

ExecuteOpenDialog(const aTitle, aFilter, aInitialDir, aDefaultExt: string; var aFileName: string): Boolean
Поиграйся с этим -сильно похоже ,я не пробовал .Хотя нет -это только диалог.

[linkey]

какой файл ,если текстовый -там есть функция ,а вот ехе -думаю это уже можно вируса делать.

ExecuteOpenDialog(const aTitle, aFilter, aInitialDir, aDefaultExt: string; var aFileName: string): Boolean
Поиграйся с этим -сильно похоже ,я не пробовал .

это ExecuteOpenDialog просто открывает диалоговое окно выбора файла, а потом записывет имя файла в переменную. Мне бы хотелось именно запустить bat или exe файл. Похоже такого нету((
Или еще можно было бы скачать страницу с поддержкой cookie, но такого тоже не нашел. (имя пользователя и пароль в настройках не канают)

[slawa321]

Остается один вариант -через Ole ,тут он работает :
Вот пример с Вордом :

var
wd:variant;

begin
// Открыть word:
wd:=CreateOleObject('Word.Application');
// открыть документ -предворительно создай не пустой документ
wd.documents.open('c:\1.doc');
// сохранить:
wd.activedocument.saveas('c:\2.doc');
// выход из word:
wd.application.quit(true,0);
end.

Надо только чтоб твое приложение поддерживало Ole.Пример работает -проверь ,если ворд запускается ,то и другое нужно подумать как запустится .Хотя ворд поддерживает бейсиковые скрипты ,я думаю там такого можно наворотить раз он запустился и документ со скриптами открыл.

[slawa321]

раз ты хотел открыть какую то страничку ,вот пример для открытия страницы яндекса :

var
IE:variant;

begin

IE:= CreateOleObject('InternetExplorer.Application');
IE.Visible := True;
IE.Navigate('http://ya.ru');

end.
Видимость можно не делать ,это пример. Попробуй.
Интернет забит примера с ole на делфи. вот только копнул за пять минут.

[linkey]

спасибо помогло

[slawa321]

спасибо помогло

Так это ,чем дело то кончилось ,интересно ,где подкаст ,или так что то для себя писал?

[linkey]

спасибо помогло

Так это ,чем дело то кончилось ,интересно ,где подкаст ,или так что то для себя писал?

http://www.homemediaserver.ru/forum/vie ... 933#p13933
правда не долелал еще(телепрограмму хотел еще добавить и упростить как то перечесление), просто не давно тока опять открыли все каналы.

[linkey]

Кто нибудь пробовал пользоваться "скрипт формирует несколько ссылок". Объясните плиз на простом примере как это сделать. Подкаст ютуб просмотрел, скачал даже пару подкастов с буржуйского wms, но так что то и не понял.

[linkey]

И еще вопрос можно ли изменить заголовок медиаресурса, в скрипте получения ссылки.