strul med loop

om fältet pres är tom så visas ingen text men den visas om det finns text, det SKA ju visas ett meddelande om fältet är tomt

Set view = Conn.Execute("SELECT * FROM eaglemountains WHERE id = " & rId)
viewPres = view("pres")

If view.eof Then
Response.Write "Ingen presentation finns"
Else
Do until view.EOF
	Response.Write replace(viewPres,vbCrLf,"<br>")		
view.movenext: loop
End If

/r
Se voigtann1

Gör rätt: Lägg in view("pres") där den ska vara..

Set view = Conn.Execute("SELECT * FROM eaglemountains WHERE id = " & rId)

If view.eof Then
Response.Write "Ingen presentation finns"
Else
Do until view.EOF
viewPres = view("pres")
	If Not viewPres <> "" Then viewPres = "Användaren har ingen text i sin presentation"
	Response.Write replace(viewPres & "",vbCrLf,"<br>")		
view.movenext: loop
End If

Du försökte plocka ut en text och sen försöker du kolla om Recordset:et är skapad eller om den är "tom"...

eof är End Of File. Dvs om den inte kan läsa av något i från ditt Recordset. Inte om ett visst fält inte är ifyllt.