Advertisement
Guest User

Untitled

a guest
Jun 23rd, 2017
493
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.12 KB | None | 0 0
  1. //File:TestForm.FCL
  2. [#FCL
  3.  
  4. //Variables
  5. @name;
  6. @email;
  7. @email-conf;
  8. @username;
  9. @pass;
  10. @pass_conf;
  11.  
  12. //Presets
  13. <sqlconnect:sql/settings.FCLconfig>
  14. <FormBoxes:styles/main-style.FCLstyle>
  15.  
  16. form(
  17. table(
  18. row(
  19. col(
  20. txt("Please enter your name:");
  21. )
  22. col(
  23. txtbox("%name%", !style:preset=FormBoxes);
  24. )
  25. )
  26. row(
  27. col(
  28. txt("Please enter your e-mail:");
  29. )
  30. col(
  31. txtbox("%email%", !style:preset=FormBoxes);
  32. )
  33. )
  34. row(
  35. col(
  36. txt("Confirm your e-mail:");
  37. )
  38. col(
  39. txtbox("%email-conf%", !style:preset=FormBoxes);
  40. )
  41. )
  42. row(
  43. col(
  44. txt("Choose a username:");
  45. )
  46. col(
  47. txtbox("%username%", !style:preset=FormBoxes);
  48. )
  49. )
  50. row(
  51. col(
  52. txt("Choose a password:");
  53. )
  54. col(
  55. txtbox("%pass%", !style:preset=FormBoxes);
  56. )
  57. )
  58. row(
  59. col(
  60. txt("Re-type password:");
  61. )
  62. col(
  63. txtbox("%pass-conf%", !style:preset=FormBoxes);
  64. )
  65. )
  66. row(
  67. col()
  68. col(
  69. button(!type=submit);
  70. )
  71. )
  72. )
  73. )
  74.  
  75. //Submitting Form
  76. if:!submit:(
  77. if:(@email==@email-conf) && (@pass==@pass-conf): (
  78. create(!sql:preset=sqlconnect);
  79. ) else if(:@email=@email-conf) && (@pass==@pass-conf): (
  80. print("The email entered did not match.");
  81. return:("form");
  82. ) else if(:@email==@email-conf) && (@pass=@pass-conf): (
  83. print("The password entered did not match.");
  84. return:("form");
  85. )
  86. )
  87. #]
  88.  
  89. //////////////////////////////////////////////////////////////////////////////////////////////////
  90. //File:settings.FCLconfig
  91. [#FCL
  92.  
  93. //Variables
  94. @host:127.0.0.1;
  95. @user:root;
  96. @pass:fortress105;
  97.  
  98. //Configuration and SQL stuff
  99. mysqldbconnect("%host%, %user%, %pass%", !sql:preset=localhost\AutoTableCreatorBETA.FCLconfig);
  100.  
  101. #]
  102.  
  103. //////////////////////////////////////////////////////////////////////////////////////////////////
  104. //File:main-style.FCLstyle
  105. [#FCL
  106.  
  107. width^60px;
  108. height^16px;
  109. font^Arial;
  110. align^left;
  111. padding^2px;
  112. spacing^0px;
  113. margin^0px;
  114. background^#838383;
  115. color^#FFFFFF;
  116. border^2px #000000;
  117.  
  118. #]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement