In my application if the application is not supported on the device, I am wanting to do the following
Code: Select all
put "Missing Platform Case Statement" into tMsgHeader
put "Platform is " & the platform & cr into tMsgBody
put "System Version is " & the systemversion & cr after tMsgBody
put " " & cr after tMsgBody
put "$HOMEDRIVE is " & $HOMEDRIVE & cr after tMsgBody
put "$COMPUTERNAME is " & $COMPUTERNAME & cr after tMsgBody
put "$HOME is " & $HOME & cr after tMsgBody
put "$OS is " & $OS & cr after tMsgBody
put " " & cr after tMsgBody
put "This version of this application does not run on your device at this time. If you contact us with the above information, we will add this device to our list of supported devices. " after tMsgBody
put " We will then contact you to see if you would be willing to test the software on this device. We would like for you to send us a message " after tMsgBody
put " with the information in this window so that we can update our software for your platform. " & cr after tMsgBody
put true into tBtn1Visible
put 1 into tNumButtons
put "Quit_Button" into tBtn1Name
AlertMessageDialog(tMsgHeader, tMsgBody, tNumButtons, tBtn1Name, tBtn1Visible)
Code: Select all
on AlertMessageDialog HeaderText,MessageText,NumberButtons,Button1Name,Button1Visible
put "" into fld "Header Field" on card "Alerts" of stack "TruckersWallet"
put "" into fld "Alert Message" on card "Alerts" of stack "TruckersWallet"
put HeaderText into fld "Header Field" on card "Alerts" of stack "TruckersWallet"
-- put MessageText into fld "Alert Message" on card "Alerts" of stack "TruckersWallet"
// if NumberButtons = 1 then
// set the visible of btn Button1Name on card "Alerts" of stack "TruckersWallet" to Button1Visible
// end if
go card "Alerts" of stack "TruckersWallet"
end AlertMessageDialog
Missing Platform Case Statement,Platform is Win32
System Version is NT 6.1
$HOMEDRIVE is C:
$COMPUTERNAME is GPEARSON-LAPPC
$HOME is
$OS is Windows_NT
This version of this application does not run on your device at this time. If you contact us with the above information, we will add this device to our list of supported devices. We will then contact you to see if you would be willing to test the software on this device. We would like for you to send us a message with the information in this window so that we can update our software for your platform.
,1,Quit_Button,true
Is this the desired operation? Anyway to get each of the information between the ,'s to be in their own variable without using the split command.