Monkeybread Software - MBS FileMaker Plugin: TCP Sender

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

MBS FileMaker Plugin Example Databases

TCP Sender

All examples are included with download of MBS FileMaker Plugin.

TCP Sender.fmp12

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

File Options
Default custom menu set	[Standard FileMaker Menus]
Default theme	Minimalistisch
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	Comments	Occurrences in Relationship Graph
TCP Sender	5 fields defined, 1 record		TCP Sender

Fields

Table Name: TCP Sender - 5 Fields
Field Name	Type	Options	Comments	On Layouts	In Relationships	In Scripts	In Value Lists
TargetIP	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		TCP Sender		Send
Port	Normal, Number	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		TCP Sender		Send
Message	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		TCP Sender		Send
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		TCP Sender		Send
Options	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		TCP Sender		Send

Layout Objects: TCP Sender

Regular Fields

Field Name: TCP Sender::TargetIP

Layout Name:

TCP Sender

Top: 26 pt
Left: 131 pt
Bottom: 45 pt
Right: 384 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

Yes

Field Name: TCP Sender::Port

Layout Name:

TCP Sender

Top: 49 pt
Left: 131 pt
Bottom: 68 pt
Right: 210 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

Yes

Field Name: TCP Sender::Message

Layout Name:

TCP Sender

Top: 72 pt
Left: 131 pt
Bottom: 91 pt
Right: 384 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

Yes

Field Name: TCP Sender::Result

Layout Name:

TCP Sender

Top: 95 pt
Left: 131 pt
Bottom: 114 pt
Right: 384 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

Yes

Field Name: TCP Sender::Options

Layout Name:

TCP Sender

Top: 225 pt
Left: 138 pt
Bottom: 244 pt
Right: 391 pt

Anchoring: Left, Top

Field Format:

Checkbox Set
Display values from: Keep Open

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: Send Message

Layout Name:

TCP Sender

Top: 25 pt
Left: 390 pt
Bottom: 49 pt
Right: 520 pt

Anchoring: Left, Top

Perform Script [ “Send” ]

Scripts:

Send

Button Properties

Coordinates

Script/Script Step

Type:

Text: Close Socket

Layout Name:

TCP Sender

Top: 138 pt
Left: 390 pt
Bottom: 162 pt
Right: 520 pt

Anchoring: Left, Top

Perform Script [ “Close Socket” ]

Scripts:

Close Socket

Value Lists

Value List Name	Source	Values	On Layouts
Keep Open	Custom	Keep Open	TCP Sender

Next Script: [DataAvailable]

Script Name	Send
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	TCP Sender
Scripts that use this script
Script Definition
Script Steps	If [ IsEmpty($$sock) ] Set Variable [ $$sock; Value:MBS("Socket.Connect"; TCP Sender::TargetIP; TCP Sender::Port) ] If [ MBS("IsError") ] Set Field [ TCP Sender::Result; "Failed to create socket: " & $$sock ] Set Variable [ $$sock; Value:"" ] Exit Script [ ] End If Set Variable [ $r; Value:MBS("Socket.SetDataAvailableHandler"; $$sock; Get(FileName); "DataAvailable") ] Set Variable [ $r; Value:MBS("Socket.SetErrorHandler"; $$sock; Get(FileName); "SocketError") ] End If Set Variable [ $r; Value:MBS("Socket.Write"; $$sock; TCP Sender::Message; "UTF-8") ] If [ GetAsNumber($r) = 0 ] Set Field [ TCP Sender::Result; "Failed to Send: "&$r ] Else [ ] Set Field [ TCP Sender::Result; "Sent "&$r&" Bytes." ] End If If [ Length ( TCP Sender::Options ) > 0 ] #keep open Else [ ] #close Set Variable [ $r; Value:MBS("Socket.Close"; $$Sock) ] Set Variable [ $$Sock; Value:"" ] End If
Fields used in this script	TCP Sender::TargetIP TCP Sender::Port TCP Sender::Result TCP Sender::Message TCP Sender::Options
Scripts used in this script
Layouts used in this script
Tables used in this script	TCP Sender
Table occurrences used by this script	TCP Sender
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Send]

Next Script: [Close Socket]

Script Name	DataAvailable
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	No
Layouts that use this script
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $sock; Value:Get(ScriptParameter) ] Set Variable [ $r; Value:MBS("Socket.Read"; $sock; 1500; "UTF-8") ] Show Custom Dialog [ Title: "Data Received"; Message: $r; Default Button: “OK”, Commit: “Yes”; Button 2: “Cancel”, Commit: “No” ]
Fields used in this script
Scripts used in this script
Layouts used in this script
Tables used in this script
Table occurrences used by this script
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [DataAvailable]

Next Script: [SocketError]

Script Name	Close Socket
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	Yes
Layouts that use this script	TCP Sender
Scripts that use this script
Script Definition
Script Steps	If [ not IsEmpty($$sock) ] Set Variable [ $r; Value:MBS("Socket.Close"; $$Sock) ] Set Variable [ $$Sock; Value:"" ] End If
Fields used in this script
Scripts used in this script
Layouts used in this script
Tables used in this script
Table occurrences used by this script
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Close Socket]

Script Name	SocketError
Run script with full access privileges	Off
Siri Shortcut Visible	Off
Include In Menu	No
Layouts that use this script
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $sock; Value:Get(ScriptParameter) ] Show Custom Dialog [ Title: "Socket Error"; Message: "For Socket " & $sock; Default Button: “OK”, Commit: “No”; Button 2: “Cancel”, Commit: “No” ] Set Variable [ $r; Value:MBS("Socket.Close"; $sock) ] Set Variable [ $$sock; Value:"" ]
Fields used in this script
Scripts used in this script
Layouts used in this script
Tables used in this script
Table occurrences used by this script
Custom Functions used by this script
Custom menu set used by this script

Download example: TCP Sender

Used functions: