Avatar billede jr40 Nybegynder
05. marts 2005 - 21:36 Der er 8 kommentarer og
1 løsning

få sendt ip med formmail?

Jeg håber det er den rigtige sektion jeg har smidt dette her spam...

jeg har dette her formmail script:

skriv.asp:
        <form method="post" action="SendMail.asp">
            <div align="center">
              <table>
                <tr>
                  <td height="2" width="10" class="alm_text"> Navn:</td>
                  <td height="2" width="257">
                    <input type=text size=25 name="navn">
                  </td>
                </tr>
                <tr>
                  <td height="2" width="10"class="alm_text" > Tlf:</td>
                  <td height="2" width="257">
                    <input type=text size=25 name="tlf">
                  </td>
                </tr>
                <tr>
                  <td height="2" width="10"class="alm_text" > Email:</td>
                  <td height="2" width="257">
                    <input type=text size=25 name="email">
                  </td>
                </tr>
              </table>
              <table width="38%" border="0" cellspacing="0" cellpadding="0" class="alm_text" >
            <td><textarea name="besked" cols="25" rows="5"onFocus="if(this.value==this.defaultValue)this.value='';" onBlur="if(this.value=='')this.value=this.defaultValue;">Din besked.</textarea>
              </td>
            </tr>
            <tr>
              <td height="2">
                <div align="center">
                  <input type=submit value="Send" name="Send">
                </div>
              </td>
            </tr>
              </table>
            </div>
          </form>





sendmail.asp

<html>
<head>
<title>Sendmail</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

</head>

<body bgcolor="#FFFFFF" text="#000000"><%

' Get the form data
senderEmail = "mail@xxx.dk"
subject    = "mail xxx"
recipient  = "mail@xxxx.dk"


' Create the JMail message Object
set msg = Server.CreateOBject( "JMail.Message" )

' Set logging to true to ease any potential debugging
' And set silent to true as we wish to handle our errors ourself
msg.Logging = true
msg.silent = true

' Enter the sender data
msg.From = senderEmail
msg.FromName = name

' Note that as addRecipient is method and not
' a property, we do not use an equals ( = ) sign
msg.AddRecipient recipient

' The subject of the message
msg.Subject = subject

' And the body
msg.body = "navn = " & Request.Form("navn") & vbcrlf
msg.body = msg.body & "tlf = " & Request.Form("tlf") & vbcrlf
msg.body = msg.body & "email = " & Request.Form("email") & vbcrlf
msg.body = msg.body & "besked = " & Request.Form("besked") & vbcrlf

' Now send the message, using the indicated mailserver
if not msg.Send("mail.xxx.dk" ) then
    Response.write "<pre>" & msg.log & "</pre>"
else
    session("info") = "Din besked er sendt."
    response.redirect "redirect.html" 
end if


' And we're done! the message has been sent.


%>

</body>
</html>


Nogen der kan fortælle mig, hvordan jeg for scriptet til at tage ens ip med i mailen fra ham som har udfyldt boksen og sendt den afsted.
Avatar billede apo Praktikant
05. marts 2005 - 21:50 #1
msg.AddHeader "Originating-IP", Request.ServerVariables ("REMOTE_ADDR")

Apo
Avatar billede apo Praktikant
05. marts 2005 - 21:54 #2
Placer afsenderens IP-adresse i mailheader:
<%
...
msg.AddHeader "Originating-IP", Request.ServerVariables ("REMOTE_ADDR")
...
%>

Placer afsenderens IP-adresse i mailen:
<%
...
msg.body = msg.body & "IP-adresse = " & Request.ServerVariables ("REMOTE_ADDR")
...
%>

Apo
Avatar billede jr40 Nybegynder
05. marts 2005 - 22:02 #3
jeg for denne her fejl:
Microsoft VBScript runtime error '800a01a8'

Object required: ''

kontakt.asp, line 48



linje 48=
msg.AddHeader "Originating-IP", Request.ServerVariables ("REMOTE_ADDR")
Avatar billede apo Praktikant
05. marts 2005 - 22:06 #4
Hvor har du placeret linjen? (hvilke linjer står henholdsvis før/efter linje 48)
Avatar billede jr40 Nybegynder
05. marts 2005 - 22:13 #5
<form method="post" action="SendMail.asp">
<%
msg.AddHeader "Originating-IP", Request.ServerVariables ("REMOTE_ADDR")
%>
            <div align="center">
Avatar billede apo Praktikant
05. marts 2005 - 22:16 #6
Du skal have koden i din sendmail.asp :-)

Prøv f.eks. at placere den under denne linje i din kode:
<%
...
msg.AddRecipient recipient
msg.AddHeader "Originating-IP", Request.ServerVariables ("REMOTE_ADDR") <-- Her!
...
%>
Avatar billede jr40 Nybegynder
05. marts 2005 - 22:19 #7
nice tak...
det virker nu.
Avatar billede apo Praktikant
05. marts 2005 - 22:23 #8
Det var godt, og tak for points :-)

Som jeg viste dig før, kan du også indsætte IP-adressen direkte i mailen:

Under f.eks. denne linje:

msg.body = msg.body & "email = " & Request.Form("email") & vbcrlf

Kan du indsætte denne:

msg.body = msg.body & "IP-adresse = " & Request.ServerVariables ("REMOTE_ADDR") & vbcrlf

Apo
Avatar billede jr40 Nybegynder
05. marts 2005 - 22:25 #9
okey
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