Отследить появление файла по указанному пути и анализ его байтовой структуры

@Техник55 · Регистрация: 11.06.2012

Author24 — интернет-сервис помощи студентам

Всем здравствуйте.
Необходимо отслеживать файл, зная указанный путь??? Вроде как через функцию DIR, как точно не пойму...
После того как появился, мне нужно оценить некоторые его байты (например 1334, 1336)??? Почему эти байты, потому что я открывал через HEX-редактор и понял какие байты меняются!!
Как только оценил нужно удалить файл, какой командой???
Заранее спасибо...

@skol13 · 14.06.2012, 15:43

Сообщение от Техник55

Visual Basic

1	FileName = App.Path & "C:\Users\Lenovo\Desktop\Разное.doc"

так зачем вы при указании пути еще и app.Path оставили?
Нужно либо используя app.Path и тогда надо указывать дополнительно только имя файла который должен будет лежать в каталоге с программой, либо без него - используя полный путь к файлу:

Visual Basic

1	FileName = "C:\Users\Lenovo\Desktop\Разное.doc"

А вообще есть такая хорошая вещь как отладчик!
Можно было поставить брекпоинт на данной строке и посмотреть какое значение у вас принимает переменная FileName. Сразу бы все сами поняли!

@Техник55 · 15.06.2012, 17:41 **[ТС]**

Дело пошло. Файл находит, но что-то неправильно оценивает его? Вот допустим позиция 931 имеет значение 10 (в hex) и 17(10-й системе), тогда так же будет:

Visual Basic

Get #f, 931, b  ' второй параметр - позиция для считывания байта из файла - исправьте на свою
            Close #f
            If b = 17 Then   ' 0F в 10-ной системе счисления
                Form1.Text1.Text = "Найден файл журнала. Был входящий звонок! Работа завершена. Для повторного ожидания нажмите на кнопку!"
                Kill FileName
                Exit Do

Вот навсякий прикрепил фото файла через hex-редактор...

@skol13 · 15.06.2012, 19:28

Сообщение от Техник55

Вот допустим позиция 931 имеет значение 10 (в hex) и 17(10-й системе)

а я всю жизнь считал что 10₁₆ это 16₁₀
и калькулятор сейчас это подтвердил

Еще раз говорю: отладчик, отладчик и еще раз отладчик!
И не будет глупых ошибок и глупых вопросов!

@Техник55 · 15.06.2012, 20:50 **[ТС]**

Да в этом ошибся, но это не главное. прикол в том что счет позиции начинаются с 0, а я смотрю и постоянно на одну позицию ошибаюсь, теперь разобрался...

@skol13 · 15.06.2012, 22:47

И опять вы ошиблись!

Вот цитата из справки:

The first record or byte in a file is at position 1, the second record or byte is at position 2, and so on.

Буквально: первая запись или байт в файле имеет позицию 1 вторая запись или байт - 2, и так далее.

@Техник55 · 16.06.2012, 10:48 **[ТС]**

Ну я в принципе хотел тоже самое сказать. вот допустим в hex-редакторе открыл и пошли: 00 01 02 03 итд. Мне нужно то что стоит под 03, так вот позиция в коде берется равной 4, а я брал 3. Теперь все ОК!!! Огромное спасибо...

Два небольших вопросика:
1) Синтаксис для команды SHELL(...?...). Вот у меня есть некот. файл EXE и есть тект допустим в блокноте. Нужно с помощью EXE отправить текст на какой-нибудь номер.
начало знаю

Visual Basic

1	SHELL("Адрес где лежит EXE, а дальше как???")

2) При заданном условии вывести в Form1 время когда это случилось? Если такие команды, это наверно нужно к ПК обращаться??

@skol13 · 16.06.2012, 11:05

Сообщение от Техник55

Синтаксис для команды SHELL

да так же точно все как если бы вы делали это в командной строке
всю ту же запись для shell в кавычки возьмите и после запятой еще можно указать стиль окна - свернутое, развернутое и т.п.
типа так:

ActionScript 3

1	Shell "cmd /c copy test.ini test.bak", vbHide

При заданном условии вывести в Form1 время когда это случилось? Если такие команды, это наверно нужно к ПК обращаться??

вот тут вообще не понял вопроса

вдогонку:
команды DOS типа copy mkdir del и т.п. запускаются через командный процессор - поэтому сначала стоит вызов cmd с параметром /c - закрывать окно после завершения
Если вы запускаете какой то exe файл через shell - то пишите просто shell "calc.exe"
ну или еще лучше с указанием полного пути к файлу

@Техник55 · 16.06.2012, 11:49 **[ТС]**

Мысли опережали руки вот и написал непонятно...
Я имел ввиду, что допустим при каком то условии у меня идет отправка смс

Visual Basic

If "условие" Then
comm.Output = "авария" & Chr(26) & vbCrLf ' текст сообщения
Form1.text="Сообщение отправлено"  ' И тут же отобразить время когда это произошло (вот как это сделать????)
End If

@skol13 · 16.06.2012, 12:57

Visual Basic

1	Form1.text="Сообщение отправлено: " & Time

@Техник55 · 16.06.2012, 14:03 **[ТС]**

А дату указать наверно: Date...

Вопрос про командную строку: У меня на работе есть Базовая станция ТЕТРА (трангиковая связь), может и слышали про нее... Так вот есть диспетчерская терминальная програмка (и конечно же ее EXE) для работы с ней. Допустим через командную строку я запускаю exe, а далее какие параметры указывать чтобы сообщение отправить (ведь она понимает только свои или ошибаюсь)???? Кстати в этом стандарте не SMS, а SDS сообщения (но это тоже самое). Вот допустим чтобы смс через GSM модем отправить нужно запустить exe, далее порт указать, номер телефона и само сообщение. Про это в инете много, про ТЕТРУ ничего....
Может натолкнете???

@skol13 · 16.06.2012, 14:13

Сообщение от Техник55

Базовая станция ТЕТРА

не, не слышал к сожалению.
Если вы не знаете, какие параметры запуска может обрабатывать программа то запустите ее с параметром /?

ActionScript 3

1	primer.exe /?

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

@Техник55 · 16.06.2012, 20:03 **[ТС]**

Что прям так и запускать???
прога для примера:

Visual Basic

1	C:\Progra~1\Venta\VentaF~1\vfdrv32.exe / primer.exe

Добавлено через 1 час 36 минут
И еще просьба не подскажешь какую-нибудь ссылочку где можно подчерпнуть инфу по программированию элементов управления: чтобы прокрутку в Form сделать, также чтобы вставить какие-н значки, менюшки выкидные итд. Чтобы свой EXE приобразить!!! Желательно на примерах.
А то замучал тебя уже!!!! чтобы мелкие вопросы только спрашивать, а не все!!!

@skol13 · 17.06.2012, 10:56

Мы с вами уже давно и злостно нарушаем пункт 2.4 правил форума - не обсуждать в одной теме несколько вопросов.
Вопрос, поставленный в теме, успешно решен.
Ссылки на книжки я отправил вам личным сообщением.
Дерзайте.

P.S. по работе с командной строкой вам уж точно не на форум VB

@Техник55 · 17.06.2012, 12:06 **[ТС]**

Scol13 отдельное спасибо за книги и подсказки...
ТЕМА ЗАКРЫТА!!!!

@skol13 369 / 78 / 6 Регистрация: 23.05.2012 Сообщений: 232
	15.06.2012, 19:28	23
	Сообщение от Техник55 Вот допустим позиция 931 имеет значение 10 (в hex) и 17(10-й системе) а я всю жизнь считал что 10₁₆ это 16₁₀ и калькулятор сейчас это подтвердил Еще раз говорю: отладчик, отладчик и еще раз отладчик! И не будет глупых ошибок и глупых вопросов! 0

@skol13 369 / 78 / 6 Регистрация: 23.05.2012 Сообщений: 232
	15.06.2012, 22:47	25
	И опять вы ошиблись! Вот цитата из справки: The first record or byte in a file is at position 1, the second record or byte is at position 2, and so on. Буквально: первая запись или байт в файле имеет позицию 1 вторая запись или байт - 2, и так далее. 1

@Техник55 7 / 7 / 1 Регистрация: 11.06.2012 Сообщений: 352
	16.06.2012, 14:03 [ТС]	30
	А дату указать наверно: Date... Вопрос про командную строку: У меня на работе есть Базовая станция ТЕТРА (трангиковая связь), может и слышали про нее... Так вот есть диспетчерская терминальная програмка (и конечно же ее EXE) для работы с ней. Допустим через командную строку я запускаю exe, а далее какие параметры указывать чтобы сообщение отправить (ведь она понимает только свои или ошибаюсь)???? Кстати в этом стандарте не SMS, а SDS сообщения (но это тоже самое). Вот допустим чтобы смс через GSM модем отправить нужно запустить exe, далее порт указать, номер телефона и само сообщение. Про это в инете много, про ТЕТРУ ничего.... Может натолкнете??? 0

@Техник55 7 / 7 / 1 Регистрация: 11.06.2012 Сообщений: 352
	15.06.2012, 20:50 [ТС]	24
	Да в этом ошибся, но это не главное. прикол в том что счет позиции начинаются с 0, а я смотрю и постоянно на одну позицию ошибаюсь, теперь разобрался... 0

@skol13 369 / 78 / 6 Регистрация: 23.05.2012 Сообщений: 232
	17.06.2012, 10:56	33
	Мы с вами уже давно и злостно нарушаем пункт 2.4 правил форума - не обсуждать в одной теме несколько вопросов. Вопрос, поставленный в теме, успешно решен. Ссылки на книжки я отправил вам личным сообщением. Дерзайте. P.S. по работе с командной строкой вам уж точно не на форум VB 0

@Техник55 7 / 7 / 1 Регистрация: 11.06.2012 Сообщений: 352
	17.06.2012, 12:06 [ТС]	34
	Scol13 отдельное спасибо за книги и подсказки... ТЕМА ЗАКРЫТА!!!! 0