Avatar billede jonmh Nybegynder
23. september 2003 - 13:07 Der er 3 kommentarer og
1 løsning

e-mail

kan jeg lave en .vbs fil der sender en e-mail til mig når den bliver åbnet, hvordan ?
Avatar billede medions Nybegynder
23. september 2003 - 13:50 #1
Efter hvad jeg ved er det ikek muligt at sende mails gemmen clientsided VBScript!

//>Rune
Avatar billede mm12010 Nybegynder
23. september 2003 - 14:15 #2
du kan lave en asp-side i VB-Script med eks. JMail der kan gøre det

løsninger her på E:
http://www.eksperten.dk/kat/3/?searchtype=txt&words=jmail&method=and&sort=score&catid=3

JMail:
http://www.dimac.net/
Avatar billede Slettet bruger
23. september 2003 - 16:07 #3
Du kan benytte CDO: http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cdo/html/_olemsg_overview_of_cdo.asp

Da min mail server desværre er berørt af strømsvigtet sjælland/skåne kan jeg ikke teste nedenstående, men det er hugget fra et script jeg har skrevet tidligere, og mener at det er en version der virker!

Jeg fandt også følgende ved at søge på iMsg på msdn/library

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cdosys/html/_cdosys_sending_and_posting_messages.asp

Endvidere er der et eksempel på hvordan man sender attachments:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cdosys/html/_cdosys_sending_and_posting_messages.asp

Det er et års tid siden jeg brugte CDO, men det ser ud til at være blevet noget bedre dokumenteret siden sidst, så nedenstående er måske ikke længere den smarteste(eneste) måde at gøre tingene på!

strFrom = "ME"
strTo = "YOU"
strSubject = "TestMail"
strBody = "My not very interesting body"
strServer = "My smtp server"
Set iMsg = CreateObject("CDO.Message")

Set iConf = iMsg.Configuration
Set Flds = iConf.Fields
Flds("http://schemas.microsoft.com/cdo/configuration/smtpserver") = strServer
Flds("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
Flds("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 'cdoSendUsingPort
Flds("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 0 'cdoBasic


Flds.Update
Set Flds = Nothing


'Creating a new iMessage
With iMsg
        .From = strFrom
        .Subject = strSubject
        .TextBody = strBody
        .To = strTo
        .Fields.Update
End with

iMsg.Send
Avatar billede Slettet bruger
23. september 2003 - 16:09 #4
Ups, urlen til at attachments blev forkert. Her er den rigtige:

http://msdn.microsoft.com/library/en-us/cdosys/html/_cdosys_adding_attachments.asp
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