aspUpload virker ikke

Hej

  Er der nogen der kan give mig et bud på hvor dette ikke virker:

<% if request.querystring("status") = "done" then

Dim upload

Set Upload = Server.CreateObject("Persits.Upload.1")
*Count = Upload.SaveVirtual("/tests/test/test/images/medlem")
 
  response.write Count & "files uploaded.<br><br>" %>
 
<a href="index.asp?connect=1&valgt=myPage&subMyPage=uploadPicture">Igen</a>

<% else %>

<form method="POST" enctype="multipart/form-data" action="index.asp?connect=1&valgt=myPage&subMyPage=uploadPicture&status=done">
  <input type="file" size="50" name="file1">
  <input type="submit" value="Upload">
</form>

<% end if %>

Jeg får følgende utroligt informative fejl:

Persits.Upload.1 error '800a0001'

Unspecified error

på linie markeret med *