[asp] Wat is er mis met dit script?

[Verwijderd]

code:

set Folder = FSO.Getfolder("c:\files\new\")

for each objfile in Folder.Files
    
    tmpfilename=objfile.name
    tmpfilesize=objfile.size

    thefilename=replace(tmpfilename,"'","qoutteken")
    thefilename=replace(thefilename,".zip","")
    thefilename=replace(thefilename,"_"," ")
    
    if fso.FileExists("c:\files\new\"&tmpfilename) and not fso.FileExists("c:\files\"&tmpfilename) then
        
        fso.MoveFile "c:\files\new\"&tmpfilename, "c:\files\"&tmpfilename
        
            tsql="insert into files (crk_name,crk_filesize) values ('"&thefilename&"','"&tmpfilesize&"')"
            call execonn(tsql)
    
    end if

Next

call closeConnection


Response.Write ("Database updated")

[Glimi]

Wat gaat er fout?

[dusty]

Ik weet wel wat er mis is met je post..

Heel wat.