Validering i formar

Testform:

---

Namn:
Adress:

Vi kan oftast inte godkänna vad som helt i en form. En vanlig kontroll är att vissa fält inte får lämnas tomma. Det finns några olika sätt att utföra denna validering ( = kontroll av inmatat datas giltighet)

Om man vet att klientens browser stöder JavaScript så kan man skriva följande

Koden:

---

<SCRIPT LANGUAGE="JAVASCRIPT">
<!--
function ValideraIndata()
{
  // Om längden på det inmatade är 0 så måste det
  // vara tomt
  // Observera hur vi hänvisar till textboxen
  if (document.NamnoAdress.MittNamn.value.length == 0)
  {
    alert("Du måste ange namn.");
    return false;
  }

  if (document.NamnoAdress.MinAddress.value.length == 0)
  {
    alert("Du måste ange adress.");
    return false;
  }

  return true;
  
}
//-->
</SCRIPT>
<FORM NAME="NamnoAdress" ACTION="namn på mottagande program" OnSubmit="return ValideraIndata()">
  <TABLE BORDER="0">
    <tr>
      <td>
        Namn:
      </td>
      <td>
        <INPUT TYPE="TEXT" NAME="MittNamn" SIZE="20" MAXLENGTH="30">
      </td>
    </tr>
    <tr>
      <td>
        Adress:
      </td>
      <td>
        <INPUT TYPE="TEXT" NAME="MinAddress" SIZE="20" MAXLENGTH="30">
      </td>
    </tr>
    <tr>
      <td>
        &nbsp;
      </td>
      <td>
        <INPUT TYPE="SUBMIT" VALUE="OK">
        <INPUT TYPE="RESET" VALUE="Töm">
      </td>
    </tr>
  </table>
</form>

Om man vill kan man sätta följande i början av sidan:

---

<%  Set bc = Server.CreateObject("MSWC.BrowserType")
  If (bc.javascript = FALSE) then %>
    Eftersom din browser inte stöder JavaScript så kommer
    jag inte att kunna validera det du ger in
<% End If %>

Eller varför inte:
<%  Set bc = Server.CreateObject("MSWC.BrowserType")
  if (bc.javascript = FALSE) then %>
    Sorry. Du har för gammal browser
    Jag Kan inte fortsätta
<% Else %>
    (Hit sätter man hela formens kod vilket gör
     att den inte visas om inte JavaScript stöds)
<% End If %>

Vi testar din browser med:

<%  Set bc = Server.CreateObject("MSWC.BrowserType")
  if (bc.javascript = FALSE) then %>
    Sorry. Du har för gammal browser
<% Else %>
    Tillräckligt ny browser
<% End If %>

Som ger som svar:

Sorry. Du har för gammal browser

Nuförtiden har nog ALLA browsers med JavaScript stöd. Har de inte så får de skylla sig själva.