Ik zit met het volgende probleem, ik heb een formulier gemaakt en als men op send klikt krijg ik de resultaten netjes in mijn mail en 1 attachment. Ik weet niet zeker als dit het attachment is dat ik heb toegevoegd, want het is namelijk ATT1724150.dat Ik ben met dit formulier al 2 weken bezig, om er achter te komen hoe ik precies het attachment meekrijg. Onze server ondersteunt geen PHP.
Dit is een gedeelte van het ASP Script
Dit is een gedeelte van het ASP Script
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
| <%@ LANGUAGE="VBScript" %>
<% '***************************************************************************
'* ASP FormMail *
'* *
'* Do not remove this notice. *
'* *
'* Copyright 1999-2002 by Mike Hall. *
'* Please see http://www.brainjar.com for documentation and terms of use. *
'***************************************************************************
referers = Array("server")
mailComp = "mail"
smtpServer = "mail"
fromAddr = Request.Form("_mail") |
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
| 'Send email (CDOSYS version).
class MIME_mail
if mailComp = "10.131.26.155" then
set cdoMessage = Server.CreateObject("CDO.Message")
set cdoConfig = Server.CreateObject("CDO.Configuration")
cdoConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
cdoConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpServer
cdoConfig.Fields.Update
set cdoMessage.Configuration = cdoConfig
cdoMessage.From = fromAddr
cdoMessage.ReplyTo = replyTo
cdoMessage.To = recipients
cdoMessage.Subject = subject
cdoMessage.HtmlBody = body
cdoMessage.AddAttachment Request.Form("_File1")
on error resume next
cdoMessage.Send
if Err.Number <> 0 then
SendMail = "Email send failed: " & Err.Description & "."
end if
set cdoMessage = Nothing
set cdoConfig = Nothing
exit function
end if |
:strip_exif()/u/106968/belkar2.gif?f=community)
:strip_exif()/u/82595/smallhead_mindbrainII-small.gif?f=community)
:strip_exif()/u/13818/episodebutler_60x60.gif?f=community)
Dit topic is gesloten.