G'day Allen,
It's a beaut one in Melbourne.
I experimented with the rich text memo field.
Here's some code:
Const Quote As String = """"
Sub showstuff()
Dim db As DAO.Database
Set db = CurrentDb
Dim rst As DAO.Recordset
Set rst = db.OpenRecordset("tblTest", dbOpenDynaset)
Dim fld As DAO.Field
Set fld = rst.Fields("mymemofield")
rst.Edit
fld.Value = "<a href=" & Quote & "
http://www.theage.com.au/" &
Quote & ">
http://www.theage.com.au</a>"
rst.Update
Debug.Print fld.Value
End Sub
There is some trapping going on somewhere.
1. If you use The Age as the visible text, then the hyperlink
appearance and behaviour is suppressed even though the HTML code is
there.
2. If you use the hyperlink itself as the visible text, then the
hyperlink appearance and behaviour is active and will launch the
default browser.
3. I think the View Source keyboard shortcut in IE is Ctrl+F3 -
however this is suppressed.
Ananda