Avatar billede musti776 Nybegynder
21. april 2005 - 12:25 Der 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">&nbsp;</td>
              <td><input name="betingelser" type="checkbox" id="betingelser" value="Accepteret">
                Jeg har l&aelig;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>

send_mail.asp :
<%@LANGUAGE="VBSCRIPT"%>
<% Option Explicit %>

<%
' 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

msg.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
msg.Logging = True

'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

Håber i kan hjælpe..

/Musti
Avatar billede mikkelk Nybegynder
21. april 2005 - 12:41 #1
Set msg = nothing - den kommando sender da vidst ikke mailen...
Avatar billede mikkelk Nybegynder
21. april 2005 - 12:43 #2
msg.Execute
Avatar billede mikkelk Nybegynder
21. april 2005 - 12:44 #3
'Send the Email
msg.Execute
Set msg = nothing
session("send")= true
'response.redirect "bil.asp"
Avatar billede musti776 Nybegynder
21. april 2005 - 12:46 #4
jeg får denne fejl i linje 44 -> msg.Execute

jmail.SMTPMail error '8000ffff'
The message was undeliverable. All servers failed to receive the message
/test/send_mail.asp, line 44
Avatar billede mikkelk Nybegynder
21. april 2005 - 12:48 #5
Tester du lokalt eller på cliche's server?
Avatar billede mikkelk Nybegynder
21. april 2005 - 12:51 #6
msg.Sender = strnavn skal istedet være en afsendermail-adresse.
Avatar billede mikkelk Nybegynder
21. april 2005 - 12:52 #7
Cliche accepterer kun hvis man benytter en afsender-mail der er oprettet som pop3 på deres server.
http://www.clichehosting.com/dk/?wid=130&mid=2&id=8
Avatar billede mikkelk Nybegynder
21. april 2005 - 12:53 #8
Desuden skal du bruge serveren: smtp.cliche.dk, hvis det er cliche's server du skal sende fra:
http://www.clichehosting.com/dk/?wid=130&mid=2&id=6#96
Avatar billede musti776 Nybegynder
21. april 2005 - 12:58 #9
tester på cliche's server

kan jeg godt gøre denne:

strafsender= rs("email")
&
msg.Sender = strafsender
???
Avatar billede mikkelk Nybegynder
21. april 2005 - 12:59 #10
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)
Avatar billede mikkelk Nybegynder
21. april 2005 - 13:00 #11
Hvis du gerne vil have afsendernavnet med kan du sætte dette med:
msg.SenderName = strNavn
Avatar billede musti776 Nybegynder
21. april 2005 - 13:04 #12
nu virker det fint nok..men :)

jeg får ikke bilmærken med.. hvordan tror du jeg skal rette den til?
Avatar billede mikkelk Nybegynder
21. april 2005 - 13:08 #13
strmaerke = request.QueryString("maerke")
skal er stattes med:
strmaerke = request.form("maerke")
Avatar billede mikkelk Nybegynder
21. april 2005 - 13:10 #14
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")
Avatar billede mikkelk Nybegynder
21. april 2005 - 13:12 #15
Og det var vidst et svar :-)
Avatar billede musti776 Nybegynder
21. april 2005 - 13:16 #16
hmm... nej, den kommer stadig ikke med :(
Avatar billede mikkelk Nybegynder
21. april 2005 - 13:22 #17
I din mail eller på din side inden?
Avatar billede mikkelk Nybegynder
21. april 2005 - 13:23 #18
Hvordan ser hele din kode ud nu?
Avatar billede musti776 Nybegynder
21. april 2005 - 13:26 #19
send_mail.asp :
<%@LANGUAGE="VBSCRIPT"%>
<% Option Explicit %>

<%
'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

msg.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
msg.Logging = True

'Send the Email
msg.Execute
Set msg = nothing
session("send")= true

%>

<head>
<style>
    td{
    font-size:10px;
    font-family:verdana;
    color:ffffff;
    }
    a{
    font-size:12px;
    color:#FFFFFF;
    font-family:Verdana, Arial, Helvetica, sans-serif;
    font-style: normal;
    font-weight: bold;
    }
    a:hover{
    color:#FFFFFF;
    text-decoration: underline;
    }
    a:visited{
    font-size:12px;
    color:#FFFFFF;
    font-weight: bold;
    text-decoration: none;
    }
    a.blue {
    font-size:10px;
    color:#FFFFFF;
    font-family:verdana;
    text-decoration:underline;
    }
    a.blue:visited {
    color:#FFFFFF;
    }
    a.white {
    font-size:10px;
    color:ffffff;
    font-family:verdana;
    text-decoration:underline;
    }
    a.white:visited {
    color:ffffff;
    }
    .padding{
        padding-left:20;
        padding-right:20;
        padding-top:20
    }
</style>

</head>

<body bgcolor="1D4893">
<center>
  <P><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif"><strong>Your
    message has been successfully sent.<br>
    <br>
    <a href="index.asp?id=til_salg" target="_top">Tilbage</a> </strong></font></P>
</center>


</body>
Avatar billede musti776 Nybegynder
21. april 2005 - 13:26 #20
formular :
<form method="POST" action="send_mail.asp?maerke=<%=rs("maerke")%>">
          <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">&nbsp;</td>
              <td><input name="betingelser" type="checkbox" id="betingelser" value="Accepteret">
                Jeg har l&aelig;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>
Avatar billede mikkelk Nybegynder
21. april 2005 - 13:26 #21
Og den anden side?
Avatar billede mikkelk Nybegynder
21. april 2005 - 13:27 #22
:-) Hov, der var jeg lidt for hurtig, eller langsom :-)
Avatar billede mikkelk Nybegynder
21. april 2005 - 13:29 #23
Mystisk...det burde da virke, prøv det her:
<form method="POST" action="send_mail.asp">
<input type="hidden" name="maerke" value="<%=rs("maerke")%>">

og
strmaerke = request.form("maerke")
Avatar billede musti776 Nybegynder
21. april 2005 - 13:36 #24
hehe... hold kæft hvor er jeg bare dum.. havde glemt at uploade den anden fil med formularen... sorry :o)

et lille bitte spg til.. i formularen hvor jeg henter maerken med rs("maerke").. den vises ikke mere?
Avatar billede mikkelk Nybegynder
21. april 2005 - 13:40 #25
Så gør følgende:
<%
sMaerke = rs("maerke")
%>
<form method="POST" action="send_mail.asp?maerke=<%=sMaerke%>">
          <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"><%=sMaerke%></td>
Avatar billede musti776 Nybegynder
21. april 2005 - 13:46 #26
yes yes yes...
bukker for mesteren :o)

tak :)
Avatar billede mikkelk Nybegynder
21. april 2005 - 13:48 #27
Var så lidt :-)
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