<%@ 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