fejl ved ip

fjern lige () i line:

strSQL ="SELECT * FROM stem WHERE ip = ip"

Skal det ikke være:

strSQL ="SELECT * FROM stem WHERE ip = '" & ip & "'" ?

Just wondering...

fra schulze --> har ret man bruge ike () på den måde....

hjælper ikke den gør det samme...

avlund --_> ikke når det har med tal og true/false at gøre..

virker hveken hvis jeg fjerner () eller med den nye SQL

SQL'en skal tjekke om min dim ip findes i databasen, hvis den gør skal man redirectes og hvis ikke skal den ikke gøre noget &:-D

hvis det hjælper

så er det noget andet i scriptet der går galt.. kom med det..

den er ikke længere:

den ser sådanne ud:
Dim ip
ip = request.ServerVariables("REMOTE_ADDR")
' Databaseforbindelse

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/koder/asp/afstemning/stem.mdb")
Conn.Open DSN
strSQL ="SELECT * FROM stem WHERE ip = '" & ip & "'"
set rs = conn.execute(strSQL)
if rs.EOF then
response.redirect("/koder/asp/afstemning/stem.asp?mode=resultat")


else

response.write "<table cellpadding='0' cellspacing='0' style='border: 1 solid #000000' width='120'>"
response.write "<tr><td colspan='2' width='100%' style='border-bottom: 1 solid #000000; padding: 2px;' bgcolor='#C0C0C0'><center><h1>Afstemning</h1></center></tr></tr>"
response.write "<tr><td colspan='2' width='100%' style='padding-left: 5px;'><h2><br>Hvad synes du om siden ?<br><br></h2></td></tr>"
response.write "<tr><td width='20px'><form action='stem.asp?mode=stem' method='post'><input type='radio' name='stem' value='1' checked='checked'></td><td><h2>Meget god</h2></td></tr>"
response.write "<tr><td><input type='radio' name='stem' value='2'></td><td><h2>God</h2></td></tr>"
response.write "<tr><td><input type='radio' name='stem' value='3'></td><td><h2>Midel</h2></td></tr>"
response.write "<tr><td><input type='radio' name='stem' value='4'></td><td><h2>Dårlig</h2></td></tr>"
response.write "<tr><td><input type='radio' name='stem' value='5'></td><td><h2>Meget dårlig</h2></td></tr>"
response.write "<tr><td colspan='2' width='100%'><center><input type='submit' value='Stem'></center></td></tr>"
response.write "<tr><td colspan='2' height='2px' width='100%'><input type='hidden' name='ip' value='"
response.write (ip)
response.write "'></form></td></tr></table>"
conn.Close
Set conn = nothing
Set SQLstmt = nothing
end if
%>
<% End if %>

ip er da heller ikke et tal, men en streng. F.eks. 127.0.0.1 kan umuligt være andet end en streng pga. punktummerne.

når ja... sorry.....

har nu sat det som avlund ville:

<% else %>
<%
Dim ip
ip = request.ServerVariables("REMOTE_ADDR")
' Databaseforbindelse

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/koder/asp/afstemning/stem.mdb")
Conn.Open DSN
strSQL ="SELECT * FROM stem WHERE ip = '" & ip & "'"
set rs = conn.execute(strSQL)
if not rs.EOF then
response.redirect("/koder/asp/afstemning/stem.asp?mode=resultat")

men det gør ikke nogen forskel

hvad er ip for et felt?? texst tal eller??

ip er et tekst felt

strSQL ="SELECT * FROM stem WHERE ip = '" & ip

prøv

hvad siger det??

lige fedt... den sender mig stadig til resultatet

Det resulterer uværgeligt i en fejl. Du kan ikke sætte en apostrof foran ip i en SQL-sætning og så ikke afslutte den igen.

Har du overhovedet nogle records i databasen?

tja.......jeg gå squ i seng nu... ved det ikke... har aldrig været ude for det før....

ja der ligger et enkelt... men det burde jo være lige fedt, for hvis den ikke finder noget skal den jo bare skrive side ?

ok... online takker for indsatsen

avlund ----> jo hvem har måske programmet længst tid...
eks:
strSQL = "Select * from " & request.Querystring("kat") & " where id=" & request.querystring("id")

Jeg ved ikke hvem der har "programmet" længst tid. Jeg ved bare at jeg arbejder med at programmere til dagligt og får penge for det.

Jeg fangede ikke lige meningen med det sidste, men jeg er på den anden side også lidt træt.

Men questis, havde du nogle records i databasen?

jeps, et enkelt...

Og det er din egen? Så er det da klart at den går videre, hvis du kører det fra din egen maskine...

nej det er ikke min egen, det er en tilfældig jeg har skrevet.... men kan ikke lige hitt eud af om det er mig det ikke virker for:

prøve dette link:
http://www.questis.dk/koder/asp/afstemning/stem.asp

hvad sker der når du går derind ?

Prøv også at tjekke på BOF:

if not (rs.EOF OR rs.BOF) then

Tjaeh, den burde jo være både BOF og EOF... hmmm...

Der sker det samme for mig, den hopper direkte videre.

eagleeye>>

den hopper stadig videre... koden ser nu således ud:

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/koder/asp/afstemning/stem.mdb")
Conn.Open DSN
strSQL ="SELECT * FROM stem WHERE ip = 'request.ServerVariables(REMOTE_ADDR)'"
set rs = conn.execute(strSQL)
if not (rs.EOF OR rs.BOF)  then
response.redirect("/koder/asp/afstemning/stem.asp?mode=resultat")
end if

din SQL skal være:

strSQL ="SELECT * FROM stem WHERE ip = '" & request.ServerVariables(REMOTE_ADDR) & "'"

Ja, men sådan så den også ud før?

Skal den hoppe til siden stemp.asp  hvis recordset'et er tomt?

strSQL ="SELECT * FROM stem WHERE ip = '" & request.ServerVariables(REMOTE_ADDR) & "'"
set rs = conn.execute(strSQL)

giver denne fejl:
Expecting string input

Ja, det er fordi REMOTE_ADDR skal være i anførselstegn:

request.ServerVariables("REMOTE_ADDR")

hov ja der skal " om REMOTE_ADDR:

strSQL ="SELECT * FROM stem WHERE ip = '" & request.ServerVariables("REMOTE_ADDR") & "'"

altså ideen er at hvis man ikke har stemt før, skal den gå ind på siden: stem.asp

hvis man har stemt, (hvad den tjekker via det vi ikke kan få til at virke) skal man sendes til: stem.asp?mode?resultat

hæ hæ.... nu tror jeg det virker &:-D gider i ikke lige et tjekke for en sikkerheds skyld på ovenstående link ?

hmmmm... det tager jeg så for et nej, men er i så interreserede i at svare ?

Den virker fino. Undskyld ventetiden, jeg havde lige en konfrontation med et kvaj på http://www.eksperten.dk/spm/209831 .

Ja .. et svar

Nåeh, OK da. Hvis jeg fortjener points, altså.

sikke en fin samtale i har gang i &:-D og så besøg af den venlig stemte darkside &:-D

nå men takker for hjælpen &:-D lækker fint

Ja, nu udvikler det sig... han gider åbenbart ikke mere. Sådan er det.

No problem, skulle det være en anden gang - tak for points!

Ja jeg har set det ...