Visual Basic :: Open Dll File For Binary Read And Store As Resource **RESOLVED**

Open For Binary A READ-ONLY File
Accessing a file in a shared folder somewhere in the local network. This folder has Read-Only rights to the other computers.

Open "\computerXsharenameXmyfile.bin" For Binary Access Read As #1

With "access read" or without it, an error produced saying "path/file access error".

I am changing the Read-Only status of that folder in "computerX" to "full read-write access" and the above command works excellent.

This is absolute nuts cause the "access read" has the meaning the we are trying to open a file in binary mode ONLY FOR READING, and still is not working...

Any idea about this buggy behavior...

Read Binary File (RESOLVED)
I am using the code below to read a .dat file.

Code:
Private Sub GETFROMFILE(FILENAME As String)

Dim STRARR(2) As String
Dim FileLength As Long
Dim ByteArray(99072) As Byte

Open FILENAME For Binary As #1
FileLength = LOF(1)
Get 1, , ByteArray

Close #1

Dim Temp As String
For k = 1 To 3
If (ByteArray(k) < 127) And (ByteArray(k) > 32) Then
Temp = Temp & Chr((ByteArray(k)))
Else
Temp = Temp
End If
Next

Dim Temp2 As String
For k = 15 To 28
If (ByteArray(k) < 127) And (ByteArray(k) > 32) Then
Temp2 = Temp2 & Chr((ByteArray(k)))
Else
Temp2 = Temp2
End If
Next

Text1.Text = Temp
Text2.Text = Temp2

End Sub

This code returns the information from the file, but removes any spaces in the text. Any ideas as to why?

Thanks

Read Fixed Width Text File *resolved/open To Tips*
I'm starting a task where I'm going to need to read a fixed length text file and write it to SQL 2000 which I haven't done before. I don't want to start from scratch and run into the normal pitfalls if I can help it. Can someone point me to some existing code or a good tutorial on it? The SQL part is not a problem. What I'm looking for is a way to predefine the fields and the lengths to read into. I've run across snippets of code in my search but not a working model.

EDITED ***

Just in case someone else searches on this topic this is what I did and it seems to work. I'm open to constructive criticism and could use some tips on error handling for this. I just grabbed pieces from here and there to put it together. This is just the basic starting point to my task so if any one does have some tips now is the time.

VB Code:
Private strBWCClaimNumber As StringPrivate strMCONumber As StringPrivate strNoteCreateDate As StringPrivate strNoteTitle As StringPrivate strAuthorUserid As StringPrivate strAuthorLastName As StringPrivate strAuthorFirstName As StringPrivate strNoteID As StringPrivate strNotePrimary As StringPrivate strNoteContinuation As String Public Type NotesExport BWCClaimNumber As String * 10 'BWCClaimNum MCONumber As String * 5 '10005 NoteCreateDate As String * 10 'mm/dd/yyyy format NoteTitle As String * 40 'Subject or Category of Note AuthorUserid As String * 30 'Note Creator Userid AuthorLastName As String * 30 'Last Name from refUserInfo AuthorFirstName As String * 20 'First Name from refUserInfo NoteID As String * 50 '10005 + pkNote NotePrimary As String * 4012 'Primary text of note NoteContinuation As String * 4012 'Continuation text of noteEnd Type Private NR As NotesExport Public Sub ImportNotes() Dim iFile As Integer Dim L As Long iFile = FreeFile() Open frmMain.txtImport.Text & frmMain.lvImport.SelectedItem.SubItems(1) For Random As #iFile Len = Len(NR) For L = 1 To Int(LOF(iFile) / Len(NR)) Get #iFile, L, NR strBWCClaimNumber = NR.BWCClaimNumber strMCONumber = NR.MCONumber strNoteCreateDate = NR.NoteCreateDate strNoteTitle = NR.NoteTitle strAuthorUserid = NR.AuthorUserid strAuthorLastName = NR.AuthorLastName strAuthorFirstName = NR.AuthorFirstName strNoteID = NR.NoteID strNotePrimary = NR.NotePrimary strNoteContinuation = NR.NoteContinuation DoEvents Next Close #iFile End Sub

