VBS (asp) Frage

BlackR · 05.01.2003, 15:59

thx, aber trotzdem geht da irgenwas nicht, hier habe ich den ganzen Code:
------------------------------------
<html>
<head>
<title>x</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<%
sprnr = Int((4 - 1 + 1) * Rnd + 1)
if Request.QueryString("ran")="" then
response.Redirect("test.asp?ran=" & sprnr)
end if
s1 = "Hallo"
s2 = "Willkommen"
s3 = "XYZ"
s4 = "ABC"

if Request.QueryString("ran")="1" then
spruch = s1
else if request.QueryString("ran")="2" then
spruch = s2
else if Request.QueryString("ran")="3" then
spruch = s3
else if Request.QueryString("ran")="4" then
spruch = s4
end if
%>
<%=spruch%>
</body>
</html>
---------------------------------------

Ich bekomm aber immer diese Fehlermeldung:
.......................................
Kompilierungsfehler in Microsoft VBScript Fehler '800a03ea'

Syntaxfehler

/iisHelp/common/500-100.asp, line 129

elseIf (objASPError.Description > "") Then
^
Kompilierungsfehler in Microsoft VBScript Fehler '800a03f6'

'End' erwartet

/test.asp, line 28
.......................................

Hoffe das hilft

Trotzdem nochmal Danke!

05.01.2003, 15:59	#4
BlackR Jr. Member Registriert seit: 05.01.2003 Alter: 39 Beiträge: 29	thx, aber trotzdem geht da irgenwas nicht, hier habe ich den ganzen Code: ------------------------------------ <html> <head> <title>x</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head> <body> <% sprnr = Int((4 - 1 + 1) * Rnd + 1) if Request.QueryString("ran")="" then response.Redirect("test.asp?ran=" & sprnr) end if s1 = "Hallo" s2 = "Willkommen" s3 = "XYZ" s4 = "ABC" if Request.QueryString("ran")="1" then spruch = s1 else if request.QueryString("ran")="2" then spruch = s2 else if Request.QueryString("ran")="3" then spruch = s3 else if Request.QueryString("ran")="4" then spruch = s4 end if %> <%=spruch%> </body> </html> --------------------------------------- Ich bekomm aber immer diese Fehlermeldung: ....................................... Kompilierungsfehler in Microsoft VBScript Fehler '800a03ea' Syntaxfehler /iisHelp/common/500-100.asp, line 129 elseIf (objASPError.Description > "") Then ^ Kompilierungsfehler in Microsoft VBScript Fehler '800a03f6' 'End' erwartet /test.asp, line 28 ....................................... Hoffe das hilft Trotzdem nochmal Danke!

Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1)