Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Automatisk afsendelse af en mail ved opstart

3 views
Skip to first unread message

Emil

unread,
Dec 7, 2011, 12:30:19 PM12/7/11
to
Hej

Jeg vil gerne sende en mail (fast Subjekt og indhold: "Alt ok") til
min datter, hver gang min computer starter, så hun véd at alt er
normalt her.
Win XP pro, Thunderbird 8.0, begge helt opdaterede-

Hvordan gør jeg det?


m.v.h Emil

Gamle

unread,
Dec 7, 2011, 1:22:13 PM12/7/11
to
Måske noget hér
http://programmer.downloadcentral.dk/?AutoMailSenderStandardEdition/Plug-Ins/Internet/3916

kender det ikke, men fandt ved en søgning på google.

Mvh.
Torbe


Emil

unread,
Dec 7, 2011, 5:44:23 PM12/7/11
to
"Gamle" <cfs4...@post.cybercity.dk> wrote:

>Emil wrote:
>> Jeg vil gerne sende en mail (fast Subjekt og indhold: "Alt ok") til
>> min datter, hver gang min computer starter, så hun véd at alt er
>> normalt her.
>> Win XP pro, Thunderbird 8.0, begge helt opdaterede-
>> Hvordan gør jeg det?



Mange tak linket. Programmet kan utoligt meget, og er nemt at gå til.
Jeg kan ikke umiddelbart finde en funktion der kan bruges til mit
behov (enten "send ved hver start af computeren" eller "Klik OK for at
sende"), men jeg kigger videre i de kommende dage.

Den ønskede funktion minder om en "Dødemandsknap", som udløser alarm,
hvis der ikke modtages en mail fra mig regelmæssigt.

Endnu en tak for forslaget.


m.v.h. Emil

Klaus Jørgensen

unread,
Dec 9, 2011, 11:07:15 AM12/9/11
to
Emil expressed precisely :
> Jeg vil gerne sende en mail (fast Subjekt og indhold: "Alt ok") til
> min datter, hver gang min computer starter, så hun véd at alt er
> normalt her.
> Win XP pro, Thunderbird 8.0, begge helt opdaterede-

Jeg lavede en gang et script der kunne sende en mail, bare ved at
klikke på et ikon. Det burde så også kunne køre automatisk, hvis man
lægger det ind i startgruppen.
Det kan dog ikke sende via en Hotmail-konto, men virker fint med Gmail
og Telenor (og er ligeglad med, om der overhovedet er installeret et
mailprogram på pc'en).
Hvis du har mod på selv at tilrette et sådant script med dine egne
mailoplysninger, og ikke bruger Hotmail, kan jeg poste det her.

--
/klaus


Emil

unread,
Dec 9, 2011, 5:18:05 PM12/9/11
to
Klaus Jørgensen <k...@address.invalid> wrote:

>Jeg lavede en gang et script der kunne sende en mail, bare ved at
>klikke på et ikon. Det burde så også kunne køre automatisk, hvis man
>lægger det ind i startgruppen.
>Det kan dog ikke sende via en Hotmail-konto, men virker fint med Gmail
>og Telenor (og er ligeglad med, om der overhovedet er installeret et
>mailprogram på pc'en).
>Hvis du har mod på selv at tilrette et sådant script med dine egne
>mailoplysninger, og ikke bruger Hotmail, kan jeg poste det her.

Hej Klaus

Det lyder næsten for godt til at være sandt :-)
Jeg er helt tændt på, selv at tilrette et sådant script.
Tidligere har jeg programmeret i Assembler (Intel & Motorola), siden i
flere andre programmeringssprog.

Scripts er nyt for mig, men så vidt jeg kan se, ligger det tæt på C+


m.v.h. Emil

Mcwm

unread,
Dec 9, 2011, 6:38:46 PM12/9/11
to

Bertel Lund Hansen

unread,
Dec 10, 2011, 1:46:39 AM12/10/11
to
Emil skrev:

> Scripts er nyt for mig, men så vidt jeg kan se, ligger det tæt på C+

Scripts er lige så forskellige som programmeringssprog. PHP
bruger C-syntaks.

--
Bertel
http://bertel.lundhansen.dk/ http://fiduso.dk/

Klaus Jørgensen

unread,
Dec 10, 2011, 2:51:21 AM12/10/11
to
Emil used his keyboard to write :
> Klaus Jørgensen <k...@address.invalid> wrote:
>
>> Jeg lavede en gang et script der kunne sende en mail, bare ved at
>> klikke på et ikon. Det burde så også kunne køre automatisk, hvis man
>> lægger det ind i startgruppen.
>
> Det lyder næsten for godt til at være sandt :-)
> Jeg er helt tændt på, selv at tilrette et sådant script.

Det er lavet i VBScript, så det lignet jo mest Basic. (c:
Gem koden mellem de stiplede linjer i en fil med .vbs-type, f.eks.
InfoMail.vbs. Du skal så bare tilrette konstantdeklarationerne i
starten af scriptet, så det passer med din egen opsætning. Brug evt.
din egen mailadresse som modtager, til du ved det virker. Da det kører
uden mailprogram, gemmes ikke noget i listen over sendt mail.

--------------------------------------------------------------
Option Explicit

Const afsender = "afse...@et.domæne"
Const modtager = "modt...@et.domæne"
Const emne = "emne"
Const tekst = "noget tekst"

Const SmtpServer = "smtp.google.com"
Const SmtpPort = 465
Const SmtpUseSSL = true
Const SmtpUser = "bruge...@gmail.com"
Const SmtpPswd = "password"

Dim objEmail
Set objEmail = CreateObject("CDO.Message")

With objEmail.Configuration.Fields
.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") =
2
.Item
("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") =
SmtpServer
.Item
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") =
SmtpPort
.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername")
= SmtpUser
.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword")
= SmtpPswd
.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") =
SmtpUseSSL
.Item
("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout")
= 30
.Update
End With
objEmail.From = afsender
objEmail.To = modtager
objEmail.Subject = emne
objEmail.Textbody = tekst
On Error Resume Next
objEmail.Send
If Err Then WScript.Echo "Mailfejl:" & vbCrLf & Hex(Err.Number) & " - "
& Err.Description
--------------------------------------------------------------------

--
/klaus


0 new messages