Store Runtimes And Such In A Resource File?
Is this possible? To store all the required dll's and libs in a resource file or something then have it compile with the exe? For example, if my program required msvbvm60.dll, oleaut32.dll, comcat.dll, etc. Is there a way to compile these with the exe so then instead of having them in the directory of the program, or put in some system directory and registered, I could just put them in a resource file or something then compiled with the exe? Is it possible?

Tell me if you dont understand my question.

Load Resource File And Store Them In Memory
hello

I'm trying to create a new image from other images. Here is my plan:
1) Create new resource file
2) store some image(bmp file), three or four, in resource file
3) load these images from resource file and store them in memory
4) combine and customize these images using some bitmap functions to

create new image
5) display new image in a form.
6) delete resource image that stored in memory.

But I've trouble at step 3), how do I load these images from resource file and store in memory?
help me plzz..

that's all, thanks

note: an example would be help me much.

How To Read A Sting, Then Store Into 2 Variables ??(RESOLVED)
Are there any snippets about that sow how to take a text string from a varibale, read along it, take the numbers out of the first part and store then ain a varibale, carry on reading untill the end of the string and store the rest into another part?

IE.

String1="2343 Name"
String2="221111123 Street"

I need to parse these string into 2343 in one varibale and Name into another.

Thanks for your time.

Store And Output A Binary File
How can I store a binary file in my program, and output it to a file later?

How To Open For Read This .HGT Binary Files??
Im keep trying to open this .hgt file in binary mode but i just get something like this:

Code:

Here is the specification of this kind of files: any idea?

Code:
Height files have the extension .HGT and are signed two byte integers. The
bytes are in Motorola "big-endian" order with the most significant byte first,
directly readable by systems such as Sun SPARC, Silicon Graphics and Macintosh.
DEC Alpha and most PCs use Intel ("little-endian") order so some byte-swapping
may be necessary. Heights are in meters referenced to the WGS84 geoid. Data
voids are assigned the value -32768.

SRTM-3 files contain 1201 lines and 1201 samples. The rows at the north
and south ecges as well as the columns at the east and west edges of each
cell overlap and are identical to the edge rows and columns in the adjacent
cell.

Store Binary Data In MS Access File
Hi,

I want to store binary files (Pictures) within an mdb file.
The table must bei appended with a new field "Picturefile"

how can i update my table with an SQL Query or ADOX?

This does not work:
===============

db.Execute "CREATE TABLE Backgrounds " & _
" (FileID INTEGER, " & _
" PictureData BLOB)

or

db.Execute "CREATE TABLE Backgrounds " & _
" (FileID INTEGER, " & _
" PictureData OLE)

Store A Excel File Into A Binary Field.
Dear all,

I have created a table with a binary field.
How can I store a excel (.xls) file into it using visual basic?
Expecting your reply.

Thanks.

Regards,
Sen

How To Store Binary Data From Database To XML File
Dear All,
I have some data store in database in binary format.
How I retrieve this data from database and handle it?
I can get other data from database and store it into xml file using ADO and MsXML. But I have no idea of how to store the binary data to XML file if even I can retrieve the binary data from database.

Best Regards,
the rockyu

Custom Binary Resource File Format Suggestions
I was just wondering what the best format for a custom binary resource file for my game would be. I was thinking first the contents table, then the files appended simply one after another. (and YES, I know how to get the files and bitmaps out of my resource file into DX.)

For the contents table I was thinking a DWord for the file's position in the resource, a DWord for the file's size, a byte for the length of the filename, and then a string the length of the last byte which contains the filename. For example, the file could contain:

88 (contained in a DWord)
78567 (contained in a DWord)
22 (contained in a byte)
"units/electra/move.bmp" (without the "")
78655
246875
24
"units/electra/fight1.bmp"
325530
421
15
"units/units.owz"
{append the contents of move.bmp}
{append the contents of fight1.bmp}
{append the contents of units.owz}

Is this a good idea? The program can know when the table is ending and the files are starting by the value of the first DWord so I don't need a table end or table length indicator. Should I add some 00 paddings (although I can't understand what purpose this could serve)?

There are quite a few formats I was thinking of but this seems to be the one that would work best. When my program loads it it can just load the table and then whenever a file is requested within my prog it can easily get it with the table in memory.

Would this work?

Binary File Access: String Doesn't Store Some Characters
Hi,

Sorry for the cryptic subject.

I was trying to read a file in binary mode. Here's the code.

dim Data as String, Chas as String*1

Pos = 1

open "c:1.txt" For Binary As #1

While Not EOF(1)
DoEvents
Get #1, Pos, Char
Data = Data & Char
'txtOld = txtOld & Char
Pos = Pos + 1
Wend

txtOld = Data

Close

The problem is that if the file contains non - printable characters, then the code doesn't read them. If I use the commented portions instead, there is no problem, but that would slow down the I/O.

Why is this happening? What is the solution?

Thanks.
Wild Thing

How To Store PDF File In Resource File
I want to store PDF file in Resource Editor so that letter user can open it from VB.

Urgent!! Open (read/write) Binary .... Sharks (Solved)
Guys!!

i am intending to read the content of a jpg file... can you show me how or what is the appropriate way to open and read the jpg content out and chuck away the first 2 bytes........... and re-save them into the same jpg file(in other words, overwrite)........

]
can this be done?? below is my sample code that i tried but its not working and so far (3 weeks time) i am not able to get an understandable example to help me proceed........ i dont understand how reading a file in binary works........
Poor thing ....... please help

Dim currfile As File
Dim size As Long
Set currfile = fso.GetFile(originallocation)

size = currfile.size
ReDim a(size - 2) As Byte

Open "c: empaby.jpg" For Binary As #1
Seek #1, 3
Get #1, size - 2, a
Close (1)

Open "c: empaby.jpg" For Output As #2
Put #1, size - 2, a
Close (2)

Stop

Read From File And Store Lines
Hi there,
This is the code I have so far:
I wish to open this text file and then store each line of the text file in a different variable. Each line consists of a file path.

This is my code so far

It would be really good if anyone could help. Thanks.

Code:
Public Sub actuallybindnow()
Dim thefilenames As String
Open App.Path & "indhelp.txt" For Input As #66
While Not EOF(66)
Input #66, thefilenames
Wend
Close #66
End Sub

How To Store/read Data To Another File?
For example, I'd like to have a file called Graphics.dat which includes all of my program's graphics. How do I save/load the graphics to the file?

P.S. I'm not meaning a res-file by this. Ie. If I would like to release an update to my program, the user would have to download the whole program instead of the small exe-file (which would contain no heavy graphics) if I'd use a res-file.

How To Read/Store .Wav File Content In EVB
in eVb How to Read/Edit/Save .Wav file content as Byte Stream
and store it into SQLCE.

OR

Is there a better way of storing Voice files into database directly as
string equivalents(rather than wav file creation & reading).

Thanks in advance.

How To Read And Store The Values Of IIS Log File In SQL Server?
Friends,

We have an IIS Log file. The file size of the Log file will be 2GB and above.
Now what i want to do is.
1. I have to read the IIS log file using SQL server either by query or by procedure.
2. Then i have to store the data inside the log file in the sql server table.
3. Using the SQL server table i will generate the report thru crystal reports.

Can anyone tell me how can i read and write the IIS log file using the sql server?
By the way...Is it possible to read and store the 2GB and above log files ?

Thanks and Regards,
SathyGuy

How To Read A .aspx Web Page And Store In A File
here is a website which displays rates on a .aspx webpage every few seconds is it possible to read the rates and store it in a .csv

im uploading the image as well as the web page so that u come to know what i want and what is the coding

this is the start i would like to capture data from ALUMINIUM

this is the end of my capture i would like to capture till last line zinc -0.17

also im uploading the html its in the zip file i saved

i would like to store the data in the format in a .csv format

