<perl> if(%_put) { $_put{Fieldname}=substr($_put{Fieldname},0,123); } </perl>

To limit the possible number of chars in the field "Fieldname" to 123.

2. Really "locking" would only be possible with some javascript code which isn't a real 100% waterproof solution, because the user doesnt necessarily use javascript.

What you can do is compare the entry which should be added with the last entry. Looks like this:

<perl> if(%_put) {

get "Id==#";
if($_put{Fieldname1} eq $Fieldname1 && $_put{Fieldname2} eq $Fieldname2)
  {
    out "Your entry is already in the database... Pls do not send it again...";
    $_get{cmd}="";
  }

} </perl>

You should insert this before your <do action=all> on the page...


3. You can check the new entry before it is added to the database with the following code:

<perl> if(%_put} {

if($_put{Fieldname1} eq "") { out "Fieldname1 is empty. Pls insert something!<br>"; $_get{cmd}=""; }
if($_put{Fieldname2} eq "") { out "Fieldname2 is empty. Pls insert something!<br>"; $_get{cmd}=""; }

} </perl>

ok? ;-)

if(%_put) { get "Id==#"; if($_put{firstname} eq $firstname && $_put{lastname} eq $lastname)

{
    out "Your entry is already in the database... Pls do not send it again...";
    $_get{cmd}="";
  }

} </perl>

<do action=input> <form action="/baseportal/alexis/Directory/Template" method="post" enctype="multipart/form-data"> <input type="hidden"name="cmd="value="add"> <input type="hidden"name="htx=" value="/alexis/Directory/Template">

Please enter your first name: <input type="text" name="firstname:="><p>
Please enter your last name: <input type="text" name="lastname:="><p>

<input type="submit" value="send"> </form> <center>