17 svar · 197 visningar · startad av Lundquist
Vad är fel i denna koden:
<% If NOT titel = "" AND NOT url = "" AND Request.Co0kies("posta") = "nej" Then %>
Du måste vänta i 15 minuter innan du kan lägga till en ny länk.<br><br>
<% End If <-- Detta är rad 172
Jag får felmeddelandet
Expected Statement
Felet är på rad 172
Varför? ASP koden fortsätter ändå på nästa rad
Inte för att jag direkt är någon ASP-stjärna, men är det inte en nolla i cookie-raden längst upp? Alltså co0kie
------------------
ICQ-UIN 9463491
e-mail kim.halderot@katkom.com
Ja! If Satsen är slut. Men annan ASP kod fortsätter, och den har inte med if satsen att göra.
Till Kim >>
man kan inte skriva cookies med en punkt framför i detta forum. av säkerhetsskäl. I den riktiga koden har jag skrivit utan nolla (0).
Jag är (naturligtvis) PHP-användare istället för ASP:are, men jag försöker ändå.
<% If NOT titel = "" AND NOT url = "" AND Request.Co0kies("posta") = "nej" Then %>
Hur blir det om du skriver följande?
<% If titel <> "" AND url <> "" AND Request.Co0kies("posta") = "nej" Then %>
------------------
ICQ-UIN 9463491
e-mail kim.halderot@katkom.com
Nu har du inget VB statement inuti if-satsen, vilket jag tror man måste ha. För VB-tolken ser det ut som
if villkor then
end if
men den förväntar sig
if villkor then
något vb-statement
end if
------------------
essentitia preter non sans multiplicandum
man kan inte skriva cookies med en punkt framför i detta forum
Nej, varför kan man inte det egentligen?
------------------
Peter D
Response.Cookies("minKaka")
Om du visar lite mer kod så kanske vi kan gå vidare med problemet.
cya,
PatrikB
[Redigerat av PatrikB den 24 jul 2001]
Vad är ett vb-statement?
Nu har du inget VB statement inuti if-satsen
Behövs icke. Ska fungera ändå.
VB statement = vilket vb kommando som helst som utför något.
------------------
Peter D
Ett vb-statement: t.ex. tilldelningar, anrop till sub-rutiner
<% If NOT titel = "" AND NOT url = "" AND Request.Co0kies("posta") = "nej" Then
response.write "Du måste vänta i 15 minuter innan du kan lägga till en ny länk.<br><br>"
End If
Du kan ju testa och se om felet försvinner.
------------------
essentitia preter non sans multiplicandum
Är det ingen som har blankaste aning om vad det är som fattas?
<% Server.Execute "meny.txt" %>
<br>
<img src="linje.gif" width="200" height="1"><br><br>
<% If NOT titel = "" AND NOT url = "" AND Request.Co0kies("posta") = "nej" Then
Response.Write "Du måste vänta i 15 minuter innan du kan lägga till en ny länk.<br><br>"
End If
Randomize
SlumpPladder2 = Int(Rnd * 3) + 1
If SlumpPladder2 = 1 Then %>
På ett annat ställe (högre upp) på sidan har jag detta:
titel = Request.Form("titel")
url = Request.Form("url")
if NOT titel = "" AND NOT url = "" AND NOT Request.Co0kies("posta") = "nej" Then
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver=MySQL;DB=ol_netwo_f;SERVER=ol-networks.com;UID=ol_netwo;PWD=blabla;"
SQLInfoga = "INSERT INTO laggtilllank (titel,url,ip,datum) VALUES ('" & titel & "','" & url & "','" & REMOTE_ADDR & "','" & date & "')"
Conn.Execute(SQLInfoga)
Conn.Close
Set Conn=nothing
Response.Co0kies("posta") = "nej"
Response.Co0kies("posta").Expires = time() + 900
End If