Avatar billede syngre.net-team Nybegynder
08. maj 2004 - 02:52 Der er 3 kommentarer og
1 løsning

Vedhæft IP og Browser

Hejsa

Jeg benytter mig af nedenstående script, på en hjemmeside som formular for at kunne kontakte os.

Dog vil jeg gerne have sat IP samt Browser med, da det er en meget god oplysning i tilfælde af misbrug/spam.


Script / Formular ------>

<%
if Request.ServerVariables("REQUEST_METHOD") = "POST" then

Set JMail = Server.CreateObject("JMail.SMTPMail")

' Angiv din mail server du skal sende mails igennem
JMail.ServerAddress = "mail.domæne.dk"

'Afsender:
JMail.SenderName = "Bare mig"
JMail.Sender = "info@eksperten.dk"

JMail.Subject = "Mail fra Eksperten.dk"

JMail.AddRecipient Request.Form("_modtager")

str = "Hej " & vbCrLf & vbCrLf
str = str & "Dette er en mail fra Ekspertens hjemmeside... Beskeden er blevet sendt via formularen på siden: kontakt.asp" & vbCrLF & vbCrLF
str = str & "Indtastet person data:" & vbCrLF & vbCrLF
str = str & "Navn = " & Request.Form("Navn") & vbCrLf
str = str & "E-mail = " & Request.Form("email") & vbCrLf
str = str & "Telefon = " & Request.Form("Telefon") & vbCrLf
str = str & "besked= " & Request.Form("besked") & vbCrLf & vbCrLF & vbCrLF & vbCrLF

str = str & "Vedkommendes Computer / ID oplysninger:" & vbCrLF & vbCrLF

JMail.Body = str


' Send den
JMail.Execute
Response.Redirect "kontakt-tak.asp"

Set JMail = Nothing

end if
%>


Under feltet:

str = str & "Vedkommendes Computer / ID oplysninger:" & vbCrLF & vbCrLF

Vil jeg gerne have tilføjet:

<% Response.Write Request.ServerVariables("REMOTE_ADDR") %>

og

<% Response.Write Request.ServerVariables("HTTP_USER_AGENT") %>

Jeg har prøvet på flere måder at ligge dem ind i scriptet, men det går galt for mig hver gang...


Håber på at nogen evt. kan hjælpe med en løsning :-)
Avatar billede cyb Nybegynder
08. maj 2004 - 03:51 #1
<%
if Request.ServerVariables("REQUEST_METHOD") = "POST" then

Set JMail = Server.CreateObject("JMail.SMTPMail")

' Angiv din mail server du skal sende mails igennem
JMail.ServerAddress = "mail.domæne.dk"

'Afsender:
JMail.SenderName = "Bare mig"
JMail.Sender = "info@eksperten.dk"

JMail.Subject = "Mail fra Eksperten.dk"

JMail.AddRecipient Request.Form("_modtager")

str = "Hej " & vbCrLf & vbCrLf
str = str & "Dette er en mail fra Ekspertens hjemmeside... Beskeden er blevet sendt via formularen på siden: kontakt.asp" & vbCrLF & vbCrLF
str = str & "Indtastet person data:" & vbCrLF & vbCrLF
str = str & "Navn = " & Request.Form("Navn") & vbCrLf
str = str & "E-mail = " & Request.Form("email") & vbCrLf
str = str & "Telefon = " & Request.Form("Telefon") & vbCrLf
str = str & "besked= " & Request.Form("besked") & vbCrLf & vbCrLF & vbCrLF & vbCrLF

str = str & "Vedkommendes Computer / ID oplysninger:" & vbCrLF

str = str & Request.ServerVariables("REMOTE_ADDR") &" / "& Request.ServerVariables("HTTP_USER_AGENT") & VbCrLf & VbCrLf

JMail.Body = str


' Send den
JMail.Execute
Response.Redirect "kontakt-tak.asp"

Set JMail = Nothing

end if
%>
Avatar billede syngre.net-team Nybegynder
14. maj 2004 - 17:48 #2
Takker for hjælpen, måske du vil smide ét svar ??  :-)
Avatar billede cyb Nybegynder
17. maj 2004 - 16:06 #3
Godt du kunen bruge det :-)
Avatar billede syngre.net-team Nybegynder
18. maj 2004 - 04:16 #4
Og her får du lige dine point :-)
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