help with ASP based FTP connections, access is denied error

I am trying to implement this well-known method of doing FTP operations directly from within ASP:

http://www.aspfree.com/c/a/ASP/FTP-with-ASP

Error is:

WshShell.Exec error '80070005'
Access is denied.

Error is on this line:

set WSX=objShell.Exec(COMMAND_FTP & strFile & " " & strHost)

I did a response.write to verify what comment its trying to send, and this is it:

ftp.exe -i -s:C:\TMP\rad07D01.tmp.ftp ftp.ssddocs.us

I'm attaching the code in its entirety (passwords and so forth stripped out). I would really appreciate any help, as I've never attempted this before. Thanks!
COMMAND_FTP="ftp.exe -i -s:"

strHost="ftp.ssddocs.us"
strUser=""
strPass=""
strMode="ascii"

LocalDir="D:\data"
RemoteDir=""

response.write("Begin FTP connection...<br />")
response.flush

set objFSO=CreateObject("Scripting.FileSystemObject")

set objTempFldr=objFSO.GetSpecialFolder(2)
strFile=objFSO.GetTempName

strFile=objTempFldr & "\" & strFile & ".ftp"
if not(objFSO.FileExists(strFile)) then objFSO.CreateTextFile(strFile)
set objFile=objFSO.OpenTextFile(strFile, 2, True)

objFile.WriteLine(strUser)
objFile.WriteLine(strPass)
If LocalDir<>"" then objFile.WriteLine("lcd " & LocalDir)
If RemoteDir<>"" Then objFile.WriteLine("cd " & RemoteDir)
objFile.WriteLine(Mode)

objFile.WriteLine(strCMD)
objFile.WriteLine("bye")
objFile.Close()
set objShell=Server.CreateObject("WScript.Shell")

response.write(COMMAND_FTP & strFile & " " & strHost)
set WSX=objShell.Exec(COMMAND_FTP & strFile & " " & strHost)
set ReturnCode=WSX.StdErr
set Output=WSX.stdOut
strErrorLog=objTempFldr.Path & "ftpErrors.txt"
strLog=objTempFldr.Path & "ftpLog.txt"

set objFile=objFSO.OpenTextFile(strErrorLog, 2, True)
objFile.Write(ReturnCode.ReadAll())
objFile.Close()

set objFile=objFSO.OpenTextFile(strLog, 2, True)
objFile.Write(Output.ReadAll())
objFile.Close()
set objFSO=nothing
set objFile=nothing

objFSO.DeleteFile strFile, True
set objFSO=nothing

set objRegExp=New RegExp
objRegExp.IgnoreCase=True

objRegExp.Pattern="not connected|invalid command|error"

If (objRegExp.Test(Output.ReadAll)=True) or (objRegExp.Test(ReturnCode.ReadAll)) then
	FTP=False
else
	FTP=True
end if
set objRegExp=nothing

Open in new window

Brad BansnerWeb DeveloperAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

crisco96Commented:
This probably means your IIS user doesn't have access to open the command prompt.  Try making that user an administrator and see if it works, if that's the case then you'll just need to figure out exactly what permissions the user needs in order to open the command prompt because you don't want to leave the user as an admin in case your website became compromised
0
Brad BansnerWeb DeveloperAuthor Commented:
I made IUSR_WEB1 an administrator, but got the same error.
0
Brad BansnerWeb DeveloperAuthor Commented:
I abandoned this and purchased a third-party component instead.
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
ASP

From novice to tech pro — start learning today.