ReSQL.ru
     
powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Удобный диалог выбора каталога?
25 сообщений из 52, страница 2 из 3
  2  все
Удобный диалог выбора каталога?
    #39803151
Фотография natalitvinenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
natalitvinenko
Участник
Joss, спасибо, но в ней все тот же метод BrowseForFolder, в него все упирается. У меня выше суженные вариант того же, но под jscript.
Кстати, забыла написать, какую ошибку выдает: "Не удается найти указанный файл". Я сначала даже решила, что они просто ткнули в файл, который в архиве, или на флешке, которая своеобразно прикручена, начала советовать перенести файл на диск...
...
Рейтинг: 0 / 0
18.04.2019, 09:24
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803157
Фотография Joss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Joss
Участник
Программа не работает под Windows XP? А Вы под Windows XP программу прогоняли? Если что, у меня дома стоит Windows XP и можно проверить программу.
...
Рейтинг: 0 / 0
18.04.2019, 09:35
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803246
Кривцов Анатолий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кривцов Анатолий
Гость
Код: vbnet
1.
pppath=objFolder.Self.path


natalitvinenko, всплывает в моей памяти, что в предыдущих версиях винды у объекта FolderItem, возвращаемого св-вом Self, не было свойства Path . Было только Name и для получения полного пути надо было собирать в строку эти Name, перемещаясь вверх по родительским (св-во Parent) объектам.
...
Рейтинг: 0 / 0
18.04.2019, 11:54
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803254
Фотография natalitvinenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
natalitvinenko
Участник
Кривцов Анатолий, оно ж не на эту строчку показывало, в ошибках, а вот именно на BrowseForFolder. Написала программку, отдала на внедрение. Win10 запустили - все в порядке, у меня Win7 - все в порядке, запустили на WinXp- фиг. Вот сижу, думаю. Пока или надо там накатывать по инструкциям в инете все подряд, или найти другую библиотеку, другой способ. Вот, ищу.
...
Рейтинг: 0 / 0
18.04.2019, 12:08
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803256
Фотография natalitvinenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
natalitvinenko
Участник
Пробую так
Код: javascript
1.
2.
3.
4.
var objDialog = new ActiveXObject("SAFRCFileDlg.FileOpen");
intResult = objDialog.OpenFileOpenDlg;
alert("Результат операции: " & CStr(intResult));
alert("Выбран файл: " & objDialog.FileName);



Пробую эдак
Код: javascript
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.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.
74.
75.
76.
77.
78.
79.
80.
81.
82.
83.
84.
85.
86.
87.
88.
89.
<!DOCTYPE HTML>
<html>
<HEAD>
  <TITLE>Преобразование файла Excel в файл dbf</TITLE>
  <HTA:APPLICATION ID="oMyApp" 
    APPLICATIONNAME="NattaExcelDBF" 
    SINGLEINSTANCE="yes">
 </HEAD>
 <body>
</body>
<script language="JScript">


 var sFiles, nFiles;
 var aFiles = GetFileList();

   if ( (nFiles = aFiles.length) == 0 )
     sFiles = 'Список выбранных файлов пуст!';
   else
   {
     sFiles = 'Список выбранных файлов:\n\n';
     for (var i = 0; i < nFiles; i++) 
       sFiles += '  ' + (i + 1) + '.  ' + aFiles[i] + '\n';
   }

   alert(sFiles);
self.close();
   ///return(nFiles);



function GetFileList()
{
 var aFiles;
 
  try
  {
    var oFileDlg = new ActiveXObject("MSComDlg.CommonDialog");
    alert("1");
    with ( oFileDlg )
    {
      // const int cdlcdlOFNHideReadOnly  = 4       (0x4);       Делает невидимым переключатель Read Only.
      // const int cdlOFNNoChangeDir      = 8       (0x8);       Вынуждает диалоговое окно устанавливать текущий каталог в тот, который был при предыдущем открытии.
      // const int cdlOFNAllowMultiselect = 512     (0x200);     Пользователь может выбрать более чем один файл. (multiple selections).
      // const int cdlOFNFileMustExist    = 4096    (0x1000);    Определяет, что можно вводить имена только существующих файлов. User can enter only names of existing files.
      // const int cdlOFNExplorer         = 524288  (0x80000);   Определяет внешний вид окна выбора.
      // const int cdlOFNLongNames        = 2097152 (0x200000);  Позволяет пользователю использовать длинные имена файлов Long filenames enable.
      Flags = 4 + 8 + 512 + 4096 + 524288 + 2097152;
      CancelError = false;
      MaxFileSize = 8192;
      filename = "";
      InitDir = "";
      DialogTitle = 'Выбор файлов: Удерживая Ctrl отметьте требуемые файлы.'
      Filter = "Все файлы|*.*|MS Word файлы|*.doc|MS Excel файлы|*.xls|Текстовые файлы|*.txt";
      FilterIndex = 1;
      ShowOpen();
      alert("2");
      if ( filename.length > 0 )
      {
        aFiles = filename.split("\0");
        if ( aFiles.length > 1 )
        {
         var nFiles = aFiles.length - 1;
         var sPath  = aFiles[0];
        
           if ( sPath.charAt(sPath.length-1) != "\\" )
             sPath += "\\";

           for(var nCnt = 0; nCnt < nFiles; nCnt++)
            aFiles[nCnt] = sPath + aFiles[nCnt + 1];
            
          aFiles.length = nFiles;
        }
      }  
     }
  }
  catch(e)
  {
alert("Фигушки!")
  }
  
  if ( aFiles == null ) {return( new Array() );};
   
  return( aFiles );
}

////}
</script>
</html>


Все дохнет на командах "new ActiveXObject".
...
Рейтинг: 0 / 0
18.04.2019, 12:12
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803262
zimkon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zimkon
Гость
natalitvinenko,
Примерчик Joss-a проверил у себя на WinXP только что. Всё работает отлично. А почему не хотите обратится на профильный подфорум по Java на этом же сайте? Это было бы логичнее, как мне кажется.
...
Рейтинг: 0 / 0
18.04.2019, 12:17
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803263
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sdku
Участник
natalitvinenko,
для операционки не поддерживаемой уже пять лет что-либо создавать,по-моему,есть не правильно.
(Сейчас даже Skype не работает под XP-так что стимул для перехода имеется)
...
Рейтинг: 0 / 0
18.04.2019, 12:20
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803274
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
zimkonА почему не хотите обратится на профильный подфорум по Java на этом же сайте? Это было бы логичнее, как мне кажется.мне тоже показалось логичным, но модераторы молчком зачистили мою реплику (оценочную) и оставили java на подфоруме базы данных Access, где она рядом не лежала...
...
Рейтинг: 0 / 0
18.04.2019, 12:38
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803281
zimkon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zimkon
Гость
ПанургzimkonА почему не хотите обратится на профильный подфорум по Java на этом же сайте? Это было бы логичнее, как мне кажется.мне тоже показалось логичным, но модераторы молчком зачистили мою реплику (оценочную) и оставили java на подфоруме базы данных Access, где она рядом не лежала...


Да, они просто тебя не поняли, также как и я:) Вот, теперь разъяснил, спасибо! Полностью с тобой солидарен.
...
Рейтинг: 0 / 0
18.04.2019, 12:52
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803299
Кривцов Анатолий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кривцов Анатолий
Гость
natalitvinenkoоно ж не на эту строчку показывало, в ошибках, а вот именно на BrowseForFolder. Я тут еще вспомнил...
1. В Win95 и WinXP в диалоге выбора папки не было кнопки "Новая папка".
У вас вызов BrowseForFolder(0, "Example", 16384), где опции = 16384. Возможно там какая-то опция, недоступная в XP. Попробуйте указать 0.
2. В отсутствии св-ва Path я засомневался, а вот св-во Self точно отсутствовало.
Для получения пути использовалась такая конструкция (VBA):
Код: vbnet
1.
sResult = oFolder.ParentFolder.ParseName(oFolder.Title).Path


Это если Path был, а иначе - Name и вверх по объектам. Там еще фигня была с папкой верхнего уровня (нет родителя), надо было танцевать с бубном вокруг Title.

ЗЫ. Боже, как давно это было...
...
Рейтинг: 0 / 0
18.04.2019, 13:08
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803344
Фотография mds_world
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mds_world
Участник
zimkonДа, они просто тебя не поняли
Да, и я подумал, что случайное сообщение. Поэтому убрал. Но теперь уже восстанавливать не имеет смысла, когда есть развернутое объяснение
...
Рейтинг: 0 / 0
18.04.2019, 13:52
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803349
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
mds_worldzimkonДа, они просто тебя не поняли
Да, и я подумал, что случайное сообщение. Поэтому убрал. Но теперь уже восстанавливать не имеет смысла, когда есть развернутое объяснениеда ладно, это был порыв души

не матюгаться же...
...
Рейтинг: 0 / 0
18.04.2019, 13:55
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803370
Озверин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Озверин
Участник
zimkonnatalitvinenko,
Примерчик Joss-a проверил у себя на WinXP только что. Всё работает отлично. А почему не хотите обратится на профильный подфорум по Java на этом же сайте? Это было бы логичнее, как мне кажется.

java script?
...
Рейтинг: 0 / 0
18.04.2019, 14:19
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803445
zimkon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zimkon
Гость
Озверинzimkonnatalitvinenko,
Примерчик Joss-a проверил у себя на WinXP только что. Всё работает отлично. А почему не хотите обратится на профильный подфорум по Java на этом же сайте? Это было бы логичнее, как мне кажется.

java script?
Да,не... Какой java script? Вот это 21865223
...
Рейтинг: 0 / 0
18.04.2019, 15:37
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803448
Озверин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Озверин
Участник
zimkonОзверинпропущено...


java script?
Да,не... Какой java script? Вот это 21865223

я к тому, что jscript, на котором пытались поднять пример joss`а - это не java, а, скорее, javascript и то, с оговорками.
...
Рейтинг: 0 / 0
18.04.2019, 15:43
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803452
Фотография natalitvinenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
natalitvinenko
Участник
zimkon, я на Жабаскрипте пишу, hta делаю. Там человек действительно пример привел не из той оперы.
...
Рейтинг: 0 / 0
18.04.2019, 15:47
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803456
Фотография natalitvinenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
natalitvinenko
Участник
sdku, не я выбираю. Тем более что задача пишется не под нее именно- она пишется в целом и вообще. Просто среди тех машин , которые в наличности, какое-то количество- XP. На машинах более современных версий, все работает. Проблема в том, что что-то надо делать и с машинами, которые древние. Предложение "а поставьте там шото посовременнее" оно обернется предложением "а купите новую машину":-) Тем более на таких машинках, как правило, живет еще куча задач до купы.
Извините, хлопцы, это жизнь:-(
...
Рейтинг: 0 / 0
18.04.2019, 15:51
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803460
Фотография natalitvinenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
natalitvinenko
Участник
Пока порекомендовала ребятам банально попытаться запустить от имени админа- может, оно тупо в это упирается. Если бы это была страничка, а не hta, то, возможно, проблема бы решалась снятием всех ограничений по ActiveX в настройках безопасности, занесением в доверенные и т.п. Попыталась даже сходить этим путем- ну так если мы открываем hta в Эксплорере, то она ж немедленно начинает выполняться. Ой...
...
Рейтинг: 0 / 0
18.04.2019, 15:54
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803469
Фотография natalitvinenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
natalitvinenko
Участник
zimkon, ой только сейчас заметила, где я. Оно просто выше уже было вперемешку, потому и начала писать сюда:-( Прошу прощения. Имеет смысл туда дублить?
...
Рейтинг: 0 / 0
18.04.2019, 15:59
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803476
zimkon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zimkon
Гость
Озверинzimkonпропущено...

Да,не... Какой java script? Вот это 21865223

я к тому, что jscript, на котором пытались поднять пример joss`а - это не java, а, скорее, javascript и то, с оговорками.

Да, в принципе это по-барабану. У ТС явно "гранаты другой системы". Ей бы не сюда надо. Это как бы в поликлинике с простудой обращаться к проктологу. Теоретически тоже врач...
...
Рейтинг: 0 / 0
18.04.2019, 16:05
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803481
Фотография vmag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vmag
Участник
natalitvinenkozimkon, ой только сейчас заметила, где я.

..... да тут все кроме меня по встречке едут...
...
Рейтинг: 0 / 0
18.04.2019, 16:07
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803483
Фотография natalitvinenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
natalitvinenko
Участник
Кривцов Анатолий, да вопрос уже даже не в том, что она вернет- я пока хочу, чтоб она хотя бы окошко показала.
Сброшу им вариант с нулем- вдруг прокатит.
...
Рейтинг: 0 / 0
18.04.2019, 16:08
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803486
Фотография natalitvinenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
natalitvinenko
Участник
vmagnatalitvinenkozimkon, ой только сейчас заметила, где я.

..... да тут все кроме меня по встречке едут...

Невиноватая я :-) :-(
Очумела уже над этой задачей. Хорошо, что не в кулинарный форум написала.
...
Рейтинг: 0 / 0
18.04.2019, 16:10
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803490
Фотография vmag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vmag
Участник
natalitvinenko,

да это нормально... кто много работает, иногда шарики за ролики заходят... иногда теряешься в пространстве...
...
Рейтинг: 0 / 0
18.04.2019, 16:13
| Ответить | Цитировать | Написать  
Удобный диалог выбора каталога?
    #39803494
Фотография vmag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vmag
Участник
natalitvinenko,

просто ваш метод вроде на ХР проверили по версии vba, работает, а в жабе не работает, попробуйте на это ХР поставить последнюю жабу оракле...
...
Рейтинг: 0 / 0
18.04.2019, 16:17
| Ответить | Цитировать | Написать  
25 сообщений из 52, страница 2 из 3
  2  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Удобный диалог выбора каталога?
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=39803490&tid=1610749]:
 0ms
get settings:
 12ms
get forum list:
 14ms
check forum access:
 5ms
check topic access:
 5ms
track hit:
 48ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 55ms
get tp. blocked users:
 1ms
others: 13ms
total:  168ms
созд. / загр.: 168ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]