ALUMINIUM,28FEB2007,1,KGS,122.60,122.60,122.60,122.60,123.00,-0.33
CARDAMOM,15FEB2007,1,KGS,,466.50,469.90,463.40,464.90,465.30,-0.09
CARDAMOM,15MAR2007,1,KGS,,498.90,507.00,498.00,500.00,496.50,0.70
CARDAMOM,14APR2007,1,KGS,,529.00,529.00,522.10,525.00,514.50,2.04
CARDAMOM,15MAY2007,1,KGS,,535.00,539.00,535.00,537.00,535.70,0.24

Read Data Of File And Store Them In Array
I want to read the data (int) of an intire txt file and put them in an array, but i have some problems. Here is my code:

Dim fn As Integer
Dim Data() As Integer
fn = FreeFile
Open "C:Data.txt" For Input As #fn
Do Until EOF(fn)
Line Input #fn, Data()->"Type Mismatch" or "Subscript Out Of Range"
Loop
Close #fn
End If
fn = FreeFile
Open "C:Data2.txt" For Output As #fn
Do Until EOF(fn)
Print #fn, Data()
Loop
Close #fn
Any ideas?

How To Read A .aspx Web Page And Store In A File
there is a website which displays rates on a .aspx webpage every few seconds is it possible to read the rates and store it in a .csv

im uploading the image as well as the web page so that u come to know what i want and what is the coding

this is the start i would like to capture data from ALUMINIUM

this is the end of my capture i would like to capture till last line zinc -0.17

also im uploading the html its in the zip file i saved

i would like to store the data in the format in a .csv format

ALUMINIUM,28FEB2007,1,KGS,122.60,122.60,122.60,122.60,123.00,-0.33
CARDAMOM,15FEB2007,1,KGS,,466.50,469.90,463.40,464.90,465.30,-0.09
CARDAMOM,15MAR2007,1,KGS,,498.90,507.00,498.00,500.00,496.50,0.70
CARDAMOM,14APR2007,1,KGS,,529.00,529.00,522.10,525.00,514.50,2.04
CARDAMOM,15MAY2007,1,KGS,,535.00,539.00,535.00,537.00,535.70,0.24

Edited by - rohitb on 2/2/2007 9:35:48 PM

Array, And Text File Read To Store String, Help Please
I'm having a hard time getting the arrays and infinite looping to work correctly.

When I press the "ok" button, I want my program to open and read a text file, and read each line of text and store it into a string, I then want the string broken up, and if a textbox = one of the broken up strings, I want it to go to the next forum and display it. At the same time, I want to be able to edit the .txt file and add more entries to each line. Meaning... I can add any number of entries I want too.

So here is what I have below...
=============================
Dim READER As String

Open "T:StaffordProjectProgrammingids.txt" For Input As #1
Line Input #1, READER
Close #1
Display1.Caption = READER
=============================
What this does is open the file and reads line #1, then closes and displays it in the display1.caption, I want it to read X number of lines = infinite, and I want it to split the string, by "-" but when I split, I seem to have a problem with that... it doesn't need to display the strings, it needs to keep a record of them so when the numbers are punched in and equal a string, it will go to the next form.

Here's what the text file looks like inside... 6 numbers and a name.
-325435;Mark Lane
-464743;Zack Park

So if I press 3,2,5,4,3,5, and then hit "ok" it goes to the next form with 325435, Mark Lane as logged in.

How To Read An Ascii File And Store Values In Memory?
Hello Gang,

I have this .asc file and the first 6 lines are headers the remaining file looks something like this:
0.5374 0.5918 0.7215 0.8622 0.9652..
0.5577 0.618 0.7739 0.878 0.9479..
.
.
.
.
.
The number of rows and colums of data depends on the size of file the user selects.. So Now i need to read each of the values separately as there is going to be an algorithm used where this ascii file will be the input and after some calculations, it'l give an output ascii file that is have the same set of rows and columns but difference in values due to the effect of the algorithm.
And this ascii file is actually a satelite image that can be used later for analysis..

