// Check for valid e-mailadress (voscode)
function isEmail( url )
{
	var a,b,c,d,e,f,g,h,i,j,k,l,m,n,o;
	if (url != null && url != "")
	{
		a = url.lastIndexOf("@");
		b = url.lastIndexOf(".");
		c = url.indexOf(":");
		d = url.indexOf("/");
		e = url.substring(0,a);
		f = e.indexOf("@");
		g = url.substring(a+1,url.length);
		h = g.indexOf("[");
		i = g.indexOf("]");
		j = g.indexOf("<");
		k = g.indexOf(">");
		l = url.substring(a+1,b);
		m = url.substring(b+1,url.length);
		n = url.substring(0,a);
		p = url.indexOf(",");
		q = url.indexOf(" ");		
		r = url.indexOf("@.");		
		o = 0;
		if (a > b) {o++};
		if (c != -1) {o++};
		if (d != -1) {o++};		
		if (f != -1) {o++};
		if (h != -1) {o++};
		if (i != -1) {o++};
		if (j != -1) {o++};
		if (k != -1) {o++};
		if (m.length < 2) {o++};
		if (n.length < 1) {o++};
		if (p != -1) {o++};
		if (q != -1) {o++};		
		if (r != -1) {o++};		
		if (o == 0)
			return true;
		else
			return false;
	}
	else
	 	return false;
}

// voscode Usage: <input type=text onblur="CheckChars(this,'0123456789-+()')" onkeyup="CheckChars(this,'0123456789-+()')"  />
function CheckChars(obj,valid)
{
  var v = obj.value;
  var ret = "";
  var i=0;
  
  for ( i=0; i<v.length; i++ ) 
  {
      if (valid.indexOf(v.substring(i,i+1))>=0)
         ret=ret+v.substring(i,i+1);
  }
  obj.value=ret;  
}

function isInteger (s)
{
  var i;

  if (isEmpty(s))
  if (isInteger.arguments.length == 1) return 0;
  else return (isInteger.arguments[1] == true);

  for (i = 0; i < s.length; i++)
  {
     var c = s.charAt(i);

     if (!isDigit(c)) return false;
  }

  return true;
}

function isDigit (c)
{
  return ((c >= "0") && (c <= "9"))
}