Fråga : Automatisk e-postöverföring

Hi grabbar! behov för
I några som programmerar, eller programhjälp…, Jag önskar att veta att en skriva eller ett program som ska automatiskt, överför en e-post till specificerad tilltalar på uppsättningen för mellanrum I. Finns det några skrivar mig kan använda i bakgrunden på min dator? Kanske något att jag kan ge min e-postserverinställningar till?

Thanks! " klar "

Svar : Automatisk e-postöverföring

Från faktiskt någon version av Windows efter något att sägaWindows 2000 du bör vara kompetent att köra en VBS via Windows skrivar varar värd.

Du kan behöva att installera Windows som skrivar delar: http://www.microsoft.com/downloads/details.aspx?FamilyID=C717D943-7E4B-4622-86EB-95A22B832CAA&displayLang=en (Windows upp till Windows Xp och Windows server 2003)

eller PowerShell http://technet.microsoft.com/en-us/scriptcenter/powershell.aspx (Windows Xp eller mer sistnämnd, Windows server 2008)

http://msdn.microsoft.com/en-us/library/9bbdkx3k%28VS.85%29.aspx diskuterar hur man kör en skriva, men, om du har en av det över installerade därefter springet vbs att skriva enkelt hjälpmedel som kallar den något liknande något program, som hjälpmedel från en planlagd uppgift, grupperar sparar, eller enkelt dubblett som klickar vbsna, sparar.

Av specifikt bekymmer i detta fall att ha CDO.SYS installeras som du behöver för att överföra e-post.

Hur man får: http://support.microsoft.com/kb/171440

Så stunder som dina enkla skrivar, kan suffice, det kan behöva att vara mer försvårad, åtminstone litet. Men för det överbryggar korsas dig önskar att se till att du att ha skriva och samarbetsdata anmärker installerat korrekt.

Båda, som kunde vara av enkelt, eller komplex beroende av din miljö och båda kunde mycket välla fram spawn ifrågasätter av deras eget.

Den din resonera skrivar kan behöva att vara mer komplex är att du är rimligt gå att behöva att överföra e-posten till och med ett av dina utbyteskonton och att ska gäll att specificera det korrekt vara värd eller serveren och antagligen legitimation.

Så ditt skriva lite ska växer till något något liknande fäst, som utför grundläggande SMTP-legitimation mot en avlägsen server.  Jag paketerade smutsa ner specificerar in i en subroutine och tillfogade lite CDO-typarkivet upptill, så jag kan använda CDO-konstanter i skriva. (Den växer annorlunda a bet ganska större.),

Jumbon fodrar sendmailappeller subroutinen och passerar från tilltalar,

Större eller det inte är stilla precis vbs skrivar.

Vbs för en testa skrivar för att se, om WSH installeras kunde vara en en eyeliner,

msgbox (”hälsningvärld”)

Hälsningar,
Stång

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:



Undersendmail (pFrom, pTo, pSubject som, är pBody)
    Dunkel objCDO
    Dunkel iConf
    Dunkla Flds

    Const cdoSendUsingPort = 2

    Fastställd objCDO = Server.CreateObject (”CDO.Message”)
    Fastställd iConf = Server.CreateObject (”CDO.Configuration”)

    Fastställda Flds = iConf.Fields
    Med Flds
        . Objekt (cdoSendUsingMethod) = cdoSendUsingPort
        . Objekt (cdoSMTPServer) = ”smtp.example.com”,
        . Objekt (cdoSMTPServerPort) = 25
        . Objekt (cdoSMTPconnectiontimeout) = 10
        'Specificera typen av legitimation, INGA som är grundläggande (kodad Base64), NTLM
		. Objekt (”smtpauthenticate”) = cdoBasic
		. Objekt (”sendusername”) = ”userid”,
		. Objekt (”sendpassword”) = ”lösenord”,
        . Uppdatering
    Avsluta med

    Uppsättning objCDO.Configuration = iConf

    objCDO.From = pFrom
    objCDO.To = pTo
    objCDO.Subject = pSubject
    objCDO.HTMLBody = pBody

    På felmeritförteckning därefter
    objCDO.Send
    Om fela därefter
        CDOMailIncludeResults= " FEL: ”&err.number &” ”& err.description &” ”& err.source
    Annars
        " Överförda " CDOMailIncludeResults=,
    Avsluta om
    På fel Goto 0 

    Fastställda ObjCDO = ingenting
    Fastställd iConf = ingenting
    Fastställda Flds = ingenting
Avsluta suben

Dunkla fromAddress, toAddress, betvingar, förkroppsligar

fromAddress = ”[email protected]”,
toAddress = ”[email protected]; [email protected]”,
betvinga = ”påminnelsemeddelandet”,
förkroppsliga = ”testar meddelandet - denna kunde vara HTML”,

sendmailfromAddress, toAddress, betvingar, förkroppsligar
Andra lösningar  
 
programming4us programming4us