<%@ Language=VBScript %>
<%
Response.Expires = 0

'Formularverarbeitung erfolgt vor erstem HMTL-Element
'damit bei falschen Eingaben zurück zum Formular umgeleitet werden kann

'Prüfen, ob etwas eingegeben wurde:
If Request.Form("fldname") <> "" Then
  strname = Request.Form("fldname") 'Feldinhalt einer Variablen zugewiesen
End If
%>

<html>
<head>
<title>SWP-Einführung ASP: Formular und Formularverbeitung in derselben Seite</title>
</head>
<body>
<p>
<%
If Request.Form("fldname") = "" Then
%>

  <form action="uebung05form.asp" method="post">
    Name: <input type="text" name="fldname" size="20" />
    <input type="submit" name="btnsubmit" value="Abschicken" />
  </form>  
<%
Else
  Response.Write("Hallo " & Request.Form("fldname") & _
    "<br /><a href=""uebung05form.asp"">Zum Formular</a>" )
End if
%>

</p>
<!--#include virtual="asppages/silvi/_include/inchtmlnachspann.asp" -->
</body>
</html>

Demo: uebungen/uebung05form.asp

Letzter Update: 26.12.2021 16:48

Zurück zur Liste mit ASP-Übungen auf  www.ecotronics.ch