Søg
Avatar billede izemate Nybegynder
16. oktober 2006 - 15:48 Der er 4 kommentarer og
1 løsning

Fra Jmail til CDONTS?

Er det muligt at lave dette Jmail script om så det kører CDONTS istedet?

<%
Set JMail = Server.CreateObject("JMail.SMTPMail")
Response.Expires = 0

Dim strName, strAddresse, strPostnummer, strBy, strTlf, strEmail


If Request.ServerVariables("CONTENT_LENGTH") <> 0 Then
  strNavn = Trim(Request.Form("Navn"))
  strEmail = Trim(Request.Form("Email"))
  strBesked = Trim(Request.Form("Besked"))
 
  JMail.ServerAddress = "smtp.unoeuro.com"
  JMail.sender = "form@street-crew.dk"
  JMail.subject = "Besked fra xxxxxsdfsdf"
  JMail.AddRecipient "kontakt@media4.dk"
  JMail.AddRecipientCC ""
  JMail.AddRecipientBCC ""

  'Her bliver e-mailen til et "ENTER" bliver angivet med: "& VbCrLF"
  JMail.Body = "E-mail fra Street-crew.dk: " & VbCrLf
  JMail.Body = JMail.Body & strCv
  JMail.Body = JMail.Body & "Navn: " & strNavn & VbCrLf & VbCrLf
  JMail.Body = JMail.Body & "E-mail: " & strEmail & VbCrLf & VbCrLf
  JMail.Body = JMail.Body & "Besked: " & strBesked & VbCrLf & VbCrLf
  JMail.Body = JMail.Body & strCv
 
  'Her bliver form-mailens prioritet bestemt
  ' 1 - h?jeste (Haster / Vigtigt)
  ' 3 - normal
  ' 5 - lavest
  JMail.Priority = 1

  JMail.Execute
 
%>

Hvis man ikke kan vil jeg gerne have et link til en komplet mail formulat der benytter CDONTS.. altså både HTML siden og script siden.

På forhånd tak.
Avatar billede wilweb Nybegynder
16. oktober 2006 - 16:08 #1
Kan du bruge dette her eksempel fra microsoft?

    <%@ Language=VBScript %>
    <HTML>
    <HEAD>
    <META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
    <%

    Dim myMail
    Dim HTML
    Set myMail = CreateObject("CDONTS.NewMail")

    HTML = "<!DOCTYPE HTML PUBLIC""-//IETF//DTD HTML//EN"">"
    HTML = HTML & "<html>"
    HTML = HTML & "<head>"
    HTML = HTML & "<meta http-equiv=""Content-Type"""
    HTML = HTML & "content=""text/html; charset=iso-8859-1"">"
    HTML = HTML & "<meta name=""GENERATOR"""
    HTML = HTML & " content=""Microsoft Visual Studio 6.0"">"
    HTML = HTML & "<title>HTMLMail</title>"
    HTML = HTML & "</head>"
    HTML = HTML & "<body bgcolor=""FFFFFF"">"
    HTML = HTML & "<IMG SRC=""http://www.microsoft.com/library/"
    HTML = HTML & "images/gifs/homepage/microsoft.gif"" BORDER=0 "
    HTML = HTML & "WIDTH=167 HEIGHT=36 ALT=""Microsoft Corporation"">"
    HTML = HTML & "<p><font size =""3"" face=""Arial""><strong>"
    HTML = HTML & "Microsoft Exchange CDONTS Example</strong></p>"
    HTML = HTML & "<p><font size =""2"" face=""Tahoma"">"
    HTML = HTML & "CDO for NTS allows an easy way to send mail.<br>"
    HTML = HTML & "This example shows how the content can be "
    HTML = HTML & "an HTML page<br>"
    HTML = HTML & "which allows you to send rich text and"
    HTML = HTML & "inline graphics.</p>"
    HTML = HTML & "</body>"
    HTML = HTML & "</html>"

    myMail.From="someone@microsoft.com"
    myMail.To="someone@microsoft.com"
    myMail.Subject="Sample CDONTS HTML Message"
    myMail.BodyFormat=0
    myMail.MailFormat=0
    myMail.Body=HTML
    myMail.Send
    set mymail=nothing
    Response.Write "Message Sent"
    %>
    </HEAD>
    <BODY>
    </BODY>
    </HTML>
Avatar billede cpufan Juniormester
16. oktober 2006 - 19:36 #2
cdonts er udgået, brug istedet dette

<%
Set CDOmail=CreateObject("CDO.Message")
CDOmail.Subject="Afsendelse af email med CDO"
CDOmail.From="CDOmail@mitdom.dk"
CDOmail.To="en-eller-anden@et-vilk-dom.dk"
CDOmail.HTMLBody = "<h1>Dette er en besked</h1>"
CDOmail.Send
%>
Avatar billede wilweb Nybegynder
17. oktober 2006 - 17:24 #3
klarede du det?
Avatar billede izemate Nybegynder
01. november 2006 - 10:23 #4
lukker
Avatar billede wilweb Nybegynder
01. november 2006 - 11:07 #5
izemate:< du er en noget af en type! Man forsøger at hjælpe dig, men du vælger bare at lukke spørgsmålet uden at sige andet end 'lukker'. Det er åbenbart kun, at spilde sin tid med dine spørgsmål eller hvad?
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
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
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 går 13:08 Bruge PHP til at hente hjemmeside med fsockopen Af Strawberry i PHP
28/0113:36 godt råd søges Alternativ styresystem på Mac pc Af luffe1955 i Andre styresystemer
28/0111:32 Hjælp til kontrol af sygefravær Af Maja i Excel
27/0113:59 2 skærme til en stationær computer Af BIRGER i Skærme
26/0119:26 Opstart af ny computer Af Bent i Windows
White papers
Flere white papers »