VBS (asp) Frage

renew · 05.01.2003, 17:45

Zitat:

Original geschrieben von BlackR
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!

ähhm - wo wird in deinem Script diese Datei aufgerufen: /iisHelp/common/500-100.asp, line 129 ?

Weil dort is der Kompilierungsfehler.

aber abgesehen davon, dein Script wird mit dem Response.Redirect auch nicht funktionieren.
Weil du kannst dem Browser keine Informationen schicken (<html> <head usw.) und dann noch einen Redirect setzen.
Das muss wenn komplett am Server laufen, und später erst wird eine Seite präsentiert.

Ich hätts aber wenn so gelöst, dass ich das ohne Redirect und Querystring mach (es sei denn du brauchst den noch) und einfach ein Array nehme:

dim array(4)

array(1)= "hallo"
array(2) = "Willkommen"
array(3) = "XYZ"
array(4) = "ABC"

sprnr = Int((4 - 1 + 1) * Rnd + 1)

und dann einfach:
response.write(array(cint(sprnr)))

Aber wo der Kompilierungsfehler bei dem kleinen Script herkommt ist mir schleierhaft....

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