4D-JUG
Would you like to react to this message? Create an account in a few clicks or log in to continue.

OPEN WEB URLでメールを送る

3 posters

Go down

OPEN WEB URLでメールを送る Empty OPEN WEB URLでメールを送る

投稿 by TAKMAC 2021-09-23, 5:45 am

久しぶりの投稿です。いまだにV13を使っています。

OPEN WEB URL("mailto:"+メールアドレス+"?subject=依頼書)

とすると、メーラーが起動されて件名に「依頼書」と入ったメールウインドウが開きます

OPEN WEB URL("mailto:"+メールアドレス+"?body=お願いします")

とすると、本文に「お願いします」と入った状態でメールウインドウが開きます

では、件名と本文を両方同時に入れて開かせるのはどうすればいいのでしょうか。

TAKMAC

投稿数 : 8
登録日 : 2016/07/16

トップに戻る Go down

OPEN WEB URLでメールを送る Empty Re: OPEN WEB URLでメールを送る

投稿 by miyako 2021-09-24, 5:21 pm

こんにちは

OPEN WEB URL("mailto:"+メールアドレス+"?subject=依頼書&body=お願いします)

となります。

miyako

投稿数 : 483
登録日 : 2016/07/05

トップに戻る Go down

OPEN WEB URLでメールを送る Empty Re: OPEN WEB URLでメールを送る

投稿 by mitsu 2022-08-12, 3:14 pm

本文に"&"があるとそれ以降の文章が切り取られますが、そういうものでしょうか?

OPEN URL("mailto:"+"メールアドレス"+"?subject=依頼書&body=お願い&します")

メールの本文は"お願い"だけ
本文で"&"を使う方法はないでしょうか?

mitsu

投稿数 : 15
登録日 : 2021/07/21

トップに戻る Go down

OPEN WEB URLでメールを送る Empty Re: OPEN WEB URLでメールを送る

投稿 by miyako 2022-08-12, 3:30 pm

パーセントエンコードをしてみるのはいかがでしょうか

OPEN URL("mailto:keisuke.miyako@4d.com?subject=%E4%BE%9D%E9%A0%BC%E6%9B%B8&body=%E3%81%8A%E9%A1%98%E3%81%84%26%E3%81%97%E3%81%BE%E3%81%99"; *)

miyako

投稿数 : 483
登録日 : 2016/07/05

トップに戻る Go down

OPEN WEB URLでメールを送る Empty Re: OPEN WEB URLでメールを送る

投稿 by miyako 2022-08-12, 3:31 pm

Code:
C_TEXT:C284($1;$0;$escaped)

C_LONGINT:C283($i)
C_BOOLEAN:C305($shouldEscape)
C_BLOB:C604($data)

For ($i;1;Length:C16($1))
   
   $char:=Substring:C12($1;$i;1)
   $code:=Character code:C91($char)
   
   $shouldEscape:=False:C215
   
   Case of
      : ($code=45)
      : ($code=46)
      : ($code>47) & ($code<58)
      : ($code>63) & ($code<91)
      : ($code=95)
      : ($code>96) & ($code<123)
      : ($code=126)
      Else
         $shouldEscape:=True:C214
   End case
   
   If ($shouldEscape)
      CONVERT FROM TEXT:C1011($char;"utf-8";$data)
      For ($j;0;BLOB size:C605($data)-1)
         $hex:=String:C10($data{$j};"&x")
         $escaped:=$escaped+"%"+Substring:C12($hex;Length:C16($hex)-1)
      End for
   Else
      $escaped:=$escaped+$char
   End if
   
End for

$0:=$escaped

miyako

投稿数 : 483
登録日 : 2016/07/05

トップに戻る Go down

OPEN WEB URLでメールを送る Empty Re: OPEN WEB URLでメールを送る

投稿 by mitsu 2022-08-12, 5:01 pm

出来ました。 OPEN WEB URLでメールを送る 1f600
いつもありがとうございます。

mitsu

投稿数 : 15
登録日 : 2021/07/21

トップに戻る Go down

OPEN WEB URLでメールを送る Empty Re: OPEN WEB URLでメールを送る

投稿 by Sponsored content


Sponsored content


トップに戻る Go down

トップに戻る

- Similar topics

 
Permissions in this forum:
返信投稿: 不可