Can VBA be used to generate HTML docs?

[George Kinnear]

I am working on a project which relies on being able to generate
several hundred simple HTML documents, based on records from an Access
database.

I'm new to VBA, so I'm not sure if it can do what I want - to insert
values from the database into HTML (like <p>ValueFromField1</p>) and
save the resulting code as .htm files.

All I need to know is if it is vaguely possible, or if I should try
another method (suggestions welcome!).

Thanks in advance :)

[Lyle Fairfield]

do**@hsn.uk.net (George Kinnear) wrote in
news:40**************************@posting.google.c om:

I am working on a project which relies on being able to generate
several hundred simple HTML documents, based on records from an Access
database.

I'm new to VBA, so I'm not sure if it can do what I want - to insert
values from the database into HTML (like <p>ValueFromField1</p>) and
save the resulting code as .htm files.

All I need to know is if it is vaguely possible, or if I should try
another method (suggestions welcome!).

Thanks in advance :)

Yes, it's entirely possible.

a snippet:

..Seek "=", lngFatherId
If Not .NoMatch Then
subSubStream = Nz(.Collect(mRIFullNameIndex), "")
AC97Replace subSubStream, """", Len(""""), "&quot;"
subStream = mStrEvent
AC97Replace subStream, "[Title]", Len("[Title]"), "Father"
If InStr(strExcluded, "[" & CStr(lngFatherId) & "]") <> 0 Then
AC97Replace subStream, "[Event]", Len("[Event]"), subSubStream
Else
AC97Replace subStream, "[Event]", Len("[Event]"), _
"<a href=f" & lngFatherId & ".htm>" & subSubStream & "</a>"
End If
If InStr(Stream, subStream) = 0 Then Stream = Stream & vbCrLf &
subStream
End If
--
Lyle
(for e-mail refer to http://ffdba.com/contacts.htm)

[Tom van Stiphout]

On 5 Nov 2003 11:53:30 GMT, Lyle Fairfield
<Mi************@Invalid.Com> wrote:

Lyle, what is that .Collect method on a DAO recordset?
It doesn't seem to be documented anywhere.

-Tom.

do**@hsn.uk.net (George Kinnear) wrote in
news:40**************************@posting.google. com:

I am working on a project which relies on being able to generate
several hundred simple HTML documents, based on records from an Access
database.

I'm new to VBA, so I'm not sure if it can do what I want - to insert
values from the database into HTML (like <p>ValueFromField1</p>) and
save the resulting code as .htm files.

All I need to know is if it is vaguely possible, or if I should try
another method (suggestions welcome!).

Thanks in advance :)

Yes, it's entirely possible.

a snippet:

.Seek "=", lngFatherId
If Not .NoMatch Then
subSubStream = Nz(.Collect(mRIFullNameIndex), "")
AC97Replace subSubStream, """", Len(""""), "&quot;"
subStream = mStrEvent
AC97Replace subStream, "[Title]", Len("[Title]"), "Father"
If InStr(strExcluded, "[" & CStr(lngFatherId) & "]") <> 0 Then
AC97Replace subStream, "[Event]", Len("[Event]"), subSubStream
Else
AC97Replace subStream, "[Event]", Len("[Event]"), _
"<a href=f" & lngFatherId & ".htm>" & subSubStream & "</a>"
End If
If InStr(Stream, subStream) = 0 Then Stream = Stream & vbCrLf &
subStream
End If

[Perlith]

It depends on whether you are looking to do something quick and dirty or
something long term.

HTML is extremely quick and dirty, the only thing you would have to do is
establish a naming convention and default directory to point your hyperlinks
to (I'm presuming you are going to generate an index file of some sort as
well).

If you have the time, XML (at least in my opinion) is a better long term
solution. Defines your schema(s) and whatnot and then autogenerate based
off of those.
*You don't have to get too crazy with a schema/style, but you can still
output just the raw XML tags just as easily as HTML.

Good luck,

--
Travis Cornwell
Computer Science Coop
REM Services Inc.
tw******@ncsu.edu
"George Kinnear" <do**@hsn.uk.net> wrote in message
news:40**************************@posting.google.c om...

I am working on a project which relies on being able to generate
several hundred simple HTML documents, based on records from an Access
database.

I'm new to VBA, so I'm not sure if it can do what I want - to insert
values from the database into HTML (like <p>ValueFromField1</p>) and
save the resulting code as .htm files.

All I need to know is if it is vaguely possible, or if I should try
another method (suggestions welcome!).

Thanks in advance :)

[Lyle Fairfield]

Tom van Stiphout <to*****@no.spam.cox.net> wrote in
news:pj********************************@4ax.com:

On 5 Nov 2003 11:53:30 GMT, Lyle Fairfield
<Mi************@Invalid.Com> wrote:

Lyle, what is that .Collect method on a DAO recordset?
It doesn't seem to be documented anywhere.

-Tom.

Collect returns field values directly.
One can use a numerical index or the field name.
rst.Collect(5)
rst.Collect("SomeFieldName")

It seems to be the second fastest way of getting field values, after
declaration of a field, and the setting of that field to a field in the
recordset as:

Dim fld as DAO (or ADO) field
SET fld = rst.Fields(3) or rst.Fields("FieldName")

then

do something with fld.value. (Dimitri Furman pointed out that this was
faster when I suggested Collect might be fastest and after I wrote that
code.) I believe it's quite a bit faster than bang or dot using the default
property (value) or the recordset using the default field property.

Why isn't it documented? I don't know. I've been using it for years with no
problems. And I still use it for single retrievals of data. But when I'm
doing a lot of processing, say looping through a recordset 40 times, I use
the Dimitri method, that is I set the field object variables outside the
loop. This can have a dramatic effect on speed.

I'm wearing new glasses ... this may make no sense at all.
--
Lyle
(for e-mail refer to http://ffdba.com/contacts.htm)