Avatar billede djsteiner Nybegynder
04. december 2008 - 18:41 Der er 6 kommentarer og
1 løsning

asp mail kvittering

Hej jeg står og kunne godt bruge noget hjælp til.

det jeg gerne ville var at sende kvittering via asp-email.

jeg har lavet en kode men hvor jeg gerne ville uddskrive noget fra en db i et loop  til "Mail.Body" men ikke helt hvordan

Her er min kode som den ser ud nu


<%
   
    navn= request.Form("navn")
    efternavn= request.Form("efternavn")
    adresse= request.Form("adresse")
    post= request.Form("post")
    city= request.Form("by")
    email= request.Form("email")
    produkter = request.Form("produkter")
    tprice = request.Form("tpris")
    email= request.Form("mail")
    emne= request.Form("emne")
    antal= request.Form("antal")
   
   
    Set Mail = Server.CreateObject("Persits.MailSender")
   
    'Skal emailen være i HTML? true/false
    Mail.IsHTML = true
   
    'Indtast host
    Mail.Host = "medieskolerne.dk"
       
    'Indtast brugernavn til smtp serveren
    Mail.Username = "elev@medieskolerne.dk"
   
    'Indtast kodeord til smtp serveren
    Mail.Password = "elev"
   
    'Indtast email på afsender
    Mail.From = ""&email&""
   
    'Indtast navnet på afsender
    Mail.FromName = ""&navn&""
   
    'Indtast email til modtager
    Mail.AddAddress "zeronr3@msn.com"
   
sqlkunde = "select * from kundeinfo,orders where orders.SID="&session.SessionID&" and orders.kid="&session("userid")&" and  kundeinfo.k_id=orders.kid order by kid desc limit 1"
    set rskunde = conn.execute(sqlkunde)
   
    'Eksempel på html brødtekst
    Mail.Body = "<html><body>"&&"</body></html>"
       
    'Send email
    if Mail.Send then
        'Udskriv success tekst   
        response.write"<br /><br /><h4><strong>Kvittering er blevet sendt til digt</strong></h4>"
    else
        'Udskriv fejl besked
        response.write"<br /><br /><h4><strong>Der opstod en ukendt fejl</strong></h4>"
    end if

   

   
    %>
Avatar billede keysersoze Guru
04. december 2008 - 22:44 #1
Mail.Body = "<html><body>"& rskunde("xxx") &"</body></html>"

Det vil dog være en idé på forhånd at tjekke om dit recordset er tomt eller ej - og så også få lukket både dit mail-, conn- og recordset-objekt igen.
Avatar billede djsteiner Nybegynder
05. december 2008 - 00:40 #2
Hej hvad så hvis jeg gerne udskriver flere ting ud ?


jeg har prøvet sådan her men det virker ikke.

Do until rsk1.eof
    'indtast bredtekst
    Mail.Body = "<html><body>"& rsk("k_navn") rsk("k_efternavn") & "</body></html>"
    rsk1.movenext
            loop
Avatar billede djsteiner Nybegynder
05. december 2008 - 00:44 #3
så kommer denne fejl

Fejltype:
Der opstod en Microsoft VBScript-kørselsfejl (0x800A01A8)
Et objekt er obligatorisk: ''
/codex-webshop/include/betaling.asp, line 248
Avatar billede keysersoze Guru
05. december 2008 - 09:15 #4
Mail.Body = "<html><body>"& rsk("k_navn") & rsk("k_efternavn") & "</body></html>"

eller

Mail.Body = "<html><body>"& rsk("k_navn") & " " & rsk("k_efternavn") & "</body></html>"
Avatar billede djsteiner Nybegynder
05. december 2008 - 12:22 #5
Det virker ikke lige meget hvilket løsning jeg bruger
Avatar billede keysersoze Guru
05. december 2008 - 12:36 #6
sørg for at dit recordset kaldes det samme - i spørgsmålet kalder du det rskunde, i dit loop kalder du det rsk1 og når du bruger værdierne kalder du det rsk.
Avatar billede djsteiner Nybegynder
06. december 2008 - 11:01 #7
Hej ja nu virker det tak for hjælpen
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