VBS Typenkonflikt

[Horono]

Hallo Zusammen

Ich kriege den Fehler:
Laufzeitfehler in Microsoft VBScript Fehler '800a000d'
Typenkonflikt: 'pdtmToFormat'

Mein Skript sieht so aus:

Function fctFormatDate( pdtmToFormat )
    if ( pdtmToFormat <> "" ) then
        fctFormatDate = day( pdtmToFormat ) & "." & month( pdtmToFormat ) & "." & year( pdtmToFormat )
    else
        fctFormatDate = pdtmToFormat
    end if
End Function

Wo ist der Fehler?
Oder was mache ich falsch?
Bin kein Pro in vbs
(FALLS WICHTIG: DIESEN FEHLER KRIEGE ICH AUF EINEM NEUEN IIS - ASP)