21. april 2005 - 12:25Der er
26 kommentarer og 1 løsning
JMail og noget asp indblandet
Hej venner... Jeg leger lidt med en formular der skal sende en email med JMail..
Siden det skal køre på... Der er en liste med biler, hvor man kan vælge en og se ekstra info på en detalje side..
På den side har jeg så en formular, men det er ikke alle felter der kommer fra text bokse.. f.eks. navnet har jeg tænkt mig at indsætte som session("navn") som de får tildelt når de logger på..
på samme måde med bilens mærke, den havde jeg tænkt på som <%=rs("maerke")%> eller noget med request.QueryString("maerke")
til sidst text boks med noget de skal skrive og til sidst en checkbox som de kan klikke på..
Mit formular er på denne måde : <form method="POST" action="send_mail.asp"> <table width="100%" border="0" cellspacing="5" cellpadding="0"> <tr align="center"> <td colspan="2"><strong><font size="2"><font color="FFFFFF">Giv Bud</font></strong></td> </tr> <tr> <td width="83"><strong><font size="2">Bil</font></strong></td> <td width="252"><%=rs("maerke")%></td> </tr> <tr> <td><strong><font color="FFFFFF" size="2">Bud Giver</font></strong></td> <td width="252"><%=Session("navn")%></td> </tr> <tr> <td width="83"><strong><font size="2">Bud</font></strong></td> <td><input name="bud" type="text" id="bud"></td> </tr> <tr> <td width="83"> </td> <td><input name="betingelser" type="checkbox" id="betingelser" value="Accepteret"> Jeg har læst og acceptere generelle betingelser..</td> </tr> <tr> <td width="83"> <% if session("login")= True then response.write("<input type=""submit"" value=""Send Bud"">") else response.write("<input type=""button"" value=""Send Bud"" onclick=""alert('De skal være logget på for at kunne give bud på biler!');"" value=""ok"">")
end if %> </td> <td><input type="submit" name="Submit2" value="Slet Alt"></td> </tr> </table> </form>
<% ' Coding By Thomas Keatings ' All components of this website are subject to copyright ' For permission and advice on using this code contact admin@neonred.co.uk
'Create the variables DIM strnavn, strmaerke, strbud, strbetingelser, mailto mailto="admin@minside.dk"
'request the required information from the form and place them in the variables strnavn = session("navn") strmaerke = request.QueryString("maerke") 'strmaerke =rs("maerke") strbud =request.form("bud") strbetingelser=request.Form("betingelser")
Dim msg 'Define the email type Set msg = Server.CreateObject("JMail.SMTPMail") 'Enter your SMTP domain address below msg.ServerAddress = "mail3.cliche.dk" msg.Sender = strnavn 'Enter the subject of your email msg.Subject ="Bud på en bil" 'Enter your email address here msg.AddRecipient "mustio@tiscali.dk" 'Build the body of the email using the data stired in the variable msg.Body = "This is an email generated by your online form."& vbCrLf & vbCrLf & _ "Name: " & strnavn & vbCrLf & _ "Bil Mærke: " & strmaerke & vbCrLf & _ "Bud: " & strbud & vbCrLf & _ "Betingelser:" & strbetingelser
'Set the priority of the email, 3 = Normal msg.Priority = 3
'Send the Email Set msg = nothing session("send")= true 'response.redirect "bil.asp" %>
<P> <P>Your message has been successfully sent.</P>
Problemet er at det er som om den sender mailen men den kommer bare ikke frem til mig.. Også er jeg heller ikke sikker på om det vil virke med den session("navn") og rs("maerke") i JMailen
Ja, det burde du kunne - men du skal være sikker på at rs("email") indeholder en mailadresse der er tilknyttet dit domæne hos cliche. (altså f.eks. musti776@ditdomaene.dk)
Sorry...min fejl: <form method="POST" action="send_mail.asp"> ersttates med <form method="POST" action="send_mail.asp?maerke=<%=rs("maerke")%>"> og så beholder du linien strmaerke = request.QueryString("maerke")
<% 'Create the variables DIM strnavn, strmaerke, strbud, strbetingelser, mailto, strafsender mailto="admin@minside.dk"
'request the required information from the form and place them in the variables strnavn = session("navn") strafsender= session("email") strmaerke = request.QueryString("maerke") strbud =request.form("bud") strbetingelser=request.Form("betingelser")
Dim msg 'Define the email type Set msg = Server.CreateObject("JMail.SMTPMail") 'Enter your SMTP domain address below msg.ServerAddress = "smtp.cliche.dk" msg.Sender = strafsender 'Enter the subject of your email msg.Subject ="Bud på en bil!! " 'Enter your email address here msg.AddRecipient "admin@minside.dk" 'Build the body of the email using the data stired in the variable msg.Body = "Der er kommet et nyt bud fra følgende bruger."& vbCrLf & vbCrLf & _ "Name: " & strnavn & vbCrLf & _ "Bil Mærke: " & strmaerke & vbCrLf & _ "Bud: " & strbud & vbCrLf & _ "Betingelser:" & strbetingelser
'Set the priority of the email, 3 = Normal msg.Priority = 3
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.