Avatar billede slimklatten Nybegynder
12. april 2007 - 08:35 Der er 12 kommentarer og
1 løsning

hjælp til at lave en formmail

nogen der kan hjælpe med at ændre dette script til at have 3 indtastnings felter til to,subject,textbody - i teorien en standard webmail(eneste script jeg har kunne finde som kunne sende via vores smtp):

<%
Dim iMsg
Set iMsg = CreateObject("CDO.Message")
Dim iConf
Set iConf = CreateObject("CDO.Configuration")

Dim Flds
Set Flds = iConf.Fields

With Flds
  .Item(cdoSendUsingMethod) = cdoSendUsingPort
  .Item(cdoSMTPServer) = "smtp.amplex.net"
  .Update
End With

With iMsg
  Set .Configuration = iConf
      .To      = "mark@amplex.net" 
      .From    = "webserver@amplex.net"
      .Subject  = "Message Subject"
      .TextBody = "whatever you want in the body"
      .Send
End With
%>
Avatar billede fennec Nybegynder
12. april 2007 - 08:45 #1
With iMsg
  Set .Configuration = iConf
      .To      = request.form("to")
      .From    = "webserver@amplex.net"
      .Subject  = request.form("subject")
      .TextBody = request.form("body")
      .Send
End With

Også skal du have lavet en form som sender til din mail side:

<form name="myForm" method="post" action="sendmail.asp">
Til: <input type="Text" name="to" value=""><br>
Emne: <input type="Text" name="subject" value=""><br>
Tekst: <textarea name="body" cols="40" rows="4" ></textarea>
</form>
Avatar billede slimklatten Nybegynder
12. april 2007 - 09:05 #2
er en kegle til sådanne ting ... kan jeg lokke dig til at fedte det sammen til noget simpelt som jeg kan cut'n'paste

smed formen i en seperat fil (og tilføjede en submit knap) og erstattede with med den du postede i sendmail.asp men fik en http500 fejl ... nok mig der har nosset i det
Avatar billede fennec Nybegynder
12. april 2007 - 09:17 #3
[Mailform.asp]
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
    <title>Email</title>
</head>
<body>
<form name="myForm" method="post" action="sendmail.asp">
Til: <input type="Text" name="to" value=""><br>
Emne: <input type="Text" name="subject" value=""><br>
Tekst: <textarea name="body" cols="40" rows="4" ></textarea>
<input type="Submit" value="Send">
</form>
</body>
</html>


[sendmail.asp]
<%
Dim iMsg
Set iMsg = CreateObject("CDO.Message")
Dim iConf
Set iConf = CreateObject("CDO.Configuration")

Dim Flds
Set Flds = iConf.Fields

With Flds
  .Item(cdoSendUsingMethod) = cdoSendUsingPort
  .Item(cdoSMTPServer) = "smtp.amplex.net"
  .Update
End With

With iMsg
  Set .Configuration = iConf
      .To      = request.form("to")
      .From    = "webserver@amplex.net"
      .Subject  = request.form("subject")
      .TextBody = request.form("body")
      .Send
      response.write "mail send."
End With
%>

placer de 2 filer i samme mappe.
Avatar billede slimklatten Nybegynder
12. april 2007 - 09:26 #4
bleh ... kan ikke få det til at virke ... må være vores server som kegler i det ... men lav et svar så får du kredits anyway :)
Avatar billede fennec Nybegynder
12. april 2007 - 09:33 #5
Får du ikke en fejlbeskrivelse med et linje nr hvor fejlen sker?

Hvis ikke, så gøre dette i IE:
Funktioner >> internetinstillinger >> advanceret >> fjern kryds i "vis meddelser om uskadelige HTTP fejl"

Så får du ASP fejlen i stedet for en http fejl.
Avatar billede slimklatten Nybegynder
12. april 2007 - 09:39 #6
error '8004020f'
/nk/sendmail.asp, line 30


line30 = .send
Avatar billede fennec Nybegynder
12. april 2007 - 09:49 #7
Hvis du retter de 3 request.form linjer tilbage til orginal, virker det så??

      .To      = "mark@amplex.net" 
      .From    = "webserver@amplex.net"
      .Subject  = "Message Subject"
      .TextBody = "whatever you want in the body"
Avatar billede slimklatten Nybegynder
12. april 2007 - 09:58 #8
ja :s ... men det går nok - finder på en anden løsning ... men tak for tiden
Avatar billede fennec Nybegynder
12. april 2007 - 10:29 #9
Jeg vil hellere finde problemet :o)

Bare for sjov, hvad så hvis du indsætter de data, som du indsatte på form siden. Virker det så?
Avatar billede slimklatten Nybegynder
12. april 2007 - 10:38 #10
jeps - kan tilsyneladende indsætte alt når jeg blot ikke henter fra formen ... stensikkert en fejl40 :P
Avatar billede fennec Nybegynder
12. april 2007 - 10:58 #11
Prøv lige at udskrive formfelterne først på mail siden og afbryd scriptet (end):

response.write "To: "& request.form("to") &"<br>"
response.write "Subject : "& request.form("Subject") &"<br>"
response.write "Body: "& request.form("body") &"<br>"
response.end

Skulle gerne udskrive de 3 værdier. Hvis ikke det sker er der noget seriøst galt...
Avatar billede slimklatten Nybegynder
12. april 2007 - 11:13 #12
det virker såmændt fint :S - tror jeg må ud og google lidt og finde et andet script :P osse irreterende at alle virksomhedens smtp servere er lukket nu ... vi må kun bruge en udvalgt extern smtp :P
Avatar billede slimklatten Nybegynder
12. april 2007 - 14:28 #13
smtp kunne ikke relaye til extern mailadress ... aka fejl40
Avatar billede 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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

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