txt fil igen

Hej

Igår fik jeg hjælp til at vise en txt fil der bliver uploadet til en mappe på serveren men det virker ikke :

Jeg har :
<%
Set op = CreateObject("Scripting, FileSystemObject")
Set fil = op.OpenTextFile(Server.Mappath("upload_files/test.txt"))
do while not fil.AtEndOfStream
response.write fil.readline
loop
%>

Fejlen jeg får er : Microsoft VBScript runtime error '800a01ad'

ActiveX component can't create object: 'Scripting, FileSystemObject'

/news.asp, line 70

Hvor limie 70 er : Set op = CreateObject("Scripting, FileSystemObject")