I have examples of creating your own dialogues in OOME  (book) on my website. I 
don't remember off hand if I have examples in andrewmacro, which is also 
available there for download.

Sorry can't easily check I won't have access to my computer for another week.

I never cared for the process of creating your own dialogues, but with that, 
you can pretty much do whatever you want in terms of input. 

⁣Get BlueMail for Android ​

On Jul 24, 2022, 3:22 AM, at 3:22 AM, "Michael D. Setzer II" 
<msetze...@gmail.com> wrote:
>Have gotten this macro to do what I want, but the process requires two 
>inputbox commands. Was trying to find a way to have a single dialog
>rather 
>than two. All the searches come up with thing not even closely related
>to what I 
>am looking for. Many are linked to Calc or Base or have super complex
>step.
>Want a single form or whatever to enter the to: info and subject: info.
>Have tried dozens of search terms but not finding an example. 
>
>Sub Mailto
>Dim oDoc As Object
>Dim Path$, sendto$,subject$,cmd$
>oDoc = ThisComponent
>Path$ = oDoc.getURL()
>sendto$ = InputBox ("To:")
>subject$ = InputBox("Subject:")
>If oDoc.HasLocation() Then
>  subject$=replace(subject$," ","%20")
>  cmd$="/home/msetzerii/.wine/drive_c/PMAIL/Programs/WSENDTO.EXE " 
>&mid(Path$,8,100) &" "&" 
>mailto:"&sendto$&chr$(63)&"subject="&subject$&"&body=SENDING%20"&
>mid(Path$,8,100)
>  shell(cmd$)
>Else
>  Print "The document has not yet been stored"
>End If
>End Sub
>+------------------------------------------------------------+
> Michael D. Setzer II - Computer Science Instructor (Retired)     
> mailto:mi...@guam.net                            
> mailto:msetze...@gmail.com
> Guam - Where America's Day Begins                        
> G4L Disk Imaging Project maintainer 
> http://sourceforge.net/projects/g4l/
>+------------------------------------------------------------+
>
>
>
>
>-- 
>To unsubscribe e-mail to: users+unsubscr...@global.libreoffice.org
>Problems?
>http://www.libreoffice.org/get-help/mailing-lists/how-to-unsubscribe/
>Posting guidelines + more:
>http://wiki.documentfoundation.org/Netiquette
>List archive: http://listarchives.libreoffice.org/global/users/
>Privacy Policy: http://www.documentfoundation.org/privacy

-- 
To unsubscribe e-mail to: users+unsubscr...@global.libreoffice.org
Problems? http://www.libreoffice.org/get-help/mailing-lists/how-to-unsubscribe/
Posting guidelines + more: http://wiki.documentfoundation.org/Netiquette
List archive: http://listarchives.libreoffice.org/global/users/
Privacy Policy: http://www.documentfoundation.org/privacy

Reply via email to