Avatar billede jesperkh Nybegynder
05. december 2000 - 09:26 Der er 25 kommentarer og
1 løsning

tip en ven funktion

Kan man lave en \"Tip en ven\" i javascript... jeg har en \"Tip en ven\" fra 1klik.dk, men vil gerne have min egen....
Avatar billede sone Nybegynder
05. december 2000 - 09:28 #1
Du skal have en server til at sende din mail - engen med ASP eller PHP
Avatar billede sone Nybegynder
05. december 2000 - 09:28 #2
enTen..
Avatar billede zhatten Nybegynder
05. december 2000 - 09:49 #3
Du skal bruge PHP eller ASP til dette.

Der findes 3 på denne side nr. 2 3 og 4, nr. 2 og 3 er i PHP og nr. 4 er ASP.

http://www.netcoders.dk/sourcecode.asp?submode=showparent&type_id=&parent_id=13&start=1



- Zhatten

Avatar billede steen_hansen Forsker
05. december 2000 - 10:27 #4
Jeg har en grydeklar version, hvis du har lidt tålmodighed?
Avatar billede steen_hansen Forsker
05. december 2000 - 10:37 #5
Det kræver at du har JMail og ASP. Det i klammer [] skal du selv indsætte:

<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\">
<html>

<head>
<title>Anbefaling</title>
<LINK rel=\"stylesheet\" type=\"text/css\" href=\"stylesheet1.css\">
</head>

<body BGCOLOR=\"#DDDDC7\" TEXT=\"#000000\">
<font face=\"Arial\" size=\"2\"><b>
<%
navn = request(\"navn\")

if  Request.ServerVariables(\"REQUEST_METHOD\") = \"POST\" then
   
        Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
        JMail.ContentTransferEncoding = \"8bit\"
        JMail.Charset = \"ISO-8859-1\"
       
        JMail.Priority = 1
        JMail.ServerAddress = \"[vip.cybercity.dk]\"
    JMail.Sender = \"[din-email@firmanavn.dk]\"
        JMail.Subject = \"Anbefaling\"
    JMail.Body = \"Hej!\" & vbCrLf & \"Det er \" & navn & vbCrLf & vbCrLf
    JMail.Body= JMail.Body + \"Besøg www.[min-hjemmeside.dk]!\" & vbCrLf & vbCrLf
    JMail.Body= JMail.Body + \"[www.din-hjemmeside.dk.]\" & vbCrLf & \"En hjemmeside hvor du kan læse alt om nyheder og deltage i debat m.m.\" & vbCrLf & vbCrLf
   
        JMail.AddRecipient request(\"ad\")
        \' Send it...
        JMail.Execute
        set JMail = nothing
response.write \" Tak.<br><br>Din anbefaling er hermed sendt videre til \" & request(\"ad\")

   

else %>
</b></font>
<form action=\"anbef.asp\" METHOD=\"POST\" name=\"anbefal\">
  <table cellpadding=\"2\" cellspacing=\"2\" border=\"0\">
    <tr>
      <td><font face=\"Arial\" size=\"4\" color=\"#CC0000\"><b>Anbefal
        camping-fritid.dk</b></font>
        <p><b><font face=\"Arial\" size=\"2\">Har du en ven eller et familiemedlem,
        som du mener kan<br>
        få glæde af vores site, så send dem en anbefaling her:</font></b> </td>
    </tr>
    <tr>
      <td> </td>
    </tr>
    <tr>
      <td><input TYPE=\"TEXT\" onFocus=\"this.form.ad.select()\" value=\"Modtagerens e-mail?\"
      NAME=\"ad\" SIZE=\"20\"> </td>
    </tr>
    <tr>
      <td><input TYPE=\"TEXT\" onFocus=\"this.form.navn.select()\" value=\"Afsenderens navn?\"
      NAME=\"navn\" SIZE=\"20\"> </td>
    </tr>
    <tr>
      <td><input type=\"submit\" value=\"Send\"> </td>
    </tr>
  </table>
</form>
<%    end if%>

</body>
</html>
Avatar billede steen_hansen Forsker
05. december 2000 - 10:40 #6
I linie 21 skal du kende adressen til din udbyders JMail server. Men det er tre steder, du skal indtaste dine egne oplysninger. (Fjern []\'erne, de skal ikke med)
Avatar billede steen_hansen Forsker
05. december 2000 - 10:41 #7
Sorry, FIRE steder :o)
Avatar billede jesperkh Nybegynder
05. december 2000 - 16:35 #8
Hej Steen

Selv om jeg har en rimlig velbesøgt hjemmeside: http://www.søgemaskiner.dk  .... ændre detikke ret meget på at jeg nok må betragtes som en amatør.... men jeg har været ude og kikke under hvad min serv plads understøtter, og så vidt jeg kan se, så understøtter den Jmail og asp.. hvis du kigger under \"pro\" på denne http://www.goldenplanet.dk/specnt.htm  ,så kan du se om det passer for mig, at min servplads understøtter dem....
Avatar billede steen_hansen Forsker
05. december 2000 - 16:41 #9
Den understøtter både ASP og Jmail, så der burde ikke være nogen problemer i at benytte ovenstående. Du skal kun vide én ting: adressen til din udbyders Jmail-server. Den kan du få at vide, hvis du ringer til dem. I det ovenstående eksempel kan du se min:

JMail.ServerAddress = \"vip.cybercity.dk\"

Så det er bare at køre deruda\' :o)
Avatar billede steen_hansen Forsker
05. december 2000 - 16:43 #10
...så der kommer til at stå:

JMail.ServerAddress = \"AdressenPåDin.UdbydersJMailServer.dk\"

Og så skal du selvfølgelig huske de tre andre klammer, så fungerer det!
Avatar billede steen_hansen Forsker
06. december 2000 - 12:28 #11
Har du kontaktet din udbyder og fået adressen?
Avatar billede jesperkh Nybegynder
06. december 2000 - 16:15 #12
jeg sendte en e-mail i går og fik det her svar...
**********************************************
Hej Jesper

>
> Hvad er adr. på den Jmail-server, jeg har adgang til...?
>

Æhhh - ikke forstået? Jmail er en ASP-komponent som du kan
anvende på din egen hjemmeside, ikke en decideret server.
Misforstår jeg dit spøgsmål?


--
Med venlig hilsen / Best regards

Anders C. Madsen

Golden Planet          Tel.: +45 7020 9594
Dalbygade 40          Fax.: +45 7020 9592
DK-6000  Kolding      http://www.goldenplanet.dk
*************************************************

hvilket jeg ikke blev meget kloger af.....
Avatar billede steen_hansen Forsker
06. december 2000 - 16:22 #13
Ok. Giv ham denne linie, forklar at det er adressen til MIN udbyders server, hvorpå der er installeret JMail-komponenten. Det kan være, at han bedre forstår spørgsmålet så.

Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
        JMail.ContentTransferEncoding = \"8bit\"
        JMail.Charset = \"ISO-8859-1\"
       
        JMail.Priority = 1
        JMail.ServerAddress = \"vip.cybercity.dk\"
   
Avatar billede jesperkh Nybegynder
06. december 2000 - 16:42 #14
Jeg har sendt ham en email, med et http: link her til.... så kan han vel se hvad jeg mener.... men jeg troer ikke han svare før i morgen, da kontoret lukker 16.00
Avatar billede jesperkh Nybegynder
06. december 2000 - 17:21 #15
Hej Steen

Jeg fik et svar i dag

*************************************************
Hej Jesper

> Klik på dette link: http://www.eksperten.dk/spm/36709 og læs det
> igennem og du vil se hvad jeg mener..
>

Aha - så forstår jeg spørgsmålet! :-)

Du mangler en SMTP-server til at håndtere afsendelsen af mail fra
Jmail - der har vores kunder adgang til mail.gpserver.com.

Jeg tilføjer lige en bemærkning i on-line manualen om det, så det
også bliver klart for vores andre brugere.



--
Med venlig hilsen / Best regards

Anders C. Madsen

Golden Planet          Tel.: +45 7020 9594
Dalbygade 40          Fax.: +45 7020 9592
DK-6000  Kolding      http://www.goldenplanet.dk
--
Så jeg prøver lige og og lave en webside,og se om jeg kan få det til at virke
Avatar billede jesperkh Nybegynder
06. december 2000 - 17:48 #16
Nu har jeg lavet en prøve side... Den ligger http://sogemaskiner.dk/anbefaling.htm

*************************************************
<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\">
<html>

<head>
<title>Anbefaling</title>
<META NAME=\"Generator\" CONTENT=\"Stone\'s WebWriter 3\">
</head>

<BODY BGCOLOR=\"#CCCCCC\" TEXT=\"#000080\" LINK=\"#0000FF\" VLINK=\"#660066\" ALINK=\"#FF0000\" BACKGROUND=\"soeg/6.jpg\">
<font face=\"Arial\" size=\"2\"><b>
<%
navn = request(\"navn\")

if  Request.ServerVariables(\"REQUEST_METHOD\") = \"POST\" then
   
        Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
        JMail.ContentTransferEncoding = \"8bit\"
        JMail.Charset = \"ISO-8859-1\"
       
        JMail.Priority = 1
        JMail.ServerAddress = \"[mail.gpserver.com.]\"
    JMail.Sender = \"[jesper@sogemaskiner.dk]\"
        JMail.Subject = \"Anbefaling\"
    JMail.Body = \"Hej!\" & vbCrLf & \"Det er \" & navn & vbCrLf & vbCrLf
    JMail.Body= JMail.Body + \"Besøg www.[sogemaskiner.dk]!\" & vbCrLf & vbCrLf
    JMail.Body= JMail.Body + \"[www.sogemaskiner.dk.]\" & vbCrLf & \"En hjemmeside hvor du kan læse alt om nyheder og deltage i debat m.m.\" & vbCrLf & vbCrLf
   
        JMail.AddRecipient request(\"ad\")
        \' Send it...
        JMail.Execute
        set JMail = nothing
response.write \" Tak.<br><br>Din anbefaling er hermed sendt videre til \" & request(\"ad\")
else %>
</b></font>
<form action=\"anbef.asp\" METHOD=\"POST\" name=\"anbefal\">
  <table cellpadding=\"2\" cellspacing=\"2\" border=\"0\">
    <tr>
      <td><font face=\"Arial\" size=\"4\" color=\"#CC0000\"><b>Anbefal
        camping-fritid.dk</b></font>
        <p><b><font face=\"Arial\" size=\"2\">Har du en ven eller et familiemedlem,
        som du mener kan<br>
        få glæde af vores site, så send dem en anbefaling her:</font></b> </td>
    </tr>
    <tr>
      <td> </td>
    </tr>
    <tr>
      <td><input TYPE=\"TEXT\" onFocus=\"this.form.ad.select()\" value=\"Modtagerens e-mail?\"
      NAME=\"ad\" SIZE=\"20\"> </td>
    </tr>
    <tr>
      <td><input TYPE=\"TEXT\" onFocus=\"this.form.navn.select()\" value=\"Afsenderens navn?\"
      NAME=\"navn\" SIZE=\"20\"> </td>
    </tr>
    <tr>
      <td><input type=\"submit\" value=\"Send\"> </td>
    </tr>
  </table>
</form>
<%    end if%>

<!-- WebWriter AutoDato -->Opdateret d. 6.12.2000<!-- WW -->
</body>
</html>
************************************************ men den virker ikke.....
Avatar billede jesperkh Nybegynder
06. december 2000 - 18:03 #17
Her kan du se hvordan jeg drømmer om, at min tip en skal ende medat se ud....
http://sogemaskiner.dk/anbefalingb.htm
Avatar billede steen_hansen Forsker
07. december 2000 - 07:38 #18
Ok, men du har ikke fjernet klammerne, husk det!

\"[jesper@sogemaskiner.dk]\" = \"jesper@sogemaskiner.dk\"

etc.
Avatar billede jesperkh Nybegynder
07. december 2000 - 16:02 #19
Så har jeg fjernet \"klammerne\" men det virker stadig ikke..

<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\">
<html>

<head>
<title>Anbefaling</title>
<META NAME=\"Generator\" CONTENT=\"Stone\'s WebWriter 3\">
</head>

<BODY BGCOLOR=\"#CCCCCC\" TEXT=\"#000080\" LINK=\"#0000FF\" VLINK=\"#660066\" ALINK=\"#FF0000\" BACKGROUND=\"soeg/6.jpg\">
<font face=\"Arial\" size=\"2\"><b>
<%
navn = request(\"navn\")

if  Request.ServerVariables(\"REQUEST_METHOD\") = \"POST\" then
   
        Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
        JMail.ContentTransferEncoding = \"8bit\"
        JMail.Charset = \"ISO-8859-1\"
       
        JMail.Priority = 1
        JMail.ServerAddress = \"mail.gpserver.com\"
    JMail.Sender = \"jesper@sogemaskiner.dk\"
        JMail.Subject = \"Anbefaling\"
    JMail.Body = \"Hej!\" & vbCrLf & \"Det er \" & navn & vbCrLf & vbCrLf
    JMail.Body= JMail.Body + \"Bes&oslash;g www.sogemaskiner.dk!\" & vbCrLf & vbCrLf
    JMail.Body= JMail.Body + \"www.sogemaskiner.dk.\" & vbCrLf & \"En hjemmeside hvor du kan l&aelig;se alt om nyheder og deltage i debat m.m.\" & vbCrLf & vbCrLf
   
        JMail.AddRecipient request(\"ad\")
        \' Send it...
        JMail.Execute
        set JMail = nothing
response.write \" Tak.<br><br>Din anbefaling er hermed sendt videre til \" & request(\"ad\")
else %>
</b></font>
<form action=\"anbef.asp\" METHOD=\"POST\" name=\"anbefal\">
  <table cellpadding=\"2\" cellspacing=\"2\" border=\"0\">
    <tr>
      <td><font face=\"Arial\" size=\"4\" color=\"#CC0000\"><b>Anbefal
        camping-fritid.dk</b></font>
        <p><b><font face=\"Arial\" size=\"2\">Har du en ven eller et familiemedlem,
        som du mener kan<br>
        f&aring; gl&aelig;de af vores site, s&aring; send dem en anbefaling her:</font></b> </td>
    </tr>
    <tr>
      <td> </td>
    </tr>
    <tr>
      <td><input TYPE=\"TEXT\" onFocus=\"this.form.ad.select()\" value=\"Modtagerens e-mail?\"
      NAME=\"ad\" SIZE=\"20\"> </td>
    </tr>
    <tr>
      <td><input TYPE=\"TEXT\" onFocus=\"this.form.navn.select()\" value=\"Afsenderens navn?\"
      NAME=\"navn\" SIZE=\"20\"> </td>
    </tr>
    <tr>
      <td><input type=\"submit\" value=\"Send\"> </td>
    </tr>
  </table>
</form>
<%    end if%>

<!-- WebWriter AutoDato -->Opdateret d. 7.12.2000<!-- WW -->
</body>
</html>
Avatar billede steen_hansen Forsker
07. december 2000 - 16:56 #20
Kigger det igennem ved 20-tiden. Ok? Er på vej hjem nu
Avatar billede jesperkh Nybegynder
09. december 2000 - 16:21 #21
steen hansen er du faldet i et huld!!!!
Avatar billede jesperkh Nybegynder
09. december 2000 - 16:25 #22
I <FORM> står der \"anbef.asp\" hvad betyder det....
Avatar billede steen_hansen Forsker
12. december 2000 - 22:02 #23
Hej jesperkh!

Ked af at jeg aldrig har fået svaret. Det kommer her (sorry):

Du skal gemme dit dokument som \"anbef.asp\". Det varen forglemmelse!
Avatar billede steen_hansen Forsker
14. december 2000 - 09:32 #24
Er DU faldet i et hul, jesperkh? :o)
Avatar billede jesperkh Nybegynder
14. december 2000 - 12:12 #25
Den kunne jeg have undgået.... jeg har meget travelt lige fortiden... jeg har lagt et perl script op istedet... efter jul skal jeg i gang med at lægge helle siten om til asp... jeg har købet en bog om asp... så pt lukker jeg den her... du får pointne og hvis du stadig er med i Eksperten efter jul, så ses vi nok der....

God Jul.....

mvh.

Jesper
Avatar billede steen_hansen Forsker
14. december 2000 - 12:17 #26
I lige måde, Jesper. Vi snakkes...
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
Vi tilbyder markedets bedste kurser inden for webudvikling

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