hjælp...

- Hvad er der galt med denn sætning:

<img src=upload.asp?mode=show&id=\"& session(\"usrID\") &\">

session indeholder bruger id\'et

- Og hvordan laver jeg så hvis der ikke er noget billede på den pågældende plads, så skrives der at brugeren ikke har uploadet noget billede, i stedet for en hvid firkant med et kryds i.

her er indholdet af upload.asp

<%
Set myConn = Server.CreateObject(\"ADODB.Connection\")
myConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"../Database/bruger.mdb\")

intID =  Request(\"ID\")

If Request.QueryString(\"mode\") = \"show\" Then
    \' Denne kode fremviser den ønskede fil
    strSQL = \"SELECT Image_Type, Image_Data FROM persondata WHERE (ID = \" & intID & \");\"
    Set rs = myConn.Execute(strSQL)
    If Not rs.EOF Then
        Response.ContentType = rs(\"Image_Type\")
        Response.BinaryWrite rs(\"Image_Data\")
    End If
    \' Her frigives Connection objektet fra hukommelsen
    myConn.Close
    Set myConn = Nothing
    Response.End

End If



\' Her skabes FileUp objektet
Set objUpl = Server.CreateObject(\"SoftArtisans.FileUp\")

\' Her sættes en begrænsning på 200 kb.
If objUpl.Form(\"upload\") <> \"\" Then
    \' Hvis formen er blevet submitted
    strFilename = objUpl.Form(\"f1\").UserFilename
    strFileExt = Mid(strFilename, InstrRev(strFilename, \".\") + 1)
    If objUpl.Form(\"f1\").IsEmpty Then
        strMsg = \"<p>Du skal vælge en fil</p>\"
    ElseIf LCase(strFileExt) <> \"gif\" AND LCase(strFileExt) <> \"jpg\" Then
        strMsg = \"<p>Du skal vælge enten et GIF eller JPG fil!</p>\"
    ElseIf objUpl.TotalBytes > 200000 Then
        strMsg = \"<p>Billedet fylder mere end 200 Kb., vælg venligst et andet!</p>\"
    Else
        \' Her gemmes filen i databasen
        Set rsBlob = Server.CreateObject(\"ADODB.RecordSet\")
        strSQL = \"SELECT * FROM persondata WHERE (id = \"& session(\"usrID\") &\")\"
    rsBlob.Open strSQL, myConn, 1, 3
        objUpl.Form(\"f1\").SaveAsBlob rsBlob.Fields(\"Image_Data\")
        rsBlob.Fields(\"Image_Type\") = objUpl.Form(\"f1\").ContentType
        rsBlob.Update
        rsBlob.Close
        \' Her frigives vores recordset fra hukommelsen
        Set rsBlob = Nothing       
        \' Tekst der viser hvad filnavnet er og hvor meget filen fylder
        strMsg = \"<p>Filen <em>\" & strFilename & \"</em> er uploaded til databasen, og fylder <em>\" & objUpl.TotalBytes & \"</em> bytes.</p>\" &_
            \"<p><img src=upload.asp?mode=show&id=\"& session(\"usrID\") &\"></p>\"
    End If
End If

\' Her frigives FileUp objektet fra hukommelsen
Set objUpl = Nothing
%><html><head>
<title>Upload til Access</title>
</head><body>
<%=strMsg%>
<form method=\"POST\" enctype=\"multipart/form-data\" action=\"upload.asp\">
<p><input type=\"file\" size=\"20\" name=\"f1\"></p>
<p><input type=\"submit\" name=\"upload\" value=\"Upload\"></p>
<p>Bemærk: Billedet må max være på 200 kb.</p>
</form>
<%
\' Her frigives Connection objektet fra hukommelsen
myConn.Close
Set myConn = Nothing
%>
</body></html>