Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 | 2 |

 

  Вопрос: 2 вопросика Добавлено: 02.08.05 21:43  

Автор вопроса:  StrikeR | Web-сайт: www.highlight.ee | ICQ: 151819 
Больше, чем уверен, что ответы на эти вопросы уже имеються на форуме... но... мои поиски по нему ни к чему непревели... и так, прошу Вас о помощи

1. Нужно октрыть фаил в HEX... Прочитать 6 символ слева и изменить его на свой.

2. Как без SETUP упаковать фаил? Т.е. что бы ехешка несла ссобой уже все осх и прочую лабуду.


Заранее, премного благодарен

Ответить

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

Номер ответа: 1
Автор ответа:
 CyRax



Разработчик Offline Client

ICQ: 204447456 

Вопросов: 180
Ответов: 4229
 Web-сайт: basicproduction.nm.ru
 Профиль | | #1
Добавлено: 02.08.05 22:10
1. WinHex (кстати есть руссифицированный) либо в FAR жмешь F3, а затем F4.

Ответить

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



ICQ: 151819 

Вопросов: 32
Ответов: 110
 Web-сайт: www.highlight.ee
 Профиль | | #2
Добавлено: 02.08.05 22:13
нее, несовсем то=) мне не софт нужен, мне нужно через барсик всё сделать... пардон, что в теме неуказал про него. Т.е. нужно всё ручками накалякать

Ответить

Номер ответа: 3
Автор ответа:
 CyRax



Разработчик Offline Client

ICQ: 204447456 

Вопросов: 180
Ответов: 4229
 Web-сайт: basicproduction.nm.ru
 Профиль | | #3
Добавлено: 02.08.05 22:26
Ну так это и есть ручками. Жмёшь F3-F4. Или ты хочешь контрол специальный чтобы он тебе файл в виде хекса показывал?

Ответить

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



ICQ: 151819 

Вопросов: 32
Ответов: 110
 Web-сайт: www.highlight.ee
 Профиль | | #4
Добавлено: 02.08.05 22:53
именно... т.е. я на барсе хочу написать софтину, что бы при открытии файла, она считывала определённый символ в HEX и меняла его.

Ответить

Номер ответа: 5
Автор ответа:
 sne



Разработчик Offline Client

ICQ: 233286456 

Вопросов: 34
Ответов: 5445
 Web-сайт: hw.t-k.ru
 Профиль | | #5
Добавлено: 02.08.05 23:35
см. открытие файла + get/put + Hex() + (Asc() - если считывать будешь в строку а не в байтовый массив)

Ответить

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



ICQ: 151819 

Вопросов: 32
Ответов: 110
 Web-сайт: www.highlight.ee
 Профиль | | #6
Добавлено: 02.08.05 23:48
эмм... честно скажу, за барсом давно не сидел... мало что понял из вышенаписанного... понятное дело, напрягать на готовый код, неимею право... но если можно по даскональней всё объяснить для n00b'а=)

Ответить

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



Разработчик Offline Client

ICQ: 204447456 

Вопросов: 180
Ответов: 4229
 Web-сайт: basicproduction.nm.ru
 Профиль | | #7
Добавлено: 03.08.05 00:39
1. Нужно октрыть фаил в HEX...

 Вопрос непонятен. в HEX-редакторе или что?
 Адреса файлов тебе не нужно найти? Определись с терминологией сначала.

Ответить

Номер ответа: 8
Автор ответа:
 StrikeR



ICQ: 151819 

Вопросов: 32
Ответов: 110
 Web-сайт: www.highlight.ee
 Профиль | | #8
Добавлено: 03.08.05 01:05
в hex кодировке надо бы

Ответить

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



ICQ: 334781088 

Вопросов: 108
Ответов: 2822
 Профиль | | #9 Добавлено: 03.08.05 11:20
Блин, нифига не понятно. Тебе нужно чтобы программа прочла 6-й байт и заменила его? Или пользователь ручками?
Если вариант 1 - Open for binary, get и put. HEX тебе нафиг не нужен.
Если вариант 2 - читай пост N1 и не парься.
Определись что тебе нужно и внятно объясни другим.

Ответить

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



Разработчик Offline Client

Вопросов: 23
Ответов: 879
 Web-сайт: softvito.narod2.ru
 Профиль | | #10
Добавлено: 03.08.05 13:34
Тебе нужно пропатчить прогу? :))
Ух ка не хорошо:))
Смотри работу с файлами. У VB мощные возможности.
Я писал такую, но давно. Найду исходник выложу.

Ответить

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



ICQ: 151819 

Вопросов: 32
Ответов: 110
 Web-сайт: www.highlight.ee
 Профиль | | #11
Добавлено: 03.08.05 13:52
ну как видишь, нашлись те, кто понял=)

vito, если быть точнее, то патчить будем флешку=) длшя изменения её версии. Буду очень признателен, если выложишь тут пример

Ответить

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


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #12 Добавлено: 03.08.05 17:59
А какая же разница? Ну патчить так патчить, НА КОЙ ТЕБЕ HEX, открой как binary, считай, измени то что нужно и перезапиши.

Ответить

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



ICQ: 151819 

Вопросов: 32
Ответов: 110
 Web-сайт: www.highlight.ee
 Профиль | | #13
Добавлено: 03.08.05 18:23
вообщем, от есть картинка (http://www.highlight.ee/lev/4all/swf.JPG), на котороый, как вы видите в HEX расписанно всё... и мне нужно программно считать символ, который находиться в кружочке... ну и соотвтественно, его изменить...

повтроюсь... мне не нужно всё это делать через софт, как на пиктуре, мне нужно всё это сделать через VB

Ответить

Номер ответа: 14
Автор ответа:
 vito



Разработчик Offline Client

Вопросов: 23
Ответов: 879
 Web-сайт: softvito.narod2.ru
 Профиль | | #14
Добавлено: 03.08.05 19:14
Исходники не нашел(там exe) патчится.
Но в твоем случае вообще все просто(хотя я может не до конца тебя понял)

Private Sub Patch()
Dim intFH, i As Integer ' объявляем переменные

Dim bin As Byte
intFH = FreeFile 'получаем дескриптор
i = 1
Open "xxx\yyy.xx" For Binary Access Read Write As intFH
' открывем файл в бинарнике
Do Until EOF(intFH) 'читаем до конца файла( в твоем случае сколько нужно)
Get #intFH, i, bin 'читаем байт

If Hex(bin) = "FF" Then 'переводим значение в hex и сравниваем
'Put #intFH, i, "F0" ' если да пишем другое значение
End If
i = i + 1 'перемещаемся на байт
Loop

Close #intFH ' закрываем хендл

End Sub


Если не поможет, то исправим:))

Ответить

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


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #15 Добавлено: 04.08.05 21:05
ну можно как vito можно и не делать If Hex(bin) = "FF" Then , а сразу If bin = 255 then Put #intFH, i, 15 смысл один и тот же

Ответить

Страница: 1 | 2 |

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



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