Just nu i M3-nätverket
Gå till innehåll

Jmail


knicken2

Rekommendera Poster

Hej!

Är det någon snäll själ som kan se vad jag har för fel i den här koden. Det ser ut som att meddelandet skickas iväg, men dessvärre kommer det inte fram.

Tack på förhand,

//Knicken

 

<%option explicit%>

 

 

<html>

<head>

<title>Formulär</title>

 

 

<script language="JavaScript">

 

function verify(){

 

var n=document.f1.Namn.value;

var f=document.f1.Foretag.value;

var t=document.f1.Telefon.value;

var e=document.f1.Email.value;

 

var msg="";

 

if(n==""){

msg="Du måste fylla i namn!\n";

}if(f==""){

msg = msg+"Du måste fylla i företag!\n";

}if(t==""){

msg=msg+"Du måste fylla i telefon!\n";

}if(e==""){

msg=msg+"Du måste fylla i email!\n";

}

 

 

if(msg==""){

return true;

}else{

alert(msg);

return false;

}

}

</script>

 

</head>

 

 

<body >

 

<%

Dim Action

Dim Namn

Dim Foretag

Dim Telefon

Dim Email

 

 

Action = Request.Form("Action")

Namn = Request.Form("Namn")

Foretag = Request.Form("Foretag")

Telefon = Request.Form("Telefon")

Email = Request.Form("Email")

 

 

%>

 

<%

if action="" then

%>

 

<form action="Formular.asp" method="post" name="f1" onSubmit="return verify();">

 

<div class= "tabell">

<table border="0">

 

<tr>

<td colspan="2" align="left">

 

<br><br>

 

<tr><td>

 

Namn<BR>

<input type="text" name="Namn" size="30" ONFOCUS="this.style.background='#cccccc'"

ONBLUR="this.style.background='#FFFFFF'"><br>

 

Företag<BR>

<input type="text" size="30" name="Foretag" ONFOCUS="this.style.background='#cccccc'"

ONBLUR="this.style.background='#FFFFFF'"><BR>

 

Telefon<BR>

<input type="text" size="30" name="Telefon" ONFOCUS="this.style.background='#cccccc'"

ONBLUR="this.style.background='#FFFFFF'"><BR>

 

 

Email<BR>

<INPUT TYPE="text" SIZE="30" NAME="Email" ONFOCUS="this.style.background='#cccccc'"

ONBLUR="this.style.background='#FFFFFF'"><BR>

 

 

</td>

<td>

 

Meddelande<BR>

<TEXTAREA NAME="body" COLS="40" ROWS="9" ONFOCUS="this.style.background='#cccccc'"

ONBLUR="this.style.background='#FFFFFF'">

</TEXTAREA ><BR/>

</td>

</tr>

 

<tr>

<td colspan="2" align="center">

<input type="hidden" name="action" value="verifiera">

<input type="submit" value="Skicka">

<input type="reset" value="Rensa">

</td>

</tr>

</table>

 

 

</form>

 

</div>

 

<%

 

 

elseif action = "verifiera" then

 

%>

 

<h4><center> Tack,<br>Ditt mail har nu skickats!</center></h4>

<%

 

set msg = Server.CreateOBject( "JMail.Message" )

 

msg.Logging = true

msg.silent = true

msg.From = Email

msg.FromName = Namn & ", " & Foretag

msg.AddRecipient "kikkigustafsson@hotmail.com"

msg.Subject = subject

msg.body = body

 

 

if not msg.Send("mail.lenapaterson.se") then

Response.write "<pre>" & msg.log & "</pre>"

else

Response.write "Meddelandet har skickats!!"

end if

 

 

 

else respons.write("felaktigt anrop")

%>

 

<%

end if

%>

 

 

</body>

</html>

Länk till kommentar
Dela på andra webbplatser

 

Hej!

 

Nej, jag får inget felmeddelande...när jag fyllt i alla fält och skickar i väg det så kommer endast "Tack, ditt mail har nu skickts upp".

 

 

 

Länk till kommentar
Dela på andra webbplatser

Arkiverat

Det här ämnet är nu arkiverat och är stängt för ytterligare svar.

×
×
  • Skapa nytt...