diff --git a/library/server/wsf_html/webcontrol/validators/wsf_decimal_validator.e b/library/server/wsf_html/webcontrol/validators/wsf_decimal_validator.e
new file mode 100644
index 00000000..f7fd7f6d
--- /dev/null
+++ b/library/server/wsf_html/webcontrol/validators/wsf_decimal_validator.e
@@ -0,0 +1,24 @@
+note
+	description: "Summary description for {WSF_DECIMAL_VALIDATOR}."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	WSF_DECIMAL_VALIDATOR
+
+inherit
+
+	WSF_REGEXP_VALIDATOR
+
+create
+	make_decimal_validator
+
+feature {NONE}
+
+	make_decimal_validator (e: STRING)
+		do
+			make_regexp_validator ("[0-9]+(\\.[0-9]*)?|\\.[0-9]+", e)
+		end
+
+end
diff --git a/library/server/wsf_html/webcontrol/validators/wsf_email_validator.e b/library/server/wsf_html/webcontrol/validators/wsf_email_validator.e
new file mode 100644
index 00000000..a9578e12
--- /dev/null
+++ b/library/server/wsf_html/webcontrol/validators/wsf_email_validator.e
@@ -0,0 +1,24 @@
+note
+	description: "Summary description for {WSF_EMAIL_VALIDATOR}."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	WSF_EMAIL_VALIDATOR
+
+inherit
+
+	WSF_REGEXP_VALIDATOR
+
+create
+	make_email_validator
+
+feature
+
+	make_email_validator (e: STRING)
+		do
+			make_regexp_validator ("^[a-zA-Z0-9._%%+-]+@[a-zA-Z0-9.-]+\\.[a-zA-Z]{2,6}$", e)
+		end
+
+end