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

Dim strhelp
%>

<html>
<head>
<title>ASP Statusverwaltung: Sessionvariablen lesen</title>
</head>
<body>
<%
'Abfangen, falls http:// nicht eingegeben wurde
if instr(session("strurl"),"http://") > 0 then 
  strhelp = session("strurl")
else
  strhelp = "http://" & session("strurl")
end if

Response.Write("<p>Link: <a href=""" & strhelp & """>" &_
  session("strtitel") & "</a></p>")
%>

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

Letzter Update: 26.12.2021 16:48

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