So how I should go about it.. Do i use an array to write each of the numbers into it??

Ricky

Open As Read Only (Resolved)
I'm having problems detecting whether the "Open as read only" box is checked or not when using the Common Dialog Control.

This is the pertinent (incorrect) code that I have right now:

Dialog.Flags = cdlOFNLongNames Or cdlOFNFileMustExist

Dialog.ShowOpen

If Dialog.Flags = cdlOFNReadOnly Then
Debug.Print "read only"
End If

Any help would be greatly appreciated.

Store/Open Data With A TXT File
I am making a program that stores/opens text with a txt file. I have 3 text boxs, 1 listbox and a Save button. The user types a name into text1 and types info into the Text2, then presses the save button. When that happens it saves the info from text1 and text2 into a txt file.
The problem I have is, when I open the program I need the name from Text1 to show up into the ListBox and the info from Text2 to show up in Text3 if I click the Name thats in ListBox1.

Any Ideas?

How To Read/play External Resource (wave) File
Hi folks,

Is it possible to read an external (wave) resource file, not to include the
wave (.res) with the Exe file! What for? Basically, I want to send new wave
file/res file
without sending and/or remaking new exe file every time.

Your help (sample code) and guidance is greately appreciated!

Regards,

Jay

Resource File *RESOLVED*
is there anyway that you can write any values to a resource file using vb or api calls? just wondering?

Read Binary File
i have i hope a very simple question
i have a binary file (mpeg file) that i need to get a hex figure from at a specific address.

ie address is &H82B
once at this point i need to read the byte and return the value (will be 3 or 4)

inputifo = "blah blah"
ff = FreeFile
Open inputifo For Binary As #ff
s = Input(LOF(ff), ff)
Dim a As Byte

but stuck here
thabks

Binary File Read
hi,
i want to read a binary file, the structure of which is defiled in "C".
the "C" structure defenition of the file is the following.....

History file is a binary file with structure as below. any one can help me with the code/tips to read this file in VB 6.0

thanks

sjp

oldest data set; oldest-1 data set;... newest data set; header; eof

1.2 Data set description
Ever data set header is defined in following C style structure
/*-------------------------------------*/
typedef struct {
int number ; //current number of data set
time_t time ; //time stamp of data set(calendar
time, count of seconds until 0:0:01.1.1900)
float pressure ; //absolute pressure in hPa
float wind_speed ; //wind_speed in m/s
enum DIRECTION wind_dir ; //wind direction
float rain ; //rain counter in mm
float in_temp ; //indoor temperature in °C
float out_temp ; //outdoor temperature in °C
unsigned short in_hum ; //indoor humidity in %
unsigned short out_hum ; //outdoor humidity in %
}HISTORY_DATA_SET;//end of struct HISTORY_DATA_SET;
/*-------------------------------------*/
enum DIRECTION { N,NNE,NE,ENE,E,ESE,SE,SSE,S,SSW,SW,WSW,W,WNW,NW,NNW, ERR,};
/*-------------------------------------*/
typedef unsigned int time_t;
/*-------------------------------------*/
1.3 Header description
The header is defined in follwing structure (C style)
/*-------------------------------------*/
typedef struct {
unsigned int magic ; //number for
header authentification equal to0x21436587in current version
//rain values
float rain_offset ; // rain offset (
substract to get the correct value)
float last_rain_value ; // for internal
use - last rain value used to detect rain counter overflow
time_t rain_reset_time ; // time of last
rain reset
//DATA information
int data_count_in_file ; //count of data
sets in buffer
time_t time_of_first_saved_set ; //time of first
saved data set (calendar=seriell time)
time_t time_of_last_saved_set ; //time of last
saved data set (calendar=seriell time)
}FILE_HISTORY_HEADER;
/*-------------------------------------*/
1.4 History actualisation
The history file will be on run time of the „heavy weather“ cyclic actualised. First will be append the new data
set on the end of file. The old header will be overwritten. Then the new header will be append on the end of file
.

Read Binary File
Hi!

