| 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.Access Customer ' $Command.Customer.AccessFile ' $Command.System.OnExport "顧客データ" $WID ' If $CT ' If $Env.IsMSIE ' $System.ContentType application/csv ' Else ' $System.ContentType application/octet-stream ' EndIf ' $System.CSV = 1 ' Set $PersonalCustomer = $Command.Personal.GetCustomerObject $WID ' Set $Export = $PersonalCustomer.ExportPerson '' <!---------------------項目名の出力-----------------------------> ' If $Export.ItemName ' Set $PersonItems = $Customer.Person.Items ' Set $CompanyItems = $Customer.Company.Items ' $First = 1 ' For Each $ExportItem in $Export.Items ' $Item = $ExportItem.Item ' If $First ' $First = 0 ' Else ,\\ ' EndIf ' If $Item = "CGID" "顧客グループ"\\ ' Elif $Item = "PersonCode" "顧客コード"\\ ' Elif $Item = "PersonName" "名前"\\ ' Elif $Item = "PersonYomi" "よみ"\\ ' Elif $Item = "Section" "部課"\\ ' Elif $Item = "PersonTel" "電話番号"\\ ' Elif $Item = "PersonMail" "メールアドレス"\\ ' Elif $Item = "PersonUser" "担当"\\ ' Elif $Item = "Post" "配信停止"\\ ' Elif $Item = "PersonFileName" "添付ファイル名"\\ ' Elif $Item = "CompanyCGID" "会社グループ"\\ ' Elif $Item = "CompanyCode" "会社コード"\\ ' Elif $Item = "CompanyName" "会社名"\\ ' Elif $Item = "CompanyYomi" "会社よみ"\\ ' Elif $Item = "CompanyTel" "電話番号(会社)"\\ ' Elif $Item = "CompanyUser" "担当(会社)"\\ ' Elif $Item = "CompanyFileName" "添付ファイル名(会社)"\\ ' Elif $Item = "Person" ' $IID = $ExportItem.IID "$PersonItems.$IID.Name"\\ ' Elif $Item = "Company" ' $IID = $ExportItem.IID "$CompanyItems.$IID.Name"\\ ' EndIf ' Next ' EndIf '' <!---------------------顧客データの出力-----------------------------> ' $Command.Customer.ExportPerson $WID $ST ' EndIf