Problém s asp

From: Tomáš (X_Y_Z_@seznam.cz)
Date: 06. 01. 2001, 20:08 CET


Cau 
je to asi prkotina, ale pro me to ma docela zasadni vyznam.
udelal jsem stranku s textovym polem pro e-mail a tlacitko odeslat. puvodni funkce je takova, ze pokud si nic nevyplnil, zobrazilo to to samy akorat s cervenym napisem nezadal ste ímejl. ale! nechce to fachat a ja uz fakt nevim, kde je chyba. prosim poradte!!!

zdrojovy kod:

email.asp
---------------------------------
<% 
Option Explicit
Dim email, strEmailChyba, blnFormularOK, blnOdeslano
blnFormularOK = true
If len(Request.Form("btnOdeslat"))=0 Then blnOdeslano=false else blnOdeslano=true
If blnOdeslano Then
	email 	= Request.Form("email")
	If len(email)= 1 Then
		strEmailChyba="nezadáno"
		blnFormularOK = false
	End If	
End If 
%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
	<title></title>
</head>
<body>
<% If blnFormularOK AND blnOdeslano Then %>
Děkujeme. Váš e-mail je <%= email %>
<% Else %>
<form action="email.asp" name="Form" id="Form">
<FONT SIZE=-1 COLOR=RED><%= strEmailChyba %></FONT>
<input type="text" value="<%= email %>" name="email" id="email">
<input type="submit" name="blnOdeslano" value="Odeslat">
</form>
<% End If %>

</body>
</html>
---------------------------------------------



This archive was generated by hypermail 2.1.2 : 04. 09. 2001, 04:52 CEST