sende information?
hejsa -jeg er ved at lave en hjemmeside, hvor gæsterne kan skrive info (navn,adresse,postnr,by,land,tlf,e-mail). hvor det så bagefter vil blive sendt til min e-mail.
min internet udbyder tilbyder ASP og CDON.
Er der nogle der kan hjælpe mig med at sætte sådan en kode sammen?
mvh mark.
Jeg har tidligere lavet denne kode, som virkede fint:
<% @LANGUAGE = VBScript %>
<% Option Explicit %>
<%
Dim strName, strEmail, strQuery, strSubj
strName = Trim(Request.Form("ClientName"))
strEmail = Trim(Request.Form("ClientEmail"))
strSubj = Trim(Request.Form("ClientEmne"))
strQuery = Trim(Request.Form("ClientQry"))
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("info@aalborg-cy.dk")
objMail.BCC = Join(aRecipients, ";")
objMail.Body = strQuery
objMail.Host = "mailout.b-one.net"
objMail.Send
Response.Write "<h1>Mail afsendt</h1>"
Response.Write "<p>Tak for din henvendelse.</p>"
Set objMail = Nothing
Else
%>
<form action="<%=Request.ServerVariables("SCRIPT_NAME")%>" method="post">
<fieldset>
<legend>Skriv dit navn, emne og besked</legend>
<label for="t1">Navn:</label>
<input id="t1" type=text name="ClientName" value="" size=40><br />
<label for="t2">Email:</label>
<input id="t2" type=text name="ClientEmail" value="maudy9000@frac.dk" size=40><br />
<label for="t3">Emne:</label>
<input id="t3" type=text name="ClientEmne" value="" size=40><br />
<label for="t4">Besked:</label>
<textarea id="t4" name="ClientQry" cols=40 rows=10></textarea><br />
<select name="Din by ?" size="3" multiple>
<optgroup label="Jylland">
<option>Århus</option>
<option>Aalborg</option>
<option>Esbjerg</option>
<option>Kolding</option>
</optgroup>
<optgroup label="Fyn">
<option>Odense</option>
<option>Middelfart</option>
<option>Svendborg</option>
</optgroup>
<optgroup label="Sjælland">
<option>København</option>
<option>Roskilde</option>
<option>Korsør</option>
</optgroup>
</select>
<label for="t5"> </label>
<input id="t3" type="Submit" value="Send" />
<input type="reset" value="Slet">
</fieldset>
</form>
<% End If %>