Jeg sidder og arbejder i VB 6.0 og jeg har lavet en kontrol program nu skal jeg så sikre mig at hvis 2 af mine værdier bliver for lav skal programmet sende mig en SMS med tekst og en email...Hvad er koden til at få dette til at fungere?
AI bliver først for alvor en del af arbejdet, når teknologien integreres i den måde, vi arbejder på. At have adgang til AI betyder ikke nødvendigvis, at medarbejderne er klar til at bruge den.
Public Function SendEnMail(TilAdresse As String, Emne As String, Tekst As String, Optional VedhæftetFil As String) Dim outlook, mail Set outlook = CreateObject("Outlook.Application") MAPI = outlook.GetNameSpace("MAPI") Set mail = outlook.CreateItem(0) mail.Recipients.Add (TilAdresse) mail.Subject = Emne mail.Body = Tekst If VedhæftetFil <> "" Then mail.Attachments.Add (VedhæftetFil) mail.send End Function
Kører du Office2000 med Servicepack 2 skal du dog svare ja til at sende mail på en anden brugers vejne, og derfor kan du ikke bruge det i dit tilfælde. Ellers skulle det virke...
Grundet omkostninger opstået efter indførelsen af interconnect på SMS området er muligheden for at konvertere e-mail til SMS på TDC Mobils Internet Gateway (via adressen [mobilnummer]@sms.tdm.dk) ophørt pr. 1. maj 2002 Det vil fortsat være muligt for kunder i TDC Mobil’s net at konvertere SMS’er til e-mail ved at sende SMSen til modtager 200.
ÆV! - Mikker
Synes godt om
Ny brugerNybegynder
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.
Ny bruger
Nybegynder
Opret
Preview
