<code>
<%
Set con = Server.CreateObject("Adodb.connection")
con.open "bilder"
Set rst = Server.CreateObject("Adodb.RecOrdSet")
sql ="select * from bild order by bid desc"
rst.open sql,con,1,2
Idd = Request.QueryString("Ida")
'Response.write Idd & "&nbsp;Du skrev de talet i bilder.asp?ida=" & idd &" på adressen därför blir de ditt tal här på den här raden."
Do until Rst.eof
'If idd = Rst("Bid") Then
If cstr(idd) = cstr(Rst("Bid")) Then
Response.write "" & Rst ("namn") & "<br>"
Else
Response.write "Något blev fel!"
exit do
End If
rst.moveNext
loop

%>
</code>
De jag har problem med är om jag lägger 2 bilder från 1 annan person på bid 4.
så funkar inte bid 2 som är 1 annan person.
vad är fel då?

Är Bid unikt för tabellen? Eller skapar det ett unikt värde tillsamans med användare i tabellen?

Jag skulle skriva det så här:
<code>
<%
Idd = CLng(Request.QueryString("Ida"))

Set con = Server.CreateObject("ADODB.Connection")
con.open "bilder"

sql = "SELECT * FROM bild WHERE Bid = " & Idd & " ORDER BY bid desc"
Set rst = Server.CreateObject("ADODB.Recordset")
rst.open sql, con

'Response.write Idd & "&nbsp;Du skrev de talet i bilder.asp?ida=" & idd &" på adressen därför blir de ditt tal här på den här raden."

If Rst.EOF Then
Response.write "Något blev fel!"
If cstr(idd) = cstr(Rst("Bid")) Then
Else
Response.write "" & Rst ("namn") & "<br>"
End If

rst.Close
Set rst = Nothing

con.Close
Set con = Nothing
%>
</code>
Antar att Bid är ett numeriskt värde?

Bid stod som = Typ: Tal
Tal Heltal
Decimal Automatiskt.
Kan de vara de som gör att de blir fel då den vill ha decimal tal?
Men satte de på 0 Decimaler.
men varför går de på 4 men inte på 2 när man har både bid 2 och 4 i databsen?
De är de jag inte förstår.
url ditt är
<url:http://www.javahuset.nu/bilder/bilder.asp?ida=2
de funkar som du ser.
Men sätter jag in bilder i ida=4
och 4 i databsen så funkar inte siffran 2 utan bara nummer 4. istället.

Microsoft VBScript compilation error '800a03f6'

Expected 'End'

/bilder/bilder.asp, line 43

Men har provat lägga in End men får If error då.
vad är fel med din kod?
<code>
<% 'rad 21
Idd = CLng(Request.QueryString("Ida"))

Set con = Server.CreateObject("ADODB.Connection")
con.open "bilder"

sql = "SELECT * FROM bild WHERE Bid = " & Idd & " ORDER BY bid desc"
Set rst = Server.CreateObject("ADODB.Recordset")
rst.open sql, con
'rad 30
'Response.write Idd & "&nbsp;Du skrev de talet i bilder.asp?ida=" & idd &" på adressen därför blir de ditt tal här på den här raden."

If Rst.EOF Then
Response.write "Något blev fel!"
If cstr(idd) = cstr(Rst("Bid")) Then
Else
Response.write "" & Rst ("namn") & "<br>"
End If

rst.Close 'rad 40
Set rst = Nothing
con.Close
Set con = Nothing ' rad 44

%>
</code>

Glömde ta bort din If-sats:
<code>
<%
Idd = CLng(Request.QueryString("Ida"))

Set con = Server.CreateObject("ADODB.Connection")
con.open "bilder"

sql = "SELECT * FROM bild WHERE Bid = " & Idd & " ORDER BY bid desc"
Set rst = Server.CreateObject("ADODB.Recordset")
rst.open sql, con

'Response.write Idd & "&nbsp;Du skrev de talet i bilder.asp?ida=" & idd &" på adressen därför blir de ditt tal här på den här raden."

If Rst.EOF Then
Response.write "Något blev fel!"
Else
Response.write "" & Rst ("namn") & "<br>"
End If

rst.Close
Set rst = Nothing

con.Close
Set con = Nothing
%>
</code>

De funkar bra. Men de kommer bara ut 1 bild och inte båda 2 som har
bid 2 (2 bilder en som heter emmelie_b.jpg
och en som heter emmelie.jpg
de har bid 2 då de är från samma person.
men den skriver bara ut emmelie.jpg
och sätter jag emmelie_b.jpg som bid 1 och emmelie.jpg som bid 2 så funkar inte 1
utan blir alltid något blev fel även om de finns där.
vad är fel?

Problemet är löst nu.