Someone Can tell me how to know if a string ex.: "TAG2" is in a binary file and how to know is position?

Thanks!

JP III

How To Read From Binary File?
Hi
I have a binary file that i need to read the first 5 values in it.
To do this i tried the Open & Input but i guess i doing something wrong cuz it didn't read it as i need.
I have a code that do this in VC but i need it to be converted in to VB

can any one help me?
Here is the code in vc:

Code:
WORD pVersion[4];
file.Read(pVersion, sizeof(pVersion));

What VB have to used as WORD data type?
Thanks

Font In Resource File - RESOLVED
being a web designer, i have paid good money for a bunch of fonts i have, and i want to use one of these fonts in my app.

however, since i paid for it, i just dont want to install the font onto the system, cause then it can be freely distributed.

now, when i goto add a font to the resource editor, it puts it under a custom user resource heading, and when i go to access it using LoadResData(101,8) i get a runtime error

on msdn it has that you can add it especially as a font resource, but in the editor there is no button to add it as a font resource.

Any ideas on how i can accomplish this?

Xp Style In Resource File **RESOLVED**
How do I do to get the manifest to work in a resource file??
I don't wan't to have the manifest as a file I wan't it in the exe file..

Installing VB Resource File Add-in *RESOLVED*
I've browsed the MSDN library but I can't seem to find a place to download/install the resource file add-in. It's not an available option in the Add-In Manager. In fact, there are only two add-ins available on my machine. In short, is there a place to grab that add-in so I can include it in my program. I'm running 6.0, by the way. Thanks.

JPEG's In Resource File - *RESOLVED*
Simple question......

What type of file would I need to use to hold a load of images? I have approx 46 images, which I can make into various formats - .gif, bitmap, jpeg etc... I want to put them all into one "file" so I can call them up when needed.

TIA

(/)onkey

*Resolved*Creating . Ini File To Store Information
I have no idea how to create or what code to put into my program so that it saves the setting of the screen size, database path and other such information..

Anyone know of a step by step guide?

Merry Christmas everyone btw

--------------------------------------------------------------------------------
I am a VB learner with huge ideas!! push yourself and you shall learn more

First Project: www.BowlAGE.co.uk (Forever GROWING!!)

I aim to assist the Ten Pin Bowling Instructors around the world with this!!!!
--------------------------------------------------------------------------------

Edited by - EPOS on 12/22/2004 8:29:05 AM

Binary File Read Query
I'm a fairly new to VB 6 and have just been tasked with reading in a binary file. I've done text file before but am lost on binary stuff....

I'm sure that this is an easy but I'm having real difficulties.

Background: the file I'm reading is 897Kb in size. I want to read that in and pull out parts of the file I'm interested in (there is a number of records stored in the file). I'm interested in stuff at byte position 1..1, 2..4 & 5..6 for each record.

I have read the tutorial but have had no luck to date.

Heres my code so far:

Private Sub loadData(filename As String)
'cater for fact cancel was chosen
If filename = "" Then Exit Sub

Dim fFile As Long
Dim bBuf() As Byte
fFile = FreeFile

Dim myarray

Open filename For Binary As #fFile
If LOF(hFile) Then

ReDim myarray(LOF(fFile))
Get #fFile, , myarray
End If
Close #fFile
end sub

As soon as my code trys to executte the Get #fFile, , myarray I get a runtime eoor '458' - variable uses an automation type not supported in Visual Basic.

Any clues whats going on here please.

Thanks

How To Read Binary Data From A File
i want to read data from *.SD5 file...the data in that file is stored in binary formate...i want to read all the data from that file
in string or text formate.......how to do that............i used the following code...but i get some junk...

Private Sub Command1_Click()

Dim MyString, MyNumber
Open App.Path & "sarsewa2sarangarh.sd5" For Input As #1 ' Open file for input.
Do While Not EOF(1) ' Loop until end of file.
Input #1, MyString, MyNumber ' Read data into two variables.
MsgBox MyString & MyNumber ' Print data to the Immediate window.
Loop
Close #1 ' Close file.

End Sub