Mamba

Hi,

I wounder if somone could help i'm getting the following error when trying to submit a form

Microsoft VBScript runtime error '800a01f4'

Variable is undefined: 'oMail'

/SubmitCatalogueRequest.asp, line 4

Many thanks David.

Alan

I assume your attempting to run an asp page.

This error usually means that a variable has been created, but has not been defined with a dim statement. Often this includes ADO constants, such as adOpenForwardOnly and adLockOptimistic.

__________________

ahb Solutions Consultancy and Web Development

Seen a good post - Give some reputation click on the

Mamba

Hi I'm working on a site created by someone else, i'm very new to ASP.

here is the code:

<% Option Explicit %>
<%

Set oMail = Server.CreateObject("CDO.Message")
Set oMailConfig = Server.CreateObject ("CDO.Configuration")

oMailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"
oMailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
oMailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
oMailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
oMailConfig.Fields.Update

'set the mail parameters
sMessage = "The following catalogue request has been sent via the MWS Website:" & chr(13) & chr(10) & chr(13) & chr(10)

sMessage = sMessage & "Name: " & request.form.item("name") & chr(13) & chr(10) & chr(13) & chr(10)
sMessage = sMessage & "Address: " & request.form.item("address") & chr(13) & chr(10) & chr(13) & chr(10)
sMessage = sMessage & "Telephone Number: " & request.form.item("telephone") & chr(13) & chr(10) & chr(13) & chr(10)

sFrom = request.form.item("emailAddress")
sMessage = sMessage & "Email address: " & sFrom & chr(13) & chr(10) & chr(13) & chr(10)

Set oMail.Configuration = oMailConfig
oMail.From = "mwsWebsite@mwsltd.co.uk"
oMail.To = "sales@mwsltd.co.uk"
oMail.Subject = "MWS Catalogue Request Form"
oMail.HTMLBody = sMessage
oMail.Send

Set oMail = Nothing
Set oMailConfig = Nothing
response.redirect("Confirmation.asp")

Many thanks for the help

Alan

By default, Microsoft's VBScript lets you implicitly declare variables in your code. You have <% Option Explicit %> at the top of your code, the <% OPTION EXPLICIT %> function to require that all variables be declared first.

I use a similar routine and do not use <% Option Explicit %>, try removing this as a first step, failing that you need to define the variable, use Dim = oMail before the Set oMail = ...

__________________

ahb Solutions Consultancy and Web Development

Seen a good post - Give some reputation click on the