webForumDet fria alternativet

ASP Problem

17 svar · 195 visningar · startad av Lundquist

LundquistMedlem sedan juli 200116 inlägg
#1

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
#2

how about %>

------------------
There is no Tomorrow...

LundquistMedlem sedan juli 200116 inlägg
#3

Varför? ASP koden fortsätter ändå på nästa rad

snekkorrMedlem sedan dec. 2000219 inlägg
#4

du skall väll ända avslute if satsen!

------------------
blackarmy.se

KimMedlem sedan jan. 20003 571 inlägg
#5

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
#6

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
#7

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
#8

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
#9

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
#10

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
#11
Response.&#67ookies("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
#12

Vad är ett vb-statement?

PaceMedlem sedan juni 20015 947 inlägg
#13

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
#14

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
#15

Är det ingen som har blankaste aning om vad det är som fattas?

LundquistMedlem sedan juli 200116 inlägg
#16

Till LarsG >>>

Tack men det hjälpte ej..

PaceMedlem sedan juni 20015 947 inlägg
#17

Visa koden omkring också.

------------------
Peter D

LundquistMedlem sedan juli 200116 inlägg
#18
<% 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
Genererad på 373 ms · cache AV · v20260730165559-full.f96bc7eb