Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Why the heck won't this work in Windows 10?!? Standard filecopy from one source to another 1

Status
Not open for further replies.

AncientTiger

Programmer
Jul 5, 2001
238
US
I have a program written in VB6 that checks for an available update on a LAN network drive, and if available, it will copy the newer version from the X drive to the program folder on the C drive. Works just fine on our Win7 computers, but some of the PCs are being upgraded from Win7 to Win10 and the simple process just won't work.

Here it is in a nutshell
SOURCEPATH = "X:\LOCAL SCHEDULING SYSTEM\SOFTWARE UPDATES\SCHEDULING.EXE"​
DESTPATH = APP.PATH+"\SCHEDULING.EXE"​
SET FSO = CREATEOBJECT("SCRIPTING.FILESYSTEMOBJECT")​
FSO.COPYFILE SOURCEPATH,DESTPATH​

The error is occurring in the last line because for some reason Win10 is saying that it cannot fine the path for the source file stored in the var SOURCEPATH. I've triple-checked and it's ABSOLUTELY ACCURATE, and again, it works just fine in Win7, so I know it has to be something with Win10 settings, but I'm just not familiar enough with Win10 yet to figure it out.

Any help on this would be GREATLY appreciated!!!!

------------------------------------
[yinyang] Over 20 years of programming, and still learning every day! [yinyang]
 
Happy New Year! :)

Perhaps this registry setting from the 8-voted answer here solves it:

Good luck!
MakeItSo

"Knowledge is power. Information is liberating. Education is the premise of progress, in every society, in every family." (Kofi Annan)
Oppose SOPA, PIPA, ACTA; measures to curb freedom of information under whatever name whatsoever.
 
Will check that solution and see how it goes.. THANKS!

------------------------------------
[yinyang] Over 20 years of programming, and still learning every day! [yinyang]
 
THAT WORKED LIKE A CHARM!!!!!!!!!!!!!!

Thank you SO much!!! :D

I've been fighting with this issue for weeks, and only had a few hairs left on my old knoggin' to pull out

------------------------------------
[yinyang] Over 20 years of programming, and still learning every day! [yinyang]
 
Glad it worked.
Nice way to start 2018. :)

"Knowledge is power. Information is liberating. Education is the premise of progress, in every society, in every family." (Kofi Annan)
Oppose SOPA, PIPA, ACTA; measures to curb freedom of information under whatever name whatsoever.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top