|
-
Feb 1st, 2008, 06:28 AM
#1
Thread Starter
Lively Member
[RESOLVED] (VB6)How to Read Values under Character Codes?
Hi All my friends,
This is the Characters from an Tiff Image File I Want to read :
II* þ @ Þ @ Þ Î Ö ( ) – – Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ
Þ‚
Þ Þ‚ Þ Þ‚ Þ
Þ‚
Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ Þ Þ‚ € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € € œºœº ¹ ¹œº˜¹˜¹'¹ä¹Ù¸¹3¸3¸‡¸¡¹Ý¹ºº¶¹‡¹¹¹@¹º¸ºNº?ºí¹ò¹š¹’� �²¹†¹‡¹b¹¹…¹¿¹«¹]¹¹,¹_¹x¹h¹¼¹o¹K¹B¹i¹Ë¹ª¹°¹“¹Ê¹Ä¹ º¥¹|¹8¹e¹í¹ƒº¿ºÒºß¹Í¹g¹¨¹I¹x¹y¹*¹Ò¹d¹!¹6¹]¹›¹n¹K¹2¹Y¹ž¹³¹¹c¹’¹¹¹x¹ ¹ë¸$¹1¹a¹p¹Z¹b¹–¹î¹Ð¹¹¹3¹è¹ºÐ¹‹¹4¹¹¸¹G¹,¹ð¸W¹k¹ƒ¹-¹
¹æ¸L¹+¹M¹l¹F¹–¹“¹œ¹‡¹l¹¹ ¹õ¸¹9¹¹¹¹E¹6¹¹¹Ñ¸ê¸S¸
Could some one tell me how to recognise the data hidden under these characters,
this line is the header information from TIFF image file, as it consists of Tags and Values for that tags. Is there any method without using APIs to convert these values to its original ones.
In VB though after reading this file in binary mode, the original values cant get visible.
Or I am missing something.
My Code :
Const Buffer=2
Dim strData As String
Open txtPath.Text For Binary Access Read As nHandle
lSize = LOF(nHandle)
If nHandle = 0 Then
Close nHandle
End If
ReDim Chunk(lSize - 1)
Get nHandle, , Chunk
For i = 1 To UBound(Chunk)
' Need to Print the Original Value
' either it may be String or a Numeric Value
' As XResolution: 1024
strData = Chr(Chunk(i))
Debug.Print strData
Next
Close nHandle
As Converting to Chr() again prints its Character Code ; I got really confounded to get exact results.
Looking for quick help....
Thanks in advance
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|