Random upload af billede gennem en web service

Hej Eksperter

Jeg er igang med en web service der skal kunne se ned i en mappe og hente et tilfældigt billede op.

Jeg har lavet følgende asmx-kodestykke:

<%@ WebService Language="VB" Class="AutoUpload"%>

Imports System
Imports System.web.Services
Imports System.XML.serialization

Namespace AutoUploadVB
    Public Class Images

      Public Image As String
     
    End Class
End Namespace

Public Class AutoUpload

  <WebMethod> Public Function ImageUpload(IMGS_DIR As String) As AutoUploadVB.Images
   
    Dim objFSO, objFolderObject, objFileCollection, objFile
    Dim intFileNumberToUse, intFileLooper
    Dim objImageFileToUse
    Dim strImageSrcText

(*)objFSO = Server.CreateObject("Scripting.FileSystemObject")
    objFolderObject = objFSO.GetFolder(Server.MapPath(IMGS_DIR))
    objFSO = Nothing

    objFileCollection = objFolderObject.Files
    objFolderObject = Nothing

    intFileNumberToUse = Int(objFileCollection.Count * Rnd) + 1

    intFileLooper = 1
    For Each objFile in objFileCollection
      If intFileLooper = intFileNumberToUse Then
        objImageFileToUse = objFile
        Exit For
      End If
    intFileLooper = intFileLooper + 1
  Next

  objFileCollection = Nothing

  strImageSrcText = IMGS_DIR & objImageFileToUse.Name

  objImageFileToUse = Nothing

  End Function
End Class

Mit problem er at jeg får en fejlmeddelse der lyder, at Server(*) ikke er defineret.
Er der nogen der kan fortælle mig hvad det er jeg gør galt?

- KAHS