Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations bkrike on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

starting a verification 1

Status
Not open for further replies.

metalman

Programmer
Sep 17, 2001
35
US
we download files everynight via phone line and dialups. i want to read this file and verify that all locations pulled and email me the names of the ones that did not pull. have tried with a form and with out. any ideas or help to get this done would be most appreciated
 
What part of the equasion is the problem?

A. Identifying the files "not pulled" and creating a list
B. Emailing you the list
3. All of the above



Wil Mead
wmead@optonline.net

 
Many details missing for any 'concrete' answer. I would (probably) set up a table with the list of 'expected' files with a date field. At some point, use dir / fileattr to replace the date with the file date from the O.S. When done, any files w/o the correct date are "not pulled" and therefore to be mailed to you. This can be done by making a query with the date as a criteria element. e-mail the recordset from the query to ...

MichaelRed
m.red@att.net

There is never time to do it right but there is always time to do it over
 
reading the file is the main problem keeps giving a run time error of path not found but have the exact path. i have open "filepath" _
input as variable
dont know where to go from here in debugging as for the validation and emailing havent got to debugg that yet.
 
Hmmm, The syntax you show is bad...

You should be matching to:
[tt]
Dim FileHandle as Integer
Dim FIlePath as String

FileHandle = FreeFile
OPEN FilePath FOR INPUT AS #FileHandle

[/tt]

Wil Mead
wmead@optonline.net

 
thank you wilmead i got passed opening the file, now i have created a function to print the list to the form.

Sub printdata(data As String)
Print "location is " & data

End sub

but will not print the location itself.

 
Print needs the debug object, But that's not going to help you. The Debug display is one thing, saving the data is another.

Debug.Print "location is " & data


Stick with the & even though print uses ; for concatonate.


You'll eventually need to open an output file and use the [tt]
FileHandle = FreeFile
OPEN FilePath FOR OUTPUT AS #FileHandle
...
PRINT #FileHandle, "location is " & data
...
Close FileHandle
[/tt]

There are numerous other methods for using files, these are only the basics... There are lots of threads dealing with this topic too.



Wil Mead
wmead@optonline.net

 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top