webForumDet fria alternativet

Hej, jag är ny med det här om ASP, så jag har en fråga

ASP

55 svar · 1 439 visningar · startad av Imjojojo · sida 2 av 3

Frågan, av Imjojojo

Jag försöker att göra ett formulär, och jag såg på en hemsida att man kunde använda ASP, så jag testade det, det funkade, men det som stod i formuläret kom inte med.

Läs frågan i sin helhet →
Medlem sedan apr. 2004778 inlägg
#21

Om webbhotellet säger att det där är vad du ska använda så är det CDONTS, vilket är bra för dig.
Då kan du använda min kod rakt av med en liten ändring eftersom du måste ange Host.
Här är den korrigerade koden. Ladda upp och testa.

<%@ Language=VBScript %>
if Request.Form("isSubmitted") = "yes" then
	EmailFrom = Request.Form("Email_Address_From")
	EmailTo = Request.Form("Email_Address_To")
	EmailBody = Request.Form("SenderName") & vbcrlf
	EmailBody = strBody & Request.Form("Email_Body") & vbcrlf

	Set objCDO = Server.CreateObject("CDONTS.NewMail")
	objCDO.From = EmailFrom
	objCDO.To = EmailTo
	objCDO.Cc = ""
	objCDO.Bcc = ""
	objCDO.Subject = Request.Form("Email_Subject")
	objCDO.Body = EmailBody
        objCDO.Host = "smtp1.b-one.nu"
	objCDO.BodyFormat = 1
	objCDO.MailFormat = 1
	objCDO.Send
        Set objCDO = Nothing
	mailsent = True
else
	mailsent = False
end if
%>
<html>
<head>
<title> Skicka Mail </title>
</head>
<body>
<% if mailsent then %>
	Ditt mail har skickats
<% else %>
	<form action="sendmail.asp" method="post" name="Input_Form">
		Ditt namn:<br>
		<input type="text" name="SenderName"<br><br>
		Din e-postadress:<br>
		<input type="text" name="Email_Address_From"<br><br>
		Mailets ämne:<br>
		<input type="text" name="Email_Subject"<br><br>
		Ditt meddelande:<br>
		<textarea name="Email_Body" COLS="40" ROWS="10"></textarea><br><br>
		<input type="hidden" value="mailadressattskickatill@mail.com" name="Email_Address_To">
		<input type="hidden" name="isSubmitted" value="yes">
		<input type="submit" value="Skicka" id="submit1" name="submit1"><br>
	</form>
% end if %>
</body>
</html>
Medlem sedan jan. 200454 inlägg
#22

Tack, det är till bra hjälp, men vid action står det "sendmail.asp", ska formuläret heta så eller???

Medlem sedan apr. 2004778 inlägg
#23

Min asp-fil heter sendmail.asp så du får döpa din asp-fil till det eller ändra action till vad din fil heter.

Medlem sedan jan. 200454 inlägg
#24

Så det ska vara två dokument alltså?

Medlem sedan juli 20022 537 inlägg
#25

Imjojojo skrev:

Så det ska vara två dokument alltså?

Nej, spara koden PDahlen skrev som sendmail.asp och ladda upp på ditt webbhotell.

Medlem sedan jan. 200454 inlägg
#26

När jag föröker komma in står det bara The page cannot be displayed

Medlem sedan juli 20022 537 inlägg
#27

Vad är adressen till filen?
Har du tagit bort "visa anpassade http-felmeddelanden" i ie?

Medlem sedan jan. 200454 inlägg
#28

adressen är http://www.jojos-world.com/sendmail.asp

Medlem sedan dec. 20003 563 inlägg
#29

Du har lagt den i fel mapp. Kontrollera igen.

Medlem sedan jan. 200454 inlägg
#30

Vilken mapp ska den vara i da?

Medlem sedan jan. 2000640 inlägg
Medlem sedan jan. 200454 inlägg
#32

Vad ska menas med det?

Medlem sedan jan. 2000640 inlägg
#33

det menas att filen ligger hos comhem, som inte verkar ha stöd för asp?

Medlem sedan jan. 200454 inlägg
#34

Det gör den ju inte alls, det ska den iaf inte

Medlem sedan jan. 2000640 inlägg
#35

ok, för filen ligger inte på

http://www.jojos-world.com/sendmail.asp

men när jag går in på din hemsida (jojosimwold) så studstar den till comhemsidan, där sendmail.asp finns.

Medlem sedan jan. 2000640 inlägg
#36

såg nu att du hade b-one. så då borde det fungera om du lägger upp filen på rätt ställe.

(nu är dock filen upplagd)

Medlem sedan jan. 200454 inlägg
#37

Ja, men jag får inte kontakt med mitt webhotell :x :(

Medlem sedan apr. 2004778 inlägg
#38

Jo, filen ligger där men det kan vara jag som missat något. Det verkar saknas ett End.

Kollar

...

Medlem sedan apr. 2004778 inlägg
#39

Ok, det hade trillat bort ett tecken.
Här är den fungerande koden. Detta är alltså den kompletta sendmail.asp. Bara att kopiera, klistar in, ladda upp och köra.

<%@ Language=VBScript %>
<%
if Request.Form("isSubmitted") = "yes" then
	EmailFrom = Request.Form("Email_Address_From")
	EmailTo = Request.Form("Email_Address_To")
	EmailBody = Request.Form("SenderName") & vbcrlf
	EmailBody = strBody & Request.Form("Email_Body") & vbcrlf

	Set objCDO = Server.CreateObject("CDONTS.NewMail")
	objCDO.From = EmailFrom
	objCDO.To = EmailTo
	objCDO.Cc = ""
	objCDO.Bcc = ""
	objCDO.Subject = Request.Form("Email_Subject")
	objCDO.Body = EmailBody
        objCDO.Host = "smtp1.b-one.nu"
	objCDO.BodyFormat = 1
	objCDO.MailFormat = 1
	objCDO.Send
        Set objCDO = Nothing
	mailsent = True
else
	mailsent = False
end if
%>
<html>
<head>
<title> Skicka Mail </title>
</head>
<body>
<% if mailsent then %>
	Ditt mail har skickats
<% else %>
	<form action="sendmail.asp" method="post" name="Input_Form" ID="Form1">
		Ditt namn:<br>
		<input type="text" name="SenderName"><br><br>
		Din e-postadress:<br>
		<input type="text" name="Email_Address_From"><br><br>
		Mailets ämne:<br>
		<input type="text" name="Email_Subject"><br><br>
		Ditt meddelande:<br>
		<textarea name="Email_Body" COLS="40" ROWS="10"></textarea><br><br>
		<input type="hidden" value="mailadressattskickatill@mail.com" name="Email_Address_To" ID="Hidden1">
		<input type="hidden" name="isSubmitted" value="yes">
		<input type="submit" value="Skicka" id="submit1" name="submit1"><br>
	</form>
<% end if %>
</body>
</html>
Medlem sedan jan. 200454 inlägg
#40

Visst, kolla nu på https://www.jojos-world.com/sendmail.asp och se vad som händer när man klicka skicka

314 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
135 ms — deklarationer (db)
0 ms — hämta statistik (cache)
176 ms — hämta tråd, inlägg och bilagor (db)
135 ms — ändringar (db)