Hej Jakob
hurtigt svar
Her kommer det:
<%
Dim URL, SenderEmail, Message
URL = Request.QueryString("URL")
If Len(URL) = 0 Then URL = "
http://www.test.dk"
If Len(Request.Form("SendersEmail")) > 0 Then
Dim objMail,FriendEmail
sBody = "Den nye fiskeportal " & URL & " er blevet anbefalet af " &
Request.Form("SendersEmail") & vbCrLf & " -- Besked -- " & vbcrlf &
Request.Form("Message")
I=0
Do While True
FriendEmail = Request.Form("FriendEmail" & I)
If Len(FriendEmail) = 0 Then
Exit Do
Else
Set objMail = CreateObject("CDONTS.NewMail")
objMail.From = "test@mail.dk"
objMail.Subject = "test af CDONTS"
objMail.Importance=1
objMail.Body = sBody
objMail.To = FriendEmail
objMail.Send()
End If
I=I+1
Loop
Set objMail = Nothing
Response.write "<center><p class='textblack'>Tak fordi du anbefalede
test.dk</center>"
Else
End If
%>
<form method="POST" action="/moduler/tipenven/tipenven.asp?URL=<%= URL
%>">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif"
size="2">Tip
en fiskekammerat om: <%= URL %> <br><br>
Din E-mail:<br>
<input type="text" class="forms"name="SendersEmail" size="30">
<br><br>
Modtagers E-mail:<br>
1.
<input type="text" class="forms"name="FriendEmail0" size="22">
<br>
2.
<input type="text"class="forms" name="FriendEmail1" size="22">
<br>
Besked:<br>
<textarea rows="6" class="forms"name="Message" cols="26"></textarea>
<br><br>
<input type="submit"class="forms" value="Send">
</font> </div>
</form>
Jakob Andersen wrote in dk.edb.internet.webdesign.serverside.asp:
> "Thomas Kragh" <msako@mail.dk> wrote in message
> news:a0eta7$rva$1@sunsite.dk...
> > Jeg har et email script der benytter CDONTS - jeg får ingen fejl
> > når jeg sender emailen afsted. Men der kommer aldrig nogen email
> > frem til modtageren.
> >
> > De bliver tilgengæld samlet under mappen:
> >
> > /mailroot/pickup
>
> Må vi se dit script, jeg har på fornemmelsen du sætter det til at sende
> igennem pickup mappen og ikke SMTP porten.
>
> --
> Jakob Andersen
>
>
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP ???
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials