初心者のFileMaker pro Q&A (旧掲示板)

みんなに優しく、解りやすくをモットーに開設しています。 以下のルールを守りみんなで助け合いましょう。

1.ファイルメーカーで解らない事があればここで質問して下さい。 何方でも、ご質問・ご回答お願いします。 (優しく回答しましょう)

You are not logged in.

Announcement

新しい掲示板は、こちら:https://fm-aid.com/forum/t/filemaker


#1 2019-09-07 16:36:05

教えてください
Guest

windowsでPDFサムネイル表示できずこの方法が実現したいです

環境は以下で行っております。
Windows10
FileMaker Pro Advanced  17

Appの使用環境はこちらを想定しています。
・Win PC まれに FileMaker Go

困っている事は
・Win PCではオブジェクトフィールドに入れたPDFデータがサムネイル形式で表示できず断念
  (「Adobe Acrobat または Adobe Readerに問題があります。 Adobe Acrobat または
    Adobe Reader を終了してから、もう一度やり直してください。13:13」と表示され
    解決策を試行錯誤するも断念。
     参考A>http://bookend.keyring.net/support/faq/error/post-6/  他,,

  →閲覧するにはファイルのエクスポートをする必要があり、毎回保存場所を指定し、「.pdf」の拡張子を入れなければいけない
 
➡ならば、App上でPDFの閲覧ができるボタンを作れればいいと考え以下を参考にスクリプトを作成しましたがうまくできませんでした。
     参考B>https://fm-aid.com/bbs2/viewtopic.php?id=4834
     参考C>http://blog.usagi-mimi.com/?eid=879692

  この機能を何とか実装したいのですがご意見いただけると幸いです。よろしくお願いします。
●スクリプト部分 ------------------

If [ Get(デバイス) = 0 ]
    カスタムダイアログを表示 ["現在のスクリプト終了";
    "現在のスクリプト終了" ]
Else If [ Get(デバイス) ≤ 2 ]
    変数を設定「$File」
    フィールド内容のエクスポート [ 名称未設定::pdf;「$File」;
    自動的に開く;ディレクトリの作成:オフ]
End If

●変数の項目で設定した計算式は以下の通りです ----

Let ([
Text = GetAsText ( 名称未設定::pdf ) ;
Value =  (GetValue ( Text ; 1 )
FileName = Substitute ( Value ; "remote:";"")
];
Get ( テンポラリパス ) & FileName
)

#2 2019-09-07 17:04:25

himaganee
Guest

Re: windowsでPDFサムネイル表示できずこの方法が実現したいです

保存先は
Get ( テンポラリパス ) & Get(UUID) & "/" & GetContainerattribute ( field ; "filename" )

UUIDを使うと同じ名前で何度でも保存できます。

#3 2019-09-08 09:46:15

教えてください
Guest

Re: windowsでPDFサムネイル表示できずこの方法が実現したいです

himaganeeさんお返事いただいてありがとうございます。

>Get ( テンポラリパス ) & Get(UUID) & "/" & GetContainerattribute ( field ; "filename" )
>UUIDを使うと同じ名前で何度でも保存できます。

と教えていただき、以下のように改変したものがこちらです。
ーーーーーーーーーーーーーーーーーーーーーーーーーーーー
Let ([
Text = GetAsText ( T_事例::書類 1 ) ;
Value =  (GetValue ( Text ; 1 )
FileName = Substitute ( Value ; "remote:";"")
];
Get ( テンポラリパス ) & Get(UUID) & "/" & GetContainerattribute ( field ; "FileName"
)
ーーーーーーーーーーーーーーーーーーーーーーーーーーーー

※2行目の  < Text = GetAsText ( 名称未設定::pdf ) ; > 部分は引用先を変更し
      < Text = GetAsText ( T_事例::書類 1 ) ; > に変えています

しかし「指定されたテーブルが見つかりません」と表示され、うまくいきませんでした。

前回の状態でも指定されたテーブルが見つからない問題は指摘があり、
4行目のFileName の部分に網掛け状態で強調表示がされている状況が出ています。

どこを直せば改善するのかわからない状態です。
ご意見いただけると幸いです。

#4 2019-09-10 11:33:32

himaganee
Guest

Re: windowsでPDFサムネイル表示できずこの方法が実現したいです

GetContainerattribute 関数がファイル名を取得するので、Letの他の部分は不要です。(1行の計算式)
fieldのところはフィールド名なので、フィールド一覧から選択してください。計算式は、テーブル名::フィールド名の形式でないとエラーになる場合があります。

Registered users online in this topic: 0, guests: 1
[Bot] claudebot

Board footer

Powered by FluxBB
Modified by Visman

[ Generated in 0.005 seconds, 9 queries executed - Memory usage: 508.86 KiB (Peak: 515.67 KiB) ]