Opening and combining into one document is simple. Since the names are
predictable, you could write a loop that generates the file names, opens,
copies the content, and pastes into a new document --
Eg for May ---
pMonth = "05"
set pDoc1 = ActiveDocument
For pDay = 1 to 31 'Days in the month
for pShift = 1 to 3
pFileName =
http://www.cityofbellevue.org/departments/Police/files/Press_2005_" & _
pMonth & "_" & _
format(pDay, "00") & "_" & choose(pShift , "0600", "1400",
"2000") & ".doc"
set pDoc2 = Documents.Open(FileName:=pFileName, ReadOnly:=TRUE)
pDoc1.InsertAfter pDoc2.Range
pDoc2.Close SaveChanges:=FALSE
Next
Next
You'll need to add some error handling because I notice some files are
missing.
However, sorting by District is another kettle of fish altogether. The files
are not structured to make that easy. You need to parse the information and
organise it -- eg into a table or spreadsheet -- and then sort it. This is
several hours work for someone who knows what they're doing.
Separately, how does this information come to be on the web at all? -- since
by its own admission: "May contain confidential information. Any use of this
information must be based on BPD Policy 18.1" It appears to contain the
names of people arrested, including minors. Is it legal to publish this?
> Hello,
>
[quoted text clipped - 16 lines]
> thanks for any pointers!
> Sylvia
Sylvia - 23 Aug 2005 17:15 GMT
Thanks very much for your informative reply. I'll try this.
We're actually not interested in the arrest records, just the crime
reports.
Sylvia