473,230 Members | 1,410 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,230 software developers and data experts.

Server.CreateObject("Scripting.FileSystemObject") on another serve

trying to access files located on another server within the network. the
folder is shared out and we created a virtual directory as well.
The error is Microsoft VBScript runtime error '800a004c' Path not found

Here is my code

<%

dim fs,fo,x
set fs=Server.CreateObject("Scripting.FileSystemObject ")
set fo=fs.GetFolder("\\hostname\procedures")

for each x in fo.files
'Print the name of all files in the test folder
Response.write(x.Name & "<br />")
next
set fo=nothing
set fs=nothing
%>

....tried some MS solutions

http://support.microsoft.com/default...;en-us;Q197964

and

http://databases.aspfaq.com/database...er-server.html

The previous was from a post on this page from May 2007.

Thank You in advance for any help you might provide

Jul 17 '07 #1
3 7597


"Jon Paal [MSMD]" wrote:
http://forum.echoechoplus.com/showth...?threadid=7948
this may help
I've tried the WshNetwork route...still cant' get a successful connection
but I'm getting other error messages which suggest to me that at least it can
see the map.

I've been trying different drive letters usernames, passwords etc to try and
get a successful hookup.

However, when I run the code now it knocks out my IIS (or so it
appears)......I have to go and reboot the webserver. Wondering whats causing
that. Heres the script

Set WshShell = server.CreateObject("WScript.Shell")
Set WshNetwork = server.CreateObject("WScript.Network")
Set CheckDrive = WshNetwork.EnumNetworkDrives()
AlreadyConnected = False
DriveLetter = "P:" 'DriveLetter must be a CAPITAL letter
RemotePath = "\\server\sharedfolder"
username = "domainname\username"
pass = "password"
choice = "false"
if CheckDrive.count 0 then
For i = 0 To CheckDrive.Count - 1
If CheckDrive.Item(i) = DriveLetter Then AlreadyConnected = True
Next

If AlreadyConnected = True then
WshNetwork.RemoveNetworkDrive DriveLetter
WshNetwork.MapNetworkDrive DriveLetter, RemotePath, choice, username, pass
WshShell.PopUp "Drive " & DriveLetter & "Disconnected, then connected
successfully."

Else
WshNetwork.MapNetworkDrive DriveLetter, RemotePath, choice, username, pass
WshShell.PopUp "Drive " & DriveLetter & " connected successfully."

End if

else
WshNetwork.MapNetworkDrive DriveLetter, RemotePath, choice, username, pass
***this is where is hangs***
WshShell.PopUp "Drive " & DriveLetter & " connected successfully."

end if
Thank You for your assistance

Jul 18 '07 #3
you may need to try wsh questions here:

microsoft.public.scripting.wsh
Jul 19 '07 #4

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

2
by: Lin Ma | last post by:
Greetings, Is it possbile to check a file exist without using Server.CreateObject("Scripting.FileSystemObject") in asp page?? The reason is our hosting company turn that function off for...
5
by: Andrew | last post by:
Hi, experts, My system has a problem when I invoke the fileSystemObject to create a text file (it worked ok long before.) The asp seems running, but actually never finishes. I don't know what I...
3
by: bt | last post by:
I am just beginning with asp and have gotten an error that I need some help with. I posted a pair of files to an online ASP host server. The files are in the same directory; one is readfile.asp...
2
by: Stavros | last post by:
Hi all when I execute the following VB6 code in Windows 2000 and as an Administrator, everything is working fine. Project->References->"Microsoft Scripting Runtime" and scrrun.dll is located...
4
by: MoF | last post by:
Hello! I have for a long time used the line: Set FS=Server.CreateObject("Scripting.FileSystemObject") in my ASP code. Suddenly one day this week it stopped working and I now get the error: ...
1
by: chsmith | last post by:
I'm calling a .net / c# .dll from .ASP via Server.CreateObject(). I regasm, gacutil /i and all runs fine on XP SP1 or older. SP2 registry subracts System (??) from the registry root nodes and...
0
by: hellind | last post by:
When the form is submitted as ENCTYPE="multipart/form-data" using AspUpload component, I understand to use Upload.form("") to retreive the form elements. But I cannot retreive it from inside a class....
5
by: Barry | last post by:
I've wasted the whole day trying things and researching, but nothing is working. I would *greatly* appreciate if someone can give me the solution to this problem. I'm using the .NET Framework...
7
by: Benjamins via AccessMonster.com | last post by:
Hi, I have meet a problem for CreateObject("Scripting.FileSystemObject"). I uses this code to get the information of the harddisk I have 10 user using the same code. All where working fine...
0
by: VivesProcSPL | last post by:
Obviously, one of the original purposes of SQL is to make data query processing easy. The language uses many English-like terms and syntax in an effort to make it easy to learn, particularly for...
0
by: jianzs | last post by:
Introduction Cloud-native applications are conventionally identified as those designed and nurtured on cloud infrastructure. Such applications, rooted in cloud technologies, skillfully benefit from...
2
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 7 Feb 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:30 (7.30PM). In this month's session, the creator of the excellent VBE...
0
by: stefan129 | last post by:
Hey forum members, I'm exploring options for SSL certificates for multiple domains. Has anyone had experience with multi-domain SSL certificates? Any recommendations on reliable providers or specific...
0
Git
by: egorbl4 | last post by:
Скачал я git, хотел начать настройку, а там вылезло вот это Что это? Что мне с этим делать? ...
1
by: davi5007 | last post by:
Hi, Basically, I am trying to automate a field named TraceabilityNo into a web page from an access form. I've got the serial held in the variable strSearchString. How can I get this into the...
0
by: DolphinDB | last post by:
Tired of spending countless mintues downsampling your data? Look no further! In this article, you’ll learn how to efficiently downsample 6.48 billion high-frequency records to 61 million...
0
by: Aftab Ahmad | last post by:
Hello Experts! I have written a code in MS Access for a cmd called "WhatsApp Message" to open WhatsApp using that very code but the problem is that it gives a popup message everytime I clicked on...
0
by: Aftab Ahmad | last post by:
So, I have written a code for a cmd called "Send WhatsApp Message" to open and send WhatsApp messaage. The code is given below. Dim IE As Object Set IE =...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.