Автор Тема: hta и диалог "save as"  (Прочитано 2722 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн 0b0rm0t

  • Завсегдатай
  • Пользователь
  • **
  • Сообщений: 99
  • +0/-0
  • 0
    • Просмотр профиля
    • http://
hta и диалог "save as"
« : 24 Августа 2005, 20:00:26 »
Возможно ли из hta-приложения вызвать этот диалог? Видел на мсдн рабочий пример диалога "open", но никаких идей в нужную сторону он не дает.

Также видел на паре сайтов пример вызова именно "save as" через компонент из какой-то библиотеки (COMDLG32.OCX), но что-то он не работает.

Еще читал статью какого-то мужика, который говорит, что по-человечески этого сделать нельзя. А сделать "хоть как-нибудь" он и сам уже не один день пытается. И вроде как безрезультатно.

Кому верить?

Может кто-нить знает где посмотреть соответсвующие аплликухи (типа редакторов всяких) - там-то уж точно будет (если вообще возможно).
Если голова болит, значит она есть.

Оффлайн ThE0ReTiC

  • Главный по тарелочкам
  • Глобальный модератор
  • Ветеран
  • *****
  • Сообщений: 4041
  • +2/-0
  • 2
    • Просмотр профиля
    • http://
hta и диалог "save as"
« Ответ #1 : 25 Августа 2005, 09:15:03 »
0b0rm0t
msdn.microsoft.com тебя спасет.
там есть работающий пример.
AS IS...

Оффлайн xgmann

  • Заглянувший
  • Новичок
  • *
  • Сообщений: 18
  • +0/-0
  • 0
    • Просмотр профиля
    • http://xgmann.narod.ru
Решение
« Ответ #2 : 12 Сентября 2005, 18:00:24 »
Используй это, если XP или 2003:

Set objDialog = CreateObject("SAFRCFileDlg.FileSave")
   objDialog.FileName = "C:\\"
   objDialog.FileType = "Text"
   intReturn = objDialog.OpenFileSaveDlg

 

Sitemap 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28