Monkeybread Software - MBS FileMaker Plugin: CURL Download Picture

Components	All	New	MacOS		Windows		Linux		iOS
Examples	Mac & Win		Server	Client	Guides	Statistic	FMM	Blog	Deprecated	Old

MBS FileMaker Plugin Example Databases

CURL Download Picture

All examples are included with download of MBS FileMaker Plugin.

CURL Download Picture.fmp12

Overview
Tables	1
Relationships	0
Layouts	1
Scripts	3
Value Lists	0
Custom Functions	0
Custom Menus	33

File Options
Default custom menu set	[Standard FileMaker Menus]
When opening file
Minimum allowed version	12.0
Login using	Account Name; Account= Admin
Allow user to save password	On
Require iOS passcode	Off
Show Sign-in fields	Off
Switch to layout	Off
Hide all toolbars	Off
Script triggers
OnFirstWindowOpen	Off
OnLastWindowClose	Off
OnWindowOpen	Off
OnWindowClose	Off
OnFileAVPlayerChange	Off
OnWindowTransaction	Off
Thumbnail Settings
Generate Thumbnails	On; Temporary

Tables

Table Name	Statistics	Occurrences in Relationship Graph
CURL Test	6 fields defined, 1 record	CURL Test

Fields

Table Name: CURL Test - 6 Fields
Field Name	Type	Options	Comments	On Layouts	In Relationships	In Scripts	In Value Lists
Result	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		CURL Test		Download Clear Download to file
Image	Normal, Binary	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1		CURL Test		Download Clear Download to file
header	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		CURL Test		Download Clear Download to file
debug	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		CURL Test		Download Clear Download to file
info	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		CURL Test		Download Clear
response code	Normal, Number	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		CURL Test		Download Download to file

Layout Objects: CURL Test

Regular Fields

Field Name: CURL Test::Result

Layout Name:

CURL Test

Top: 21 pt
Left: 138 pt
Bottom: 41 pt
Right: 304 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: System Default
Go to next field using: Tab key

Yes

Field Name: CURL Test::Image

Layout Name:

CURL Test

Top: 45 pt
Left: 138 pt
Bottom: 173 pt
Right: 391 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: System Default
Go to next field using: Tab key

Field Name: CURL Test::header

Layout Name:

CURL Test

Top: 177 pt
Left: 138 pt
Bottom: 473 pt
Right: 547 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: System Default
Go to next field using: Tab key

Yes

Field Name: CURL Test::info

Layout Name:

CURL Test

Top: 48 pt
Left: 576 pt
Bottom: 655 pt
Right: 1060 pt

Anchoring: Left and Right, Top and Bottom

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: System Default
Go to next field using: Tab key

Yes

Field Name: CURL Test::debug

Layout Name:

CURL Test

Top: 477 pt
Left: 138 pt
Bottom: 655 pt
Right: 547 pt

Anchoring: Left, Top and Bottom

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: CURL Test::response code

Layout Name:

CURL Test

Top: 21 pt
Left: 312 pt
Bottom: 40 pt
Right: 391 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Type:

Text: Trace on

Layout Name:

CURL Test

Top: 629 pt
Left: 18 pt
Bottom: 654 pt
Right: 117 pt

Anchoring: Left, Bottom

Set Variable [ $r; Value:MBS("Trace") ]

Button Properties

Coordinates

Script/Script Step

Type:

Text: Download Image

Layout Name:

CURL Test

Top: 24 pt
Left: 402 pt
Bottom: 48 pt
Right: 568 pt

Anchoring: Left, Top

Perform Script [ “Download” ]

Scripts:

Download

Button Properties

Coordinates

Script/Script Step

Type:

Text: Download PDF

Layout Name:

CURL Test

Top: 57 pt
Left: 402 pt
Bottom: 81 pt
Right: 568 pt

Anchoring: Left, Top

Perform Script [ “Download”; Parameter: "PDF" ]

Scripts:

Download

Button Properties

Coordinates

Script/Script Step

Type:

Text: Download to File

Layout Name:

CURL Test

Additional Properties:

Change to hand cursor over button

Top: 90 pt
Left: 402 pt
Bottom: 114 pt
Right: 568 pt

Anchoring: Left, Top

Perform Script [ “Download to file” ]

Scripts:

Download to file

Script Name	Download
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	CURL Test
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $curl; Value:MBS("CURL.New") ] If [ Get(ScriptParameter) = "PDF" ] Set Variable [ $result; Value:MBS("CURL.SetOptionURL"; $curl; "https://www.monkeybreadsoftware.com/filemaker/files/Installation.pdf") ] Else Set Variable [ $result; Value:MBS("CURL.SetOptionURL"; $curl; "https://www.monkeybreadsoftware.de/images/mbss.jpg") ] End If #we like to get the time of the file Set Variable [ $result; Value:MBS("CURL.SetOptionFileTime"; $curl; 1) ] #if this URL gets a redirect, we allow following to new location Set Variable [ $result; Value:MBS("CURL.SetOptionFollowLocation"; $curl; 1) ] #run transfer Set Field [ CURL Test::Result; MBS("CURL.Perform"; $curl) ] #check result Set Variable [ $result; Value:MBS("CURL.GetResponseCode"; $curl) // should be 200 for okay ] Set Field [ CURL Test::response code; $result ] Set Field [ CURL Test::Image; MBS("CURL.GetResultAsContainer"; $curl) ] Set Field [ CURL Test::header; MBS("CURL.GetHeaders"; $curl) ] Set Field [ CURL Test::debug; MBS("CURL.GetDebugMessages"; $curl) ] #query information Set Variable [ $info; Value:"" ] Set Variable [ $info; Value:$info & "GetFileTime: " & MBS("CURL.GetFileTime"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetFTPEntryPath: " & MBS("CURL.GetFTPEntryPath"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetCookieList: " & MBS("CURL.GetCookieList"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetLocalPort: " & MBS("CURL.GetLocalPort"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetLocalIP: " & MBS("CURL.GetLocalIP"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetPrimaryPort: " & MBS("CURL.GetPrimaryPort"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetPrimaryIP: " & MBS("CURL.GetPrimaryIP"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetNumConnects: " & MBS("CURL.GetNumConnects"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetOSErrNo: " & MBS("CURL.GetOSErrNo"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetProxyAuthAvail: " & MBS("CURL.GetProxyAuthAvail"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetHTTPAuthAvail: " & MBS("CURL.GetHTTPAuthAvail"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetContentType: " & MBS("CURL.GetContentType"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetContentLengthUpload: " & MBS("CURL.GetContentLengthUpload"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetContentLengthDownload: " & MBS("CURL.GetContentLengthDownload"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetSSLEngines: " & Substitute ( MBS("CURL.GetSSLEngines"; $curl) ; "¶" ; ", " ) & "¶" ] Set Variable [ $info; Value:$info & "GetSSLVerifyResult: " & MBS("CURL.GetSSLVerifyResult"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetRequestSize: " & MBS("CURL.GetRequestSize"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetHeaderSize: " & MBS("CURL.GetHeaderSize"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetSpeedUpload: " & MBS("CURL.GetSpeedUpload"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetSpeedDownload: " & MBS("CURL.GetSpeedDownload"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetSizeDownload: " & MBS("CURL.GetSizeDownload"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetSizeUpload: " & MBS("CURL.GetSizeUpload"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetRedirectURL: " & MBS("CURL.GetRedirectURL"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetRedirectCount: " & MBS("CURL.GetRedirectCount"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetRedirectTime: " & MBS("CURL.GetRedirectTime"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetStartTransferTime: " & MBS("CURL.GetStartTransferTime"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetPreTransferTime: " & MBS("CURL.GetPreTransferTime"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetAppConnectTime: " & MBS("CURL.GetAppConnectTime"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetConnectTime: " & MBS("CURL.GetConnectTime"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetNameLookupTime: " & MBS("CURL.GetNameLookupTime"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetTotalTime: " & MBS("CURL.GetTotalTime"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetResponseCode: " & MBS("CURL.GetResponseCode"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetHTTPConnectCode: " & MBS("CURL.GetHTTPConnectCode"; $curl) & "¶" ] Set Variable [ $info; Value:$info & "GetEffectiveURL: " & MBS("CURL.GetEffectiveURL"; $curl) & "¶" ] Set Field [ CURL Test::info; $info ] Set Variable [ $result; Value:MBS("CURL.Release"; $curl) ]
Fields used in this script	CURL Test::Result CURL Test::response code CURL Test::Image CURL Test::header CURL Test::debug CURL Test::info
Scripts used in this script
Layouts used in this script
Tables used in this script	CURL Test
Table occurrences used by this script	CURL Test
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Download]

Next Script: [Download to file]

Script Name	Clear
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script
Scripts that use this script
Script Definition
Script Steps	Set Field [ CURL Test::Result; "" ] Set Field [ CURL Test::Image; "" ] Set Field [ CURL Test::header; "" ] Set Field [ CURL Test::debug; "" ] Set Field [ CURL Test::info; "" ]
Fields used in this script	CURL Test::Result CURL Test::Image CURL Test::header CURL Test::debug CURL Test::info
Scripts used in this script
Layouts used in this script
Tables used in this script	CURL Test
Table occurrences used by this script	CURL Test
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Clear]

Script Name	Download to file
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	CURL Test
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $curl; Value:MBS("CURL.New") ] #we download from this URL Set Variable [ $result; Value:MBS("CURL.SetOptionURL"; $curl; "https://www.monkeybreadsoftware.de/images/mbs.jpg") ] #we create a file on your desktop Set Variable [ $path; Value:MBS( "Path.AddPathComponent"; MBS( "Folders.UserDesktop" ); "test.jpg" ) ] Set Variable [ $r; Value:MBS("CURL.CreateOutputFile"; $curl; $path) ] #run it Set Field [ CURL Test::Result; MBS("CURL.Perform"; $curl) ] #check result Set Variable [ $result; Value:MBS("CURL.GetResponseCode"; $curl) // should be 200 for okay ] Set Field [ CURL Test::response code; $result ] Set Field [ CURL Test::Image; MBS("CURL.GetResultAsContainer"; $curl) ] Set Field [ CURL Test::header; MBS("CURL.GetHeaders"; $curl) ] Set Field [ CURL Test::debug; MBS("CURL.GetDebugMessages"; $curl) ] Set Variable [ $result; Value:MBS("CURL.Release"; $curl) ]
Fields used in this script	CURL Test::Result CURL Test::response code CURL Test::Image CURL Test::header CURL Test::debug
Scripts used in this script
Layouts used in this script
Tables used in this script	CURL Test
Table occurrences used by this script	CURL Test
Custom Functions used by this script
Custom menu set used by this script

Download example: CURL Download Picture

Used functions: