| Server IP : 133.18.244.157 / Your IP : 216.73.217.20 Web Server : Apache System : Linux o4022v-135.kagoya.net 2.6.32-754.35.1.el6.x86_64 #1 SMP Sat Nov 7 12:42:14 UTC 2020 x86_64 User : main2 ( 81069) PHP Version : 5.6.34 Disable Function : NONE MySQL : ON | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /install/page/ |
Upload File : |
'' $System.ContentType "application/json; charset=utf-8" ' $System.ContentType ' $System.NoWarning ' $Command.CBApi.HideCopyright ' $System.Access Mail ' If ! $System.IsPostNoCSRF ' $Error = 101 <!--#include file="MWError.html"--> ' Exit ' EndIf ' Set $m = $Command.Mail.GetMail $BS $MID ' If ( ! $m ) or $m.DeleteTime ' $Error = 22223 <!--#include file="MWError.html"--> ' Exit ' EndIf ' If $Type = "Received" ' Set $m = $Command.Mail.GetReceivedMailData $BS $MID $DBID $CharSet ' Else ' Set $m = $Command.Mail.GetSentMailData $BS $MID $DBID ' EndIf ' If ! $Session.Mails ' Set $localObj = $System.CreateObject DWordMap Session ' Set $Session.Mails = $localObj ' EndIf ' If ! $Session.Mails.$BS ' Set $localObj = $System.CreateObject Object Session ' $Session.Mails.Put $BS $localObj ' EndIf ' Set $Mails = $Session.Mails.$BS ' If ! $Mails.SeenMails ' Set $localObj = $System.CreateObject Record Session ' Set $Mails.SeenMails = $localObj ' EndIf ' $Mails.SeenMails.Put $MID 1 ' $Data = $Command.RichText.Sanitize $m.HtmlData 1 $_Data '' if you want to respond as json '' Set $Obj = $System.CreateObject Object Session '' $Obj.body = $Data '' $json = $Command.String.ToJson $Obj ''$_json