|
|
|
Как передать параметр при загрузке файла
|
|||
|---|---|---|---|
|
#18+
Доброе утро господа ! Есть XLS файла - необходимо определить режимы запуска 1. ручной - зашел .... нажал кнопку ... вышел 2. автоматический - загрузка .... выполнение процедуры ... выход Т.е во втором случае хочу в командной строке передать параметр FAIL.XLS AUTO При открытии файла делаем анализа на переданный параметр Но функция Command() в Office не работает (см. HELP) API функция GetCommandLineA тоже ..................... Sub Auto_Open() MsgBox Command End Sub Делаю так Запуск через BAT, где определена локальная переменная среды BAT-файл set File=%1 division.xls - запуск XLS в XLS-файле Private Declare Function GetEnvironmentVariable Lib "kernel32" Alias "GetEnvironmentVariableA" (ByVal lpName As String, ByVal lpBuffer As String, ByVal nSize As Long) As Long Sub Auto_Open() Dim sFile As String sFile = String(255, 0) Call GetEnvironmentVariable("File", sFile, Len(sFile)) If Left(sFile, InStr(sFile, vbNullChar) - 1) <> "" Then Call START End Sub Есть более оптимальные и верные решения ? Кто подскажет ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.06.2007, 12:44 |
|
||
|
Как передать параметр при загрузке файла
|
|||
|---|---|---|---|
|
#18+
Господа - отзовитесь - кто знает !! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 21.06.2007, 11:05 |
|
||
|
Как передать параметр при загрузке файла
|
|||
|---|---|---|---|
|
#18+
... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 21.06.2007, 12:49 |
|
||
|
Как передать параметр при загрузке файла
|
|||
|---|---|---|---|
|
#18+
вот еще Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12. 13. 14. 15. THINK! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 21.06.2007, 12:53 |
|
||
|
|

start [/forum/topic.php?fid=60&fpage=229&tid=2163818]: |
0ms |
get settings: |
6ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
32ms |
get topic data: |
7ms |
get forum data: |
1ms |
get page messages: |
26ms |
get tp. blocked users: |
1ms |
| others: | 213ms |
| total: | 299ms |

| 0 / 0 |
