[ASP] Dundas Mailer* - Softwareontwikkeling

donderdag 6 november 2003 13:14

Acties:

Topicstarter

Hooi ik ben dus bezig met een mail scriptje! Kan niet makkelijk via dundas!!!
Met een mooie online documentaire. Je hoef et alleen maar te kopieeren en te plakken. En daar gaat het mis.. Of ik ben debiel of het is iets anders? Maar ik heb dundas geinstalleerd ik heb me computer opnieuw gestart alleen het werkt niet.. Dit is mijn code.
Als ik hem run dan timed out hij?

code:

<html>
<head>
    <title>Mail</title>
</head>

<body>

<%
'most control methods throw an exception if an error occurs so we will use an On Error statement
On Error Resume Next 

Dim objMailer 'Mailer control 

'create instance of Mailer control
Set objMailer = Server.CreateObject("Dundas.Mailer")

'send email
objMailer.QuickSend "FromMe@SomeServer.com","ToSomeUser@SomeDomain.com","Subject","This is the body."
'you can test for the success/failure of the operation by examining VBScript's Err object here

Set objMailer = Nothing
%>


</body>
</html>

donderdag 6 november 2003 13:16

Acties:

.oisyn

Moderator Devschuur®

Demotivational Speaker

***** Lees dit! Over topictitels in P&W *****

Give a man a game and he'll have fun for a day. Teach a man to make games and he'll never have fun again.

donderdag 6 november 2003 13:17

Acties:

Phenomenon

Zoz

Haal eerst die on error resume next er maar eens uit, en kijk wat je dan voor melding krijgt.

donderdag 6 november 2003 13:18

Acties:

Sonic

Topicstarter

Oops sorry jah vergeten...

donderdag 6 november 2003 13:18

Acties:

whoami

Debug je code, kijk waar hij time-out en zoek de oorzaak.

https://fgheysels.github.io/

donderdag 6 november 2003 13:19

Acties:

Sonic

Topicstarter

Supervisor schreef op 06 november 2003 @ 13:17:
Haal eerst die on error resume next er maar eens uit, en kijk wat je dan voor melding krijgt.

Al geprobeert maar werkt dus niet

donderdag 6 november 2003 13:20

Acties:

Phenomenon

Zoz

Sonic- schreef op 06 november 2003 @ 13:19:
[...]

Al geprobeert maar werkt dus niet

Wat werkt dus niet? Blijf je een timeout houden dan?

donderdag 6 november 2003 13:21

Acties:

Sonic

Topicstarter

ja, dan hangt hij nog steeds

als ik dit weg haalt doet ie het wel

code:

1	objMailer.QuickSend "sjabbaaa@hotmail.com","fdss@fdsl.com","Subject","This is the body."

maar dan kan verstuurd ie nix natuurlijk
email adressen zijn natuurlijk wel echt

hier staan ze niet echt in

[ Voor 66% gewijzigd door Sonic op 06-11-2003 13:23 ]

donderdag 6 november 2003 13:24

Acties:

Stewie!

Keen must die!

waarom niet gewoon via Cdonts?

Strava: https://www.strava.com/athletes/149347154

donderdag 6 november 2003 13:26

Acties:

Sonic

Topicstarter

DaMorpheus schreef op 06 november 2003 @ 13:24:
waarom niet gewoon via Cdonts?

Omdat ik dundas eerder vondt en er al is mee gewerkt heb..
Ik wil et nu weten ook

Heb me SMTP wel geinstalleerd en dit is de melding

Sending an Email with the QuickSend Method
Dundas.Mailer.1 error '80004005'

The connection timed-out.

/test.asp, line 12

[ Voor 71% gewijzigd door Sonic op 06-11-2003 14:41 ]

donderdag 6 november 2003 16:21

Acties:

Polderdijk

Ik heb ook gewoon iets simpels, en hoef je geen enkel component te installen, voeg eerst deze functie toe:

ASP:

Function MailVerzenden(SendTo,Subject,Body,Attachments)
    Set cdoConfig = Server.CreateObject("CDO.Configuration")
    sch = "http://schemas.microsoft.com/cdo/configuration/" 
    cdoConfig.Fields.Item(sch & "sendusing") = 2
    cdoConfig.Fields.Item(sch & "smtpserver") = "mail.jouwmobiel.com"
    cdoConfig.fields.update
    Set objNewMail = Server.CreateObject("CDO.Message")
    Set objNewMail.Configuration = cdoConfig
    objNewMail.From= "maarten@jouwmobiel.com" 
    objNewMail.To= SendTo
    objNewMail.Subject=Subject
    objNewMail.TextBody=Body
    If IsArray(Attachments) Then
        For i = 0 To Ubound(Attachments)
            objNewMail.AddAttachment Attachments(i)
        Next
    End If
    objNewMail.Send
    Set objNewMail = Nothing 
End Function

En dan ergens in je code, roep je hem aan via:

ASP:

    EMail = "jeeigen@mailadres.nl"
    Subject = "Dit is het onderwerp!"
    Body = Body & "" & VbCrLf
    Body = Body & "Veel plezier met je nieuwe account!" & VbCrLf
    Body = Body & "" & VbCrLf
    Body = Body & "Met vriendelijk groet," & VbCrLf
    Body = Body & "" & VbCrLf
    Body = Body & "Het Jouwmobiel.com Team" & VbCrLf
    MailVerzenden Email, Subject, Body, ""

Makkelijk of makkelijk

En het is gewoon standaard M$ en werkt altijd mits je je eigen mailserver maar invuld waarop je mag relayen...

Webhosting van SkyHost.nl: 25 Mb / 1 Gb windows hosting € 4,50 p/m excl.btw!

vrijdag 7 november 2003 02:34

Acties:

RobIII

Admin Devschuur®

^ Romeinse Ⅲ ja!

Als Dundas time-out geeft (ik gebruik 'm ook veel) dan is het in 9 van de 10 gevallen dat 'ie niet kan verbinden met de mailserver...Check eens of je vanuit die bak wel mag relayen ofzo en of je uberhaupt een connectie krijgt met de mailserver.

Overigens zie ik nergens in je code waar je een server zet?
Deze code gebruik ik:

code:

On error resume next
Set objMailer = Server.CreateObject("Dundas.Mailer")
with objMailer
    .SMTPRelayServers.Add "mail.******.nl"
    .FromAddress = "afzender@host.com"

    .Tos.add "pietje@puk.com", "dhr pietje puk"
    .Body = "test body"
    .Subject = "test subject"
    .SendMail

    If err.number<>0 then
        response.write "Er ging iets fout! Foutmelding: " & Err.Number & " - " & Err.Description
    end if
end with
Set objMailer = Nothing

Ik gebruik (zoals je ziet) iig niet de quicksend, maar die zou ook moeten werken...

There are only two hard problems in distributed systems: 2. Exactly-once delivery 1. Guaranteed order of messages 2. Exactly-once delivery.

Je eigen tweaker.me redirect

Over mij

vrijdag 7 november 2003 03:20

Acties:

Stewie!

Keen must die!

TS, Polderdijk geeftr je een voorbeeld met Cdonts. Waarom moeilijk doen als het makkelijk kan? Cdonts zit standaard op elke computer met IIS geinstalleerd

Strava: https://www.strava.com/athletes/149347154

vrijdag 7 november 2003 08:39

Acties:

4of9

CDO zoals een voorbeeld functie hiervoor is gepost is zelfs nog beter, aangezien die ook op NT 4 en windows 2003 draait. EN je hebt geen smtp van IIS nodig in tegenstelling tot Cdonts.

En als je toch dundas wilt gebruiken kijk eens in de documentatie.

Aspirant Got Pappa Lid | De toekomst is niet meer wat het geweest is...

vrijdag 7 november 2003 09:36

Acties:

Polderdijk

DaMorpheus schreef op 07 november 2003 @ 03:20:
TS, Polderdijk geeftr je een voorbeeld met Cdonts. Waarom moeilijk doen als het makkelijk kan? Cdonts zit standaard op elke computer met IIS geinstalleerd

DaMorpheus, let op dat ik het over CDO hebt, en niet Cdonts. Als je namelijk via Cdonts gaat mailen gebruikt hij de settings van je PC, en hoef je dus niet, zoals bij CDO, je mailserver op te geven. (toch?)

Helaas krijg ik door vage rechten enzo cdonts niet echt goed werkend (want dat wordt vaker ondersteund door scripts van derde.)

Webhosting van SkyHost.nl: 25 Mb / 1 Gb windows hosting € 4,50 p/m excl.btw!

vrijdag 7 november 2003 10:28

Acties:

4of9

Bij Cdonts KUN je niet eens je mailerver opgeven.

Aspirant Got Pappa Lid | De toekomst is niet meer wat het geweest is...