automatisch maitje versturen

[anoniem]

Mijn virusscanner gaat elke dag kijken of er nieuwe up-dates aanwezig zijn. Als er een nieuwe up-date is wordt hij geinstalleerd. Nu wilik graag een programmaatje maken dat een mailtje stuurt als het programma opgestart wordt. Ik heb niet veel verstand van programmeren dus ik hoop op een duidelijke uitleg. Alvast bedankt

[anoniem]

Je zal toch iets van programmeren moet af weten, of wil je soms dat wij dat programma gaan maken :-? . Heb je ervaring met een of andere programmeertaal?

[anoniem]

De enige programmeertaal waar ik iets mee kan is C++. En het was ook nooit de bedoeling dat iemand anders het prog voor mij zou gaan schrijven. Ik ben alleen op zoek naar de goede weg. Als ik daar een nieuwe progtaal voor moet leren dan ben ik daaar ook toe bereid.

[anoniem]

Ik weet niet welke virusscanner je hebt, maar als je SAV hebt Enterprise of Corporate edition hebt, die heeft de AMS-server welke je kan configureren om bij bepaalde events een alert te verzenden.

[anoniem]

Helaas, ik werk hier met NetSchield van Mcafee. Na een tijdje zoeken heb ik wel iets gevonden over Mcafee Autoupdate Architect. Weet iemand daar iets meer van?

[anoniem]

Je kan misschien eens nagaan waar de scanner de update opslaat, en of de naam (van de update) altijd met eenzelfde stukje begint/eindigt. Dan zou je eventueel een programmaatje kunnen maken dat geactiveerd wordt bij het opstarten of afsluiten en dan controleerd of dat bestand aanwezig is, maar meer weet ik er ook niet van. suc6. Wim.

[anoniem]

Pas op, onderstaande listing brengt wijzigingen aan in het windows register Kopieer onderstaande tekst en plak deze in kladblok en sla het vervolgens op als C:\update.txt Voeg in het Startmenu, sectie Opstarten toe: [b:220b8f09aa]kix32 c:\update.txt[/b:220b8f09aa] Download kix bijv. bij [url]http://kixtart.org/bin/distrib/KiX2001_421.zip [/url]en sla de uitgepakte bestanden op in Windows map. Onderstaande listing werkt bij Windows 98/McAfee Virusscan versie 4.51. Werk je met Exchange/Outlook dan wordt er een mailtje verstuurd, anders krijg je alleen een melding op het scherm. [quote:220b8f09aa]break on $subkey="HKEY_LOCAL_MACHINE\Software\Network Associates\TVD\Shared Components\VirusScan Engine\4.0.xx" $type=ReadType( $subkey, "szDatVersion") $nieuw = ReadValue ($subkey,"szDatVersion") $vorige= ReadValue ($subkey, "Vorige") IF $nieuw<>$vorige ; stuur een mail, werkt alleen onder als je met windows exchange server werkt $return=WRITEVALUE ($subkey, "Vorige", $nieuw, $type) $Root = CreateObject("Outlook.Application") $MailItem = $Root.CreateItem(0) $MailItem.Importance = 1 ; - 2 high importance ; - 1 normal importance ; - 0 low importance $MailItem.Subject = "Nieuwe antivirus data" $MailItem.To = "naam@@hetnet.nl" ; let op de dubbele @@ in het emailadres $MailItem.Body = "Er zijn nieuwe antivirusbestanden versie "+$vorige+" is vervangen door "+$nieuw +Chr(13)+"Alweer ..." IF EXIST("C:\errorlog.txt") $MailItem.Attachments.Add("C:\errorlog.txt") ENDIF $MailItem.Send ; melding op het scherm, werkt altijd $Selection = MessageBox("Er zijn nieuwe antivirusbestanden versie "+$vorige+" is vervangen door "+$nieuw +Chr(13)+"Alweer ...", "Nieuwe antivirus bestanden", 48) ENDIF $Root = 0[/quote:220b8f09aa] Succes.