Avatar billede fc-dong Nybegynder
08. oktober 2002 - 15:04 Der er 18 kommentarer og
1 løsning

Overfør en URL til Jmail

Jeg har en nyhedsside, hvor man skal have mulighed for at sende en nyhed til en ven.

Jeg har på vis nyhedssiden, sat et link til min form side, hvor man skal indtaste modtagers email samt sit egen navn. Den sender jeg videre til min Jmail.

Det virker fint, borst fra at jeg ikke får den rigtige url med? (/dongk/aspsider/sendnyhed.asp) i stedet skulle den have set sådan ud (http://www.fcweb.dk/dongk/aspsider/nyheder_detajler.asp?NyhederID=353)
Avatar billede eagleeye Praktikant
08. oktober 2002 - 15:10 #1
du kan bruge  .GetMessageBodyFromURL  URL

JMail.GetMessageBodyFromURL "http://www.fcweb.dk/dongk/aspsider/nyheder_detajler.asp?NyhederID=353"
Avatar billede fc-dong Nybegynder
08. oktober 2002 - 15:11 #3
Men skal jeg ikke overfører min ID=353 fra min nyhedsside
Avatar billede eagleeye Praktikant
08. oktober 2002 - 15:21 #4
Den side som sender nyheden skal vide hvilken nyhed den skal sende, så du skal vel overføre side til sendnyhed.asp siden.:

onClick="MM_openBrWindow('sendnyhed.asp','SEND','width=260,height=110')"

Til:
onClick="MM_openBrWindow('sendnyhed.asp?side=nyhed.asp','SEND','width=260,height=110')"
Avatar billede fc-dong Nybegynder
08. oktober 2002 - 15:33 #5
Hvordan skal min JMail så se ud
Her er min JMail
-------------------
<%@LANGUAGE="VBSCRIPT"%>

<% if (cStr(Request("Submit")) <> "") Then
Dim JMail

Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mail.rackserv.com"
JMail.Sender = "postmaster@fcweb.dk"
JMail.Subject = "Mail fra en ven"
JMail.AddRecipient  (Request.form("email"))
JMail.AddRecipient  (Request.form("tiladresse1"))
JMail.AddRecipient (Request.form("tiladresse2"))


Mailtext = "Denne nyhed er send til dig fra " & vbcrlf & vbcrlf
Mailtext = Mailtext & "email : " & (Request.form("email")) & vbcrlf
Mailtext = Mailtext & "navn : " & (Request.form("navn")) & vbcrlf
Mailtext = Mailtext & "besked : " & (Request.form("besked")) & vbcrlf
Mailtext = Mailtext & "link : " & (Request.form("link")) & vbcrlf

JMail.body = Mailtext

JMail.Execute
Set JMail = Nothing

Response.Clear
Response.Redirect("takformail.asp")
End If
%>
--------------------
Hvor skal den hedde ('sendnyhed.asp?side=nyhed.asp','SEND','width=260,height=110')"
Hvorfor...?
Avatar billede eagleeye Praktikant
08. oktober 2002 - 15:41 #6
Denne
Mailtext = Mailtext & "link : " & (Request.form("link")) & vbcrlf

hvor kommer request.form("link") fra, er det en man selv udfylder eller bliver den lavet automatisk?
Avatar billede eagleeye Praktikant
08. oktober 2002 - 15:47 #7
der hvor man kan skrive en Ven's email adresse skal den havde at vide hvilken URL den skal sende ....
Avatar billede fc-dong Nybegynder
08. oktober 2002 - 15:47 #8
link var en request.ServerVariables som jeg har prøvet at overfører som en SCRIPT_NAME, men det virker ikke rigtig. jeg får ikke den rigtige url med? (/dongk/aspsider/sendnyhed.asp)
Hvad med den denne her JMail.GetMessageBodyFromURL, skal den ikke med i min JMail?
Avatar billede fc-dong Nybegynder
08. oktober 2002 - 15:49 #9
ja men så er spørgsmålet, hvordan får jeg overført den URL fra nyheder_detajler.asp?NyhederID=353 til sendnyhed.asp, som til sidst ender hos min JMail sender.
Avatar billede eagleeye Praktikant
08. oktober 2002 - 16:50 #10
idag som jeg kan se det er der denne function sved Send mail til en ven:

onClick="MM_openBrWindow('sendnyhed.asp','SEND','width=260,height=110')"

Den skal hvade overført hvilken nyheds ID det er og det kunne være ved at øver før ID på nyheden

onClick="MM_openBrWindow('sendnyhed.asp?id=<%=rs("nyheds_id")%>','SEND','width=260,height=110')"
Avatar billede eagleeye Praktikant
08. oktober 2002 - 16:52 #11
sendnyhed.asp  hendter så det id med

nyheds_id = Request.Querystring("id")

Så kan du evt lavet hidden felt i formen (hvor man indtaster vens email adresse) som indeholder ID på nyheden..:

<input type="hidden" name="nyheds_id" value="<%=nyheds_id%>">
Avatar billede eagleeye Praktikant
08. oktober 2002 - 16:53 #12
Den side som så sender mail


Mailtext = Mailtext & "link : http://www.fcweb.dk/dongk/aspsider/nyheder_detajler.asp?NyhederID=" & Request.form("nyheds_id") & vbcrlf
Avatar billede fc-dong Nybegynder
08. oktober 2002 - 17:01 #13
Den tager ikke NyhederID med over
Jeg fik denne med email
-------------
Denne nyhed er send til dig fra

email : Tommy@fcweb.dk
navn : Tommy
besked : flkæl
link :
link : http://www.fcweb.dk/dongk/aspsider/nyheder_detajler.asp?NyhederID=
Avatar billede fc-dong Nybegynder
08. oktober 2002 - 17:03 #14
Her er min JMail
--------------
<%@LANGUAGE="VBSCRIPT"%>

<% if (cStr(Request("Submit")) <> "") Then
Dim JMail

Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mail.rackserv.com"
JMail.Sender = "postmaster@fcweb.dk"
JMail.Subject = "Mail fra en ven"
JMail.AddRecipient  (Request.form("email"))
JMail.AddRecipient  (Request.form("tiladresse1"))
JMail.AddRecipient (Request.form("tiladresse2"))


Mailtext = "Denne nyhed er send til dig fra " & vbcrlf & vbcrlf
Mailtext = Mailtext & "email : " & (Request.form("email")) & vbcrlf
Mailtext = Mailtext & "navn : " & (Request.form("navn")) & vbcrlf
Mailtext = Mailtext & "besked : " & (Request.form("besked")) & vbcrlf
Mailtext = Mailtext & "link : " & (Request.form("link")) & vbcrlf
Mailtext = Mailtext & "link : http://www.fcweb.dk/dongk/aspsider/nyheder_detajler.asp?NyhederID=" & Request.form("nyhederID") & vbcrlf

JMail.body = Mailtext

JMail.Execute
Set JMail = Nothing

Response.Clear
Response.Redirect("takformail.asp")
End If
%>
-----------------------------
Her er min form

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<html>
<head>
<title>Send nyheden til en ven</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
.tekst {
    font-family: Verdana, Arial, Helvetica, sans-serif;
    font-size: 10px;
    color: #FFFFFF;
    text-decoration: none;
}
.boks {
    font-family: Verdana, Arial, Helvetica, sans-serif;
    font-size: 10px;
    color: #000000;
}
-->
</style>
</head>

<body bgcolor="#CCCCCC" leftmargin="0" topmargin="0">
<form name="form1" method="post" action="jmail.asp">
  <table width="260" border="0" cellpadding="0" cellspacing="0">
    <tr bgcolor="#666666">
      <td class="tekst">Send til en ven</td>
      <td ><div align="right"><a href="java script:window.close();" class="tekst">Luk</a></div></td>
    </tr>
    <tr bgcolor="#999999">
      <td width="150" valign="middle" class="tekst">Modtagers email :</td>
      <td valign="top"> <input name="email" type="text" class="boks" id="email" size="20">
      </td>
    </tr>
    <tr bgcolor="#999999">
      <td width="150" valign="middle" class="tekst">Indtast dit navn :</td>
      <td> <input name="navn" type="text" class="boks" id="navn" size="20"></td>
    </tr>
    <tr bgcolor="#999999">
      <td width="150" valign="top" class="tekst">Indtast din besked :</td>
      <td> <textarea name="besked" cols="20" rows="3" class="boks" id="besked"></textarea></td>
    </tr>
    <tr bgcolor="#999999">
      <td><input name="nyhederID" type="hidden" id="nyhederID" value="<%=nyhederID%>"> </td>
      <td> <div align="right" class="tekst">
          <input name="Submit" type="submit" class="boks" value="send">
        </div></td>
    </tr>
  </table>
  <p class="tekst">&nbsp;</p>
  <p class="boks">&nbsp;</p>
</form>
</body>
</html>
---------------------
Her er mit link fra nyheds_detajler.asp

<td class="vtabeldesign" onClick="MM_openBrWindow('sendnyhed.asp?id=<%=rsnyhedsdetajle("nyhederid")%>','SEND','width=260,height=110')">Send
                          til en ven</td>
------------------------
Avatar billede eagleeye Praktikant
08. oktober 2002 - 17:15 #15
Prøv at rette denne linie i "Her er min form" koden

<td><input name="nyhederID" type="hidden" id="nyhederID" value="<%=nyhederID%>"> </td>

til:

<td><input name="nyhederID" type="hidden" id="nyhederID" value="<%=Request.QueryString("ID")%>"> </td>
Avatar billede fc-dong Nybegynder
08. oktober 2002 - 17:24 #16
Så virker det.
Det var nyhederid der skulle laves om til ID.

Hvorfor skal det kun være ID, når feltet i databaseb er nyhederID...?
Avatar billede eagleeye Praktikant
08. oktober 2002 - 17:28 #17
Det skal hedde ID fordi den QueryString hvor nyheds id bliver overført i denne linie

<td class="vtabeldesign" onClick="MM_openBrWindow('sendnyhed.asp?id=<%=rsnyhedsdetajle("nyhederid")%>','SEND','width=260,height=110')">Send
                          til en ven</td>


  id=<%=rsnyhedsdetajle("nyhederid")%>
Avatar billede fc-dong Nybegynder
08. oktober 2002 - 17:30 #18
ok. Hvis den så havde heddet..!
<td class="vtabeldesign" onClick="MM_openBrWindow('sendnyhed.asp?Nyhederid=<%=rsnyhedsdetajle("nyhederid")%>','SEND','width=260,height=110')">Send
                          til en ven</td>
Så skulle den hedde NyhederID.
Nu har jeg forstået det. Det er altid lidt nemmere når man kan se hvordan det er sat op.
Jeg takker endnu en gang for din hjælp eagleeye
Avatar billede eagleeye Praktikant
08. oktober 2002 - 17:32 #19
Jeps det havde også været muligt at rette id til nyhederID i denne linie:

<td class="vtabeldesign" onClick="MM_openBrWindow('sendnyhed.asp?nyhederID=<%=rsnyhedsdetajle("nyhederid")%>','SEND','width=260,height=110')">Send til en ven</td>

Men denne linie skal dog stadig havde request.querystring på for at hendte tallet..:

<td><input name="nyhederID" type="hidden" id="nyhederID" value="<%=Request.QueryString("nyhederID")%>"> </td>
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