Zobrazit plnou verzi příspěvku: Sdílení modelu iLogicem a Outlookem
PopelkaM
10.10.2023, 10:56
Dobrý den,lze do kódu níže dokončit operaci sdílení modelu a vygenerovaný link poslat určité osobě např. Outlookem?Snaha je zjednodušit a urychlit sdílení modelu.Děkuji za radu....S pozdravem Popelka------------------------------------------------------------------------------------------Imports System.Windows.FormsSub Main() Dim oCommandMgr As CommandManager oCommandMgr = ThisApplication.CommandManager Dim oControlDef As ControlDefinition oControlDef = oCommandMgr.ControlDefinitions.Item("cmdCreateViewShare") 'Generate shared view oControlDef.Execute2(False) SendKeys.SendWait("{TAB 4}{ENTER}") End Sub
Vladimír Michl
10.10.2023, 12:57
Poslat mail z iLogicu je celkem jednoduché (viz níže), ale ViewShare je samostatný modul (ne core aplikace), takže tam bude řízení iLogicem asi problém.oOlApp = CreateObject("Outlook.Application")
oOlMail = oOlApp.CreateItem(0)
strbody = "<p style='font-family:calibri;font-size:16'>" & "Dobrý den," & "<br><br>" & vbNewLine & vbNewLine & _
"píši ohledně součásti " + iProperties.Value("Project", "Part Number") & "</p>" & vbNewLine
With oOlMail
.bodyformat=2
.To = "vladimir.michl@arkance-systems.com"
.CC = ""
.BCC = ""
.Subject = "iLogic mail"
.HTMLbody = strbody
'.Attachments.Add (FilePath & "\" & File & ".jpg")
'.Display
.Send
End With
PopelkaM
11.10.2023, 10:04
Dobrý den,to je škoda, že to nejde...Byla by to docela dobrá funkce.Technologové by se podívali na model bez jakéhokoliv prohlížeče.Ten kdo by sdílel model by to měl pro vytvoření snadnější...Popelka