Hej...
Sidder med nedenstående scrips til cdonts i asp.
Men i feltet ordrenummer (Oprindeligt e-mail) - SKAL man indtaste en e-mail..
Kan man ændre dette så, den også vil være med på at der står ordrenummer?
Her er scriptet!!:
<% @LANGUAGE = VBScript %>
<% Option Explicit %>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>EL-Compagniet Vinderup A/S - Intranet</title>
</head>
<body>
<%
Dim strName, strEmail, strQuery, strSubj
strName = Trim(Request.Form("Navn"))
strEmail = Trim(Request.Form("Ordrenummer"))
strSubj = Trim(Request.Form("Xdag"))
strQuery = Trim(Request.Form("Varer"))
If (strName <> "" And strEmail <> "" And strSubj <> "" And strQuery <> "") Then
Dim objMail, aRecipients
Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.From = strName & " <" & strEmail & ">"
objMail.To = strEmail
objMail.Subject = strSubj
aRecipients = Array("Vendelboe@slobi.dk")
objMail.BCC = Join(aRecipients, ";")
objMail.Body = strQuery
objMail.Host = "mailout.one.com"
objMail.Send
Response.Write "<p>Bestillingen er sendt til kontoret.</p>"
Else
%>
<form action="<%=Request.ServerVariables("aspmail.asp")%>" method=post>
<fieldset>
<legend><center>Husk at udfylde alle felter!</legend>
<label for="t1">Navn:</label><br>
<input id="t1" type=text name="Navn" value="" size=40><br />
<label for="t2">Ordrenummer:</label><br>
<input id="t2" type=text name="Ordrenummer" value="" size=40><br />
<label for="t3">Xdag:</label><br>
<input id="t3" type=text name="Xdag" value="" size=40><br />
<label for="t4">Varer:</label><br>
<textarea id="t4" name="Varer" cols=40 rows=10></textarea><br />
<label for="t5"> </label>
<input id="t3" type="Submit" value="Send bestilling" />
<input type="reset" value="Slet bestilling">
</center>
</fieldset>
</form>
<% End If %>
</body>
</html>