Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Shell Добавлено: 07.05.09 00:46  

Автор вопроса:  Dmitryi | ICQ: 339242625 
Подскажите!
Как открыть файл notepad-ом не имеющим расширения.
Мой вариан:
Shell " notepad c:\abc", vbNormalFocus
В этом варианте не хочет открывать т.к. говорит, что не найден файл abc.txt

Ответить

  Ответы Всего ответов: 15  

Номер ответа: 1
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #1
Добавлено: 07.05.09 05:44
Либо тебе необязательно в блокноте, либо необязательно именно то имя файла.

Если необязательно имя файла:
  1. FileCopy "C:\abc", "C:\~mytemp.txt"
  2. Shell "notepad C:\~mytemp.txt", vbNormalFocus


Если необязательно в блокноте, так открывай прямо внутри своей проги.

Ответить

Номер ответа: 2
Автор ответа:
 Arseny



ICQ: 298826769 

Вопросов: 53
Ответов: 1732
 Профиль | | #2 Добавлено: 07.05.09 08:47
либо заюзать апи:
  1. Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
  2. Const SW_SHOWNORMAL = 1
  3. Private Sub Form_Load()
  4.     ShellExecute Me.hwnd, vbNullString, "notepad.exe", "c:\abc", "C:\", SW_SHOWNORMAL
  5. End Sub

Ответить

Номер ответа: 3
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #3
Добавлено: 07.05.09 10:24
Если через апи оно поймет что от него хотят

Ответить

Номер ответа: 4
Автор ответа:
 Arseny



ICQ: 298826769 

Вопросов: 53
Ответов: 1732
 Профиль | | #4 Добавлено: 07.05.09 10:43
я ж опробовал. :)

Ответить

Номер ответа: 5
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #5
Добавлено: 07.05.09 10:55
Ну тогда все пучком :)

Ответить

Номер ответа: 6
Автор ответа:
 honeybeer



Вопросов: 1
Ответов: 6
 Профиль | | #6 Добавлено: 28.05.09 08:55
странная проблема
  1. Shell "notepad c:\popup", vbNormalFocus

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

Ответить

Номер ответа: 7
Автор ответа:
 honeybeer



Вопросов: 1
Ответов: 6
 Профиль | | #7 Добавлено: 28.05.09 08:57
вариантов пара
1) файла действительно там нет
1) у файла есть расширение, но оно скрыто (в настройках Explorer'a)

Ответить

Номер ответа: 8
Автор ответа:
 MegaÐefender



Вопросов: 19
Ответов: 313
 Web-сайт: safetyAV.narod.ru
 Профиль | | #8
Добавлено: 28.05.09 12:14
Скорее всего, так функция shell - это обёртка к апи shellexecute.

Ответить

Номер ответа: 9
Автор ответа:
 Dmitryi



ICQ: 339242625 

Вопросов: 13
Ответов: 27
 Профиль | | #9 Добавлено: 01.06.09 23:15
???А вот при таком раскладе: Shell " notepad c:\abc", vbNormalFocus Скажем в место C:\ надо поставить переменную в которой будет путь.

Ответить

Номер ответа: 10
Автор ответа:
 Arvitaly



ICQ: 301746136 

Вопросов: 28
Ответов: 549
 Web-сайт: okazani.ru
 Профиль | | #10
Добавлено: 01.06.09 23:39
Shell " notepad " & path & "\abc"

Ответить

Номер ответа: 11
Автор ответа:
 Dmitryi



ICQ: 339242625 

Вопросов: 13
Ответов: 27
 Профиль | | #11 Добавлено: 06.06.09 15:33
Shell " notepad " & path & "abc" где path - c:\
Пишет Run-Time Error '53':
Файл не найден

Ответить

Номер ответа: 12
Автор ответа:
 Arvitaly



ICQ: 301746136 

Вопросов: 28
Ответов: 549
 Web-сайт: okazani.ru
 Профиль | | #12
Добавлено: 06.06.09 15:52
Shell "d:\windows\notepad " & Path & "abc"

Ответить

Номер ответа: 13
Автор ответа:
 Dmitryi



ICQ: 339242625 

Вопросов: 13
Ответов: 27
 Профиль | | #13 Добавлено: 06.06.09 16:37
теперь пишет: Run-Time Error '5'
неправильный вызов процедуры или аргумент

Ответить

Номер ответа: 14
Автор ответа:
 MegaÐefender



Вопросов: 19
Ответов: 313
 Web-сайт: safetyAV.narod.ru
 Профиль | | #14
Добавлено: 07.06.09 02:25
Const strNP As String="notepad "
Dim strFN As String
strFN="c:/abc"
Shell strNP & strFN
если это не помогло, то напиши "c:\abc.*" или "c:\abc.***"

Ответить

Номер ответа: 15
Автор ответа:
 Dmitryi



ICQ: 339242625 

Вопросов: 13
Ответов: 27
 Профиль | | #15 Добавлено: 07.06.09 22:35
Вот теперь все в норме. Спасибо большое!!!!

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам