I'm trying to execute the command "filesystemobject.copyfile". But every time i try it gives me a permission denied error. I've checked the permissions on the folder i'm copying to and it's set to "full control" i have no idea what is wrong. The code is as follows,

<%
   Response.Write "Please wait, now adding the comics to the database. <br><br><br>"
  
   Dim conn
   Set conn = Server.CreateObject("ADODB.Connection")
   conn.provider = "Microsoft.Jet.OLEDB.4.0"
   conn.open "c:\_db\database.mdb"
  
   Dim rs
   Set rs = Server.CreateObject("ADODB.Recordset")
   rs.open "SELECT * FROM [comic]", conn, 1
  
   Dim fso
   Set fso = Server.CreateObject("Scripting.FileSystemObject")
  
   Dim sf
   Set sf = fso.GetFolder("C:\Documents and Settings\Administrator\Desktop\Comics")
  
   Dim fn
   'fn = rs.recordcount
  
   Function search(strSearchText)
   'loop through every file in the folder
      For Each objFile in sf.Files
         Dim txt
         Set txt = fso.OpenTextFile(objFile.path, 1)
  
   Dim endloop  
         While NOT endloop
      line = txt.ReadLine
   If InStr(1, line, strSearchText, 1) then
      Dim line2, fname
      endloop = TRUE
      fn = fn + 1
      fname = "c:\comics\" & fn & ".gif"
      line2 = Replace(line, "<IMG SRC="" http://www.funnymail.com/webdata/cs/ - http://www.funnymail.com/webdata/cs/ ", "")
      line2 = Replace(line2,"""></P>","")
      line2 = Replace(line2,".gif", "[1].gif")
               mrpath = Trim("C:\comics\2change\") & Trim(line2)
      Response.Write mrpath & " will be saved as " & fname & "<br>"
      Response.Write "Saving...<br>"
      fso.copyfile mrpath, "c:\comics"
   End If
   Wend
   endloop = FALSE
  
         txt.Close
      Next
   End Function
  
   strtxt = "<IMG SRC="" http://www.funnymail.com/webdata/cs - http://www.funnymail.com/webdata/cs "
     
   Search strtxt
%>

does anyone see anything that i don't?

oops, i forgot the error

Microsoft VBScript runtime error '800a0046'

Permission denied

/scripts2save/comicadder2.asp, line 42

line 42 is 'fso.copyfile mrpath, "c:\comics"

Sounds like you don't have the correct permissions for the folder. Just a guess though.

Just because you said it, doesn't mean its out of the question.  Count the number of times that posters have said they've got the correct permissions set on this forum, only to find that they didn't apply it to the IUSR_<MachineName> account.

That said, you might want to ensure that there are no script blocking utilities running on the server, such as Nortons, as this is known to interfere with FSO.

Cheers,
Andrew

It's funny, i have my iUSR permissions set correctly and my firewall and AntiVirus software are set to allow script execution. The weird thing is that my scripts have been giving me some really strange errors lately. Stuff like "No Current Record" when i'm not accessing a database and this "Permission Denied" error. Maybe that blaster worm currupted some of my asp.dll file, what do you think are the chances of that?

how about just doing something simple like trying to disable Antivirus first?

then you don't have to (wrongly) jump to conclusions of corrupt dll's

If its norton you dont need to completely kill it just turn off script blocking.

Mart.

I don't think a corrupt asp.dll is likely because fso is a seperate dll and if everything else on your site is working i don't think you need to worry about corrupt dlls.

Mart.

i guess your right, it's just so funny. I have no idea what to do, this script is supposed to save me time, not waste it. I'm going to try and write to my final folder (the one i'm trying to use is a test) and see if that works.