CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede haakonhoyland Nybegynder
23. august 2001 - 22:55 Der er 10 kommentarer og
1 løsning

Send article to a friend script ?

Are there anyone who got a script that can do this ?Go to this web site:  http://www.soccerway.com/?page=details&area=998584761

And click on \'mail-to-a-friend\' at the top... then a box pops up.. where a visitor can recomend a news article to a friend. and it seems like some of the news will be sent to the user, etc. so therefor the system needs to connect to my current news database to ?  Please can anyone help.. as soon as possible. please :-)           
Avatar billede nordclc Nybegynder
24. august 2001 - 01:12 #1
Hvilket mail program understøtter dit webhotel?
Avatar billede j.robert Nybegynder
24. august 2001 - 03:08 #2
Here is an ASP scripts that uses ASPmail. Follow the link:

http://www.activeserverpages.dk/download/default.asp?mode=showdownload&id=220

J. Robert
Avatar billede j.robert Nybegynder
24. august 2001 - 03:10 #3
You can make it look like the above, with some minor adjustments.

J. Robert
Avatar billede j.robert Nybegynder
24. august 2001 - 03:18 #4
Heres another using CDONTS incl. an Access database:

http://www.activeserverpages.dk/download/default.asp?mode=showdownload&id=270

You must also here make some minor adjustments.

Any problems then contact med. I made this scripts.

J. Robert
Avatar billede j.robert Nybegynder
24. august 2001 - 03:20 #5
It can send a messsage to the \"Friend\" and to the \"user\" and to the database.

Incl. a validation.

J. Robert
Avatar billede haakonhoyland Nybegynder
24. august 2001 - 15:04 #6
My web hotell supports Jmail.
Avatar billede j.robert Nybegynder
24. august 2001 - 19:01 #7
I have it in JMail version too.
I can email it to you later to night.

If you are interested, then submit your email.

J. Robert
Avatar billede haakonhoyland Nybegynder
24. august 2001 - 20:22 #8
send det til:

haakon_hoyland@hotmail.com
Avatar billede haakonhoyland Nybegynder
30. august 2001 - 18:20 #9
Kan du please svare på emailen så raskt som mulig Andreas !! :-)
Avatar billede jiggypoof Nybegynder
06. september 2001 - 23:17 #10
som på icq
Avatar billede jiggypoof Nybegynder
06. september 2001 - 23:22 #11
<%
set conn = server.createobject(\"adodb.connection\")
    conn.Open \"DBQ=\" & Server.Mappath(\"/admin/news.mdb\") & \";\" & \"Driver={Microsoft Access Driver (*.mdb)};\"
Dim news
    news = Request.QueryString(\"news\")
    SQL = \"SELECT * FROM news WHERE id=\" & news &\"
    Set rs = Server.CreateObject(\"ADODB.Recordset\")
%>
<html>
<head>
<title>Anbefaling</title>
</head>

<body BGCOLOR=\"#FFFFFF\" TEXT=\"#000000\">
<%

dig = request(\"navn\")
ham = request(\"hisnavn\")
mail = request(\"ad\")

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 = \"din_smtp.server.dk\"
        JMail.Sender = \"Din_afsender_e-mail.dk\"
        JMail.Subject = \"Artikkel sendt til dig, fra din ven \" & dig
        JMail.Body = \"Hej\" & ham & vbCrLf & \"Din ven \" & dig & \", har besøgt vores side http://www.DINSIDE.dk og sendt dig denne artikkel\" &vbCrlf
       
        JMail.Body= JMail.Body + rs(\"titel\") & vbCrLf
        JMail.Body= JMail.Body + rs(\"teaser\") & vbCrLf & vbCrlf
        JMail.Body= JMail.Body + \"Du kan læse den fulde artikkel på http://www.DINSIDE.dk/nyhed.asp?id\"& news & vbCrLf \"Håber vi ses dig\"
        JMail.AddRecipient mail
       
        JMail.Execute
        set JMail = nothing
response.write \" Nyheden \" & rs(\"titel\") & \" er sendt til \" & ham & \" på \" & mail

   

else %>

<form action=\"anbef.asp\" METHOD=\"POST\">
  <table cellpadding=\"2\" cellspacing=\"2\" border=\"1\">
    <tr>
      <td><div align=\"center\"><center><h2>Anbefal Min side</h2>
      </center></div></td>
    </tr>
    <tr>
      <td><input TYPE=\"TEXT\" onFocus=\"this.form.ad.select()\" value=\"Modtagerens e-mail?\"
      NAME=\"ad\" SIZE=\"17\"> </td>
    </tr>
    <tr>
      <td><input TYPE=\"TEXT\" onFocus=\"this.form.navn.select()\" value=\"Afsenderens navn?\"
      NAME=\"navn\" SIZE=\"17\"> </td>
    </tr>
    <tr>
      <td><input TYPE=\"TEXT\" onFocus=\"this.form.hisnavn.select()\" value=\"Modtagerens navn?\"
      NAME=\"navn\" SIZE=\"17\"> </td>
    </tr>
    <tr>
      <td><input type=\"submit\" value=\"Send\"> </td>
    </tr>
  </table>
</form>
<%    end if%>

<%
DataConn.Close 
Set DataConn = Nothing
%>
</body>
</html>
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

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Classic - filer vist med sidste fil først Af bsn i ASP 5 23/05/202409:56 24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP 4 26/04/202417:16 26/04/202418:37
JSON Af ingeman i ASP 3 07/04/202417:53 08/04/202412:09
Vis detaljeret fejlkoder Af poulmadsen i ASP 6 09/03/202418:16 10/03/202417:59
IIS virker ikke på asp sider... Af bsn i ASP 10 15/10/202313:12 18/10/202308:48
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 10:11 LENOVO genstarter af sig selv, når jeg ser video på Facebook Af keld66 i Windows
I dag 09:37 Prosomic 65 uand8009 Af Bassine i Fjernsyn & projektorer
I går 20:46 opkaldside Af hagbartm i Mobiltelefoner
I går 16:05 win 10 vil ikke boote Af bb69 i Windows
I går 11:20 Lenovo x390 Af tobberjas i PC
White papers
Flere white papers »


Premium
Teaser billede
Rigsrevisionen kritiserer fire statslige myndigheder for dårlig it-sikkerhed: Har haft seks år til at løse problemet
Læs mere »
Microsofts nye Windows 11-funktion kaldes ”en guldgrube for hackere”
"Jeg var den sjette medarbejder, der blev ansat dengang, i dag er vi over 1000"
Twoday rykker hovedkontoret til Nordhavn: Opsiger flere lejemål og samler kontorer
Se alle »
Computerworld
Teaser billede
MobilePay ændrer på funktion få måneder efter stor opdatering
Læs mere »
Den næste version af Windows 11 er nu tilgængelig for de første brugere: Se, hvad du kan forvente
Kæmpemæssig AI-opdatering styrer mod din iPhone: Derfor bliver iOS 18 særlig interessant
Jeg havde simpelthen aldrig forestillet mig, at det nye Rejsekort ville minde om noget, der var udtænkt af IBM i 60’erne
Se alle »
CIO
Teaser billede
Energinet får igen kritik for milliardstor outsourcing: To væsentlige it-sikkerhedstiltag er ikke blevet indført til tiden
Læs mere »
Nomineret til Årets CIO: Martin Wood har skabt en leveringsmaskine hos Domstolsstyrelsen - Håber det kan inspirere andre offentlige myndigheder
Han er en af Danmarks bedste CIO’er: Topdanmarks Kasper Tjørntved Davidsen står i spidsen for digitale transformationer til milliarder af kroner
Bestyrelser på pinebænken under hackerangreb: "Altså 500.000 euro i løsesum er jo ikke så meget"
Se alle »
Job & Karriere
Teaser billede
Her er Danmarks fem bedste CIO’er lige nu: Se de fem nominerede til prisen som Årets CIO 2024
Læs mere »
Medarbejderne fik udleveret badetøfler ved indflytningen: Kom med inden for i IBM Danmarks nye topmoderne hovedkontor
Google fyrer hele sit Python-team
Får du den løn, du fortjener? Få overblikket over hvor meget dine kolleger tjener hver måned
Se alle »
White paper
Teaser billede
Få mere ud af din cloudinfrastruktur og gør op med de konstant stigende omkostninger
Læs mere »
Whitepaper: Komplet sikkerhedsguide til Kubernetes
Optimering af Source-to-Pay: Identificér oplagte gevinster og skær omkostninger
Det behøver ikke at gøre ondt: Sådan gør du livet lettere for kunder med multicloud
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »