LundquistMedlem sedan juli 200116 inlägg
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
T_CodezMedlem sedan juli 2001458 inlägg
how about %>
------------------
There is no Tomorrow...
LundquistMedlem sedan juli 200116 inlägg
Varför? ASP koden fortsätter ändå på nästa rad
snekkorrMedlem sedan dec. 2000219 inlägg
du skall väll ända avslute if satsen!
------------------
blackarmy.se
KimMedlem sedan jan. 20003 571 inlägg
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
LundquistMedlem sedan juli 200116 inlägg
Ja! If Satsen är slut. Men annan ASP kod fortsätter, och den har inte med if satsen att göra.
LundquistMedlem sedan juli 200116 inlägg
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).
KimMedlem sedan jan. 20003 571 inlägg
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
LarsGMedlem sedan dec. 200012 465 inlägg
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
PaceMedlem sedan juni 20015 947 inlägg
man kan inte skriva cookies med en punkt framför i detta forum
Nej, varför kan man inte det egentligen?
------------------
Peter D
PatrikBMedlem sedan mars 20002 713 inlägg
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]
LundquistMedlem sedan juli 200116 inlägg
PaceMedlem sedan juni 20015 947 inlägg
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
LarsGMedlem sedan dec. 200012 465 inlägg
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
LundquistMedlem sedan juli 200116 inlägg
Är det ingen som har blankaste aning om vad det är som fattas?
LundquistMedlem sedan juli 200116 inlägg
Till LarsG >>>
Tack men det hjälpte ej..
PaceMedlem sedan juni 20015 947 inlägg
Visa koden omkring också.
------------------
Peter D
LundquistMedlem sedan juli 200116 inlägg
<% 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