filupload ger problem med Invalid ProgID.

Får detta felmeddelandet:

Server object error 'ASP 0177 : 800401f3' 

Server.CreateObject Failed 

/vforum/index.asp, line 308 

Invalid ProgID. For additional information specific to this message please visit the Microsoft Online Support site located at: [url]http://www.microsoft.com/contentredirect.asp.[/url]

Linje 308 i fet text

<%If Request.QueryString("laggtill") = "ja" Then
'*****************
[B]Set Upload = Server.CreateObject("Persits.Upload")[/B]
Upload.SaveVirtual("../../dbq/uppladdad")

Set File = Upload.Files("THEFILE")

	If Not File Is Nothing Then
  Connect = "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../../dbq/vforum.mdb")
  
   Set rs = Server.CreateObject("adodb.recordset")

   rs.Open "aktuellt", Connect, 2, 3

   rs.Addnew
   End If
'******************

Response.Cookies("namn") = Trim(Upload.Form("namn"))
Response.Cookies("email") = Trim(Upload.Form("email"))
Response.Cookies("namn").Expires = date + 7
Response.Cookies("email").Expires = date + 7
Bild = rs("bild")
Bild = File.ExtractFileName
Rubrik      = Upload.Form("Rubrik")
Inlagg      = FixaTecken(Upload.Form("inlagg"))
Namn       = Upload.Form("namn")
Email        = Upload.Form("email")
SvarsId    = Upload.QueryString("id")
FID        = Upload("ForId")

If Request.QueryString("id") = "" Then 

Conn.Execute("Insert Into forum(ForID, Rubrik, Bild, Inlagg, Namn, Email) Values('"& FID &"','"& Rubrik &"','"& Bild &"','"& Inlagg &"','"& Namn &"','"&Email &"')")

Response.Redirect "index.asp"

Else

Conn.Execute("Insert Into forum(ForID, Rubrik, Bild, Inlagg, Namn, Email, SvarsId) Values('"& FID &"','"& Rubrik &"','"& Bild &"','"& Inlagg &"','"& Namn &"','"&Email &"','"& SvarsId &"')")
Conn.Execute("UPDATE forum SET senast=now WHERE id=" & SvarsId)

If SvarsId <> 0 Then
  Conn.Execute("UPDATE forum SET Svar=Svar+1 WHERE id=" & SvarsId)
End If

Response.Redirect "index.asp?visa=las&id=" &Request.QueryString("id") & "&rubrik=" &Request.Form("rubrik")

End If

End If

Vad är galet? Komponenten ska vara installerad...