function rinput(rthislen,rfield,rfield2)
{
	var NewValue=rfield.value;
	var vlen=NewValue.length;
	for (var i=0;i<vlen;i++)
		{
			var ch = NewValue.charCodeAt(i);
			if (ch>127) vlen=vlen+1;
		}
	if(vlen>thislen)
		{	var newlen=vlen;
			rfield.size=newlen;
			rfield2.value=newlen;
		}
	else
		{
			rfield.size=rthislen;
			rfield2.value=rthislen;	
		}

}

function rtextarea(thisrows,thiscols,field,field2)
{
	var value=field.value;
	var v=value.length;
	var vv=thisrows*thiscols;
	for (var i=0;i<v;i++)
		{
			var ch = value.charCodeAt(i);
			if (ch>127) v=v+1;
		}
	for (var i=0;i<v;i++)
		{
			if (value.charAt(i)=="\r")  v=v+thiscols;
		}

	if(v>vv)
		{	var newrows=v/thiscols+1.4;
			field.rows=newrows;
			field2.value=newrows;
		}
	else
		{
			field.rows=thisrows;
			field2.value=thisrows;	
		}
}

function rtextarea2(thisrows,thiscols,field,field2)
{
	var value=field.value;
	var v=value.length;
	var vv=thisrows*thiscols;
	for (var i=0;i<v;i++)
		{
			var ch = value.charCodeAt(i);
			if (ch>127) v=v+1;
		}
	for (var i=0;i<v;i++)
		{
			if (value.charAt(i)=="\r")  v=v+thiscols;
		}

	if(v>vv)
		{	var newrows=v/thiscols+2;
			field.rows=newrows;
			field2.value=newrows;
		}
	else
		{
			field.rows=thisrows;
			field2.value=thisrows;	
		}
}




function checkmail(thisform)
{if (thisform.value!="")
	{
		if (thisform.value.indexOf("@") == -1 ||thisform.value.indexOf(".") == -1)
		{
			alert("please input a useable E-MAIL!");
			thisform.focus();
			thisform.select();
			return false;  
		}
	}
}