Indsæt data i database

Hvor går det galt, den gemmer fint billederne i mappen, men jeg kan ikke få dem lagt i databasen, jeg får følgende fejl:

Microsoft VBScript runtime error '800a01a8'Object required: ''/Images/data_handler.asp, line 65

Linie 65 er:
update_image= "UPDATE xxxxx SET '"&billede&"' = '"&MyFile&"' where ID = '"&ID&"'"   
            dbconn.Execute(update_image)

Håber I kan hjælpe.

<!--#INCLUDE file="db.inc" -->
<%
  intPostTotalBytes = request.totalbytes
  bstrPostData = Request.BinaryRead(intPostTotalBytes)

  sagID = getF
  mglID = getF
  Image = getF


  SELECT CASE Image
    CASE "901"   
        billede = "image00"

   
    CASE "921"   
        billede = "image01"

   
    CASE "922"   
        billede = "image02"

   
    CASE "923"   
        billede = "image03"

   
    CASE "924"   
        billede = "image04"

   
    CASE "925"   
        billede = "image05"

   
    CASE "926"   
        billede = "image06"

                 
    CASE "927"   
        billede = "image07"

             
    CASE "928"
        billede = "image08"

   
    CASE "929"
        billede = "image09"

    CASE "930" 
        billede = "image10"

    CASE ELSE   
        billede = "Unknown"
  END SELECT

set fs=Server.CreateObject("Scripting.FileSystemObject")
    MyFile = ID & "_" & mgID & "_" & billede & ".jpg"
    set ts = fs.CreateTextFile("d:\web\xxxx.com\bb\Images\"&MyFile&"", True)
    For i = 1 To lenB(bstrPostData)
      ts.Write(Chr(AscB(MidB(bstrPostData, i, 1))))
          if billede <> "" AND billede <> "Unknown" then
              update_image= "UPDATE xxxxx SET '"&billede&"' = '"&MyFile&"' where ID = '"&ID&"'"   
            dbconn.Execute(update_image)
        end if
    Next
    ts.close
     
  response.write "OK"
%>