Ive managed to set up an online form to deal with absences.

People enter information and it then sends to an access database. One field they have to fill in is their email and ive set-up the database so it appears as a hyperlink when you look in the database.

However when i click on it within access i want it so that outlook/outlook express opens so you can reply to that email address but this doesnt happen. How can i set it so this does happen??

Thanks!

Woody

<a href="mailto:<%= EmailAddressField %>">E-mail This Person</a>

But I'd suggest that you have the EmailAddressField or whatever it is named actually be a text field within the database itself.

thanks for that - ill try it!

Ive also got this code done - im told its close to achieving what i want but it still doesnt send me an email

Dim objConfig  ' As CDO.Configuration
Dim objMessage ' As CDO.Message
Dim flgEmailSent

flgEmailSent = False

Const cdoSendUsingMethod = "http://schemas.microsoft.com/cdo/configuration/sendusing"
Const cdoSendUsingPort = 2
Const cdoSMTPServer = "http://schemas.microsoft.com/cdo/configuration/smtpserver"
Const cdoSMTPServerPort = "http://schemas.microsoft.com/cdo/configuration/smtpserverport"
Const cdoSMTPConnectionTimeout = "http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout"
Const cdoSMTPAuthenticate = "http://schemas.microsoft.com/cdo/configuration/smtpauthenticate"
Const cdoBasic = 1
Const cdoSendUserName = "http://schemas.microsoft.com/cdo/configuration/sendusername"
Const cdoSendPassword = "http://schemas.microsoft.com/cdo/configuration/sendpassword"

Set objConfig = CreateObject("CDO.Configuration")
Set objMessage = CreateObject("CDO.Message")

' Set config fields we care about
With objConfig.Fields
	.Item(cdoSendUsingMethod)       = "cdoSendUsingPort"
	.Item(cdoSMTPServer)            = "http://217.180.78.26/exchange/"	
	.Item(cdoSMTPServerPort)        = "25"
	.Item(cdoSMTPConnectionTimeout) = "10"
	.Item(cdoSMTPAuthenticate)      = "cdoBasic"
	.Item(cdoSendUserName)          = "<Myusername>"
	.Item(cdoSendPassword)          = "<Mypassword>"
	
	.Update
	
End With

Set objMessage.Configuration = objConfig

With objMessage
	.To			= "pworsnop@wickersley.net"
	.From		= "Sender's Email"
	.Subject	= "Absence Request"
	
	.TextBody	= "This is the message"
        'or
	'.HTMLBody	= "<This is the message in HTML>"
	
	On Error Resume Next
	
	.Send
	
	If err.number = 0 Then
		flgEmailSent = True
	Else
		m_strErrors = err.Description
	End If 
	
	On Error GoTo 0
End With

Set objMessage = Nothing
Set objConfig = Nothing		

%>

I get the following error message when using the above code:

ADODB.Fields error '800a0ea5' 

Fields update failed. For further information, examine the Status property of individual field objects. 

/AbsenceForm/RecordAdded.asp, line 86