<%@ Language=VBScript %>
<%
Option Explicit
Response.Expires = 0
On Error Resume Next

Dim strbtnlblsend
strbtnlblsend = "Abschicken"

If Request.Form("btnsubmit") = strbtnlblsend Then
  session("strtitel") = Request.Form("frmfldtitel"
  session("strurl") = Request.Form("frmfldurl"
  Response.Redirect("uebung5_2session2.asp")
End If
%>

<html>
<head>
<title>ASP Statusverwaltung: Sessionvariablen schreiben</title>
</head>
<body>
<form action="uebung5_2session1.asp" method="post">
Titel: <input type="Text" name="frmfldtitel"> 
URL: <input type="text" name="frmfldurl">
<input type="submit" value="<%=strbtnlblsend%>" id="btnsubmit" name="btnsubmit">
</form>

<!--#include virtual="asppages/silvi/_include/inchtmlnachspann.asp" -->
</body>
</html>
Demo: uebungen/uebung5_2session1.asp

Letzter Update: 26.12.2021 16:48

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