Notifikationer

Markér alle som læst Log ud

no_doubt Nybegynder

25. august 2001 - 16:18 Der er 15 kommentarer og
1 løsning

gå til efter udførelse

Denne kode :
<% if mode = \"send\" then %>
<%
Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
JMail.ServerAddress = \"mail.dk\"
JMail.Sender = Request.Form(\"fra_mail\")
JMail.Sendername = Request.Form(\"fra_navn\")
JMail.Subject = Request(\"emne\") & \" - Min Private Side\"
JMail.AddRecipient \"mark.mikkelsen@mail.dk\"
JMail.Body = Request.Form(\"besked\")
JMail.Priority = 3
JMail.AddHeader \"Originating-IP\", Request.ServerVariables(\"REMOTE_ADDR\")
JMail.Silent = True
If JMail.Execute then

%>
Tak for din Mail. <% Else %>
Mailen er desværre ikke afsendt prøv igen. <% End If %>
<% end if %>

Skal hvis mailen er sendt, skrive Tak for brev som den gør nu og så gå til bruger.asp

Hvem kan lave det ?

Synes godt om

tommyf Nybegynder

25. august 2001 - 16:20 #1

%>
Tak for din Mail.
<%
Response.Redirect(\"bruger.asp\")
Else %>

Synes godt om

no_doubt Nybegynder

25. august 2001 - 16:24 #2

nej nu går den bare videre efter afsendélse den skriver ikke tak for din mail

Synes godt om

tommyf Nybegynder

25. august 2001 - 16:25 #3

Hvis du skulle være i tvivl skal hele koden se spdan her ud:

<% if mode = \"send\" then %>
<%
Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
JMail.ServerAddress = \"mail.dk\"
JMail.Sender = Request.Form(\"fra_mail\")
JMail.Sendername = Request.Form(\"fra_navn\")
JMail.Subject = Request(\"emne\") & \" - Min Private Side\"
JMail.AddRecipient \"mark.mikkelsen@mail.dk\"
JMail.Body = Request.Form(\"besked\")
JMail.Priority = 3
JMail.AddHeader \"Originating-IP\", Request.ServerVariables(\"REMOTE_ADDR\")
JMail.Silent = True
If JMail.Execute then

%>
Tak for din Mail.
<%
Response.Redirect(\"bruger.asp\")
Else %>
Mailen er desværre ikke afsendt prøv igen. <% End If %>
<% end if %>

Synes godt om

tommyf Nybegynder

25. august 2001 - 16:25 #4

Sorry, 2 sek

Synes godt om

tommyf Nybegynder

25. august 2001 - 16:30 #5

<% if mode = \"send\" then %>
<%
Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
JMail.ServerAddress = \"mail.dk\"
JMail.Sender = Request.Form(\"fra_mail\")
JMail.Sendername = Request.Form(\"fra_navn\")
JMail.Subject = Request(\"emne\") & \" - Min Private Side\"
JMail.AddRecipient \"mark.mikkelsen@mail.dk\"
JMail.Body = Request.Form(\"besked\")
JMail.Priority = 3
JMail.AddHeader \"Originating-IP\", Request.ServerVariables(\"REMOTE_ADDR\")
JMail.Silent = True
If JMail.Execute then

%>
<HTTP-EQUIV=\"Refresh\" CONTENT=\"3;URL=bruger.asp\">
Tak for din Mail.
<%
Else %>
Mailen er desværre ikke afsendt prøv igen. <% End If %>
<% end if %>

Synes godt om

no_doubt Nybegynder

25. august 2001 - 16:30 #6

okay

Synes godt om

no_doubt Nybegynder

25. august 2001 - 16:32 #7

der skete kun det at der stod tak.....

Synes godt om

tommyf Nybegynder

25. august 2001 - 16:33 #8

Ventede du 3 sekunder?

Synes godt om

no_doubt Nybegynder

25. august 2001 - 16:35 #9

Jada

Synes godt om

tommyf Nybegynder

25. august 2001 - 16:38 #10

Ups, lille fejl. Prøver igen, de skulle stå:

<meta http-equiv=\"REFRESH\" content=\"3; url=bruger.asp\">

Synes godt om

no_doubt Nybegynder

25. august 2001 - 16:40 #11

Nu går den videre efter 3 sek når du kommer ind på siden

Synes godt om

tommyf Nybegynder

25. august 2001 - 16:42 #12

Er det så i orden?

Synes godt om

no_doubt Nybegynder

25. august 2001 - 16:43 #13

Nej da kan ikke når at udfylde formularen på 3 sek

Synes godt om

tommyf Nybegynder

25. august 2001 - 16:45 #14

Ser dine filer ikke sådan her ud?:

udfyld.asp <-- Med formular der peger på nummer 2.
Send.asp <-- Som er den jeg har rettet i.

<meta http-equiv=\"REFRESH\" content=\"3; url=bruger.asp\">
- Ovensåtende kode skal ikke sættes ind på den side med formularen men på den side der afsender - altså indeholder ovenstående kode.

Synes godt om

tommyf Nybegynder

25. august 2001 - 16:49 #15

Så prøv det her:

<% if mode = \"send\" then %>
<%
Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
JMail.ServerAddress = \"mail.dk\"
JMail.Sender = Request.Form(\"fra_mail\")
JMail.Sendername = Request.Form(\"fra_navn\")
JMail.Subject = Request(\"emne\") & \" - Min Private Side\"
JMail.AddRecipient \"mark.mikkelsen@mail.dk\"
JMail.Body = Request.Form(\"besked\")
JMail.Priority = 3
JMail.AddHeader \"Originating-IP\", Request.ServerVariables(\"REMOTE_ADDR\")
JMail.Silent = True
If JMail.Execute then

Response.Write \"<HTTP-EQUIV=\"\"Refresh\"\" CONTENT=\"\"3;URL=bruger.asp\"\">\"
%>
Tak for din Mail.
<%
Else %>
Mailen er desværre ikke afsendt prøv igen. <% End If %>
<% end if %>

Synes godt om

no_doubt Nybegynder

25. august 2001 - 16:51 #16

jeps den dudder

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
ASP classic kopiere database fil på server Af bsn i ASP	7	31/10/202610:20	01/11/202620:28
Persits.Upload Af bsn i ASP	9	17/09/202611:37	21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	10	25/06/202622:20